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PREFACE 



This publication describes the internal 
structure of the IBM System/360 Time 
Sharing System (TSS/360) control blocks. 
Each control block, or group of closely 
related control blocks, is assigned a 
specific section within this manual, 
indexed alphabetically* Each control 
block section contains a description of 
the purpose and structure, a diagram, 
cross reference lists of fields, and 
a DSECT listing. 

This manual provides detailed 
descriptions of control blocks to supplement 
the information contained in individual PLMs. 
It is intended to be used by system designers 
and programmers, and IBM customer engineers 
involved in program maintenance. 



Seventh Edition (September 19711 

This is a major revision of, and makes obsolete, 
GY28-2011-5. This edition reflects changes released for 
system 8.1. 

This edition is current with Version 8, Modification 1, 
and remains in effect for all subsequent versions of IBM 
System/ 3 60 Time Sharing System unless otherwise indicated. 
Significant changes or additions to this publication will 
be provided in new editions or Technical Newsletters. 
Before using this publication, refer to the latest edition 
of IBM System/ 360 Time Sharing System: Addendum . GC28-2043, 
which may contain information pertinent to the topics 
covered in this edition. The Addendum also lists the editions 
of all TSS/360 publications that are applicable and current. 

Requests for copies of IBM publications should be made to 
your IBM representative or to the IBM branch office serving 
your locality. *f 

A form is provided at the back of this publication for 
reader* s comments. If the form has been removed, comments may be 
addressed to IBM Corporation, Programming Publications, Depart* 
ment 643, Neighborhood Road, Kingston, Mew York 12401. ^ 

eintemational Business Machines Corporation 1967, 1968, 1969, 
1970, 1971 



TABLE OF CONTENTS 

TABLE* CCHAAAA) • •••.••... ... 2 

Assign BULKIO Device DSECT (CHAABD) ......... 4 

Task Accounting and Statistical Data DSECT ICHAACT) . . . . . . . 5 

ABEND Interlock Release Table CCHAAIR) . . 7 

Auxiliary Storage Allocation Table (CHAASA) , and (CHAASB) ....... 9 

Auxiliary Segment Table CCHAAST) and Segment Table (CHASGT) . . • . . . 12 

Active User Table Entry (CHAAUL) . .•••...••• 15 

BULKIO Table CCHABCT and CHASET) 18 

Buffer Page (CHABFP) . . . . 37 

Builtin Procedure Key ICHABPK) . .......... . 38 

Buffer Page List CCHABPL) . . . 39 

BULKIO Performance Table CCHABPT) 40 

BULKIO Message DSECT (CHABWM) ......••••• 41 

Batch Work Queue CCHABWQ) ........ . . . . 42 

Core Block Table ICHACBT) and Core Block Table Header (CHACBH) 49 

Configuration Control Block (CHACCB) .••••••.. ....... 52 

Catalog SBLOCK (CHACCC) • 57 

Catalog Common DSECT (CHACDS) 64 

Catalog Error Processor Parameter List fCHACEP) • 66 

Channel Table CCHACHL) ................. .. 68 

Task or Real Clock Table CCHACLK) and Clock List Header ICHACLH) . 70 

STARTUP Communications Region (CBACMR) •••••••••••••..••••••• 72 

Communications Area (CHACOM) • 102 

CPU Status Table (CHACST) 104 

Control Unit Table CCHACUT) ........ 106 

Editable Data Set ICHACVF) 108 

Direct Access Interface Block CCHADAI). ...... • 109 

MSAM Work Page CCHADBP) 113 

Data Control Block CCHADCB) 120 

Combined Dictionary (CHADCT, CHADEN) 141 

Data Extent Block CCHADEB) 144 

Data Event Control Block CCHADEC) ...... ...... 150 

Device Group Table (CHADEV) .. ............. 157 

Damage Report CCHADMR) 161 

Data Set Control Blocks in the VTOC CCHADSC £ CHADSV € CHADAS S CHADAV t CHAVTC) . 163 
Page Assignment Table (PAT) Oriented DSCBs (CHADSE S CHADSF) . ••........ 173 

Support System Input/Output Request Block CCHAECW) 179 

Support System Device Allocation Table (CHAECX) •••.•••••••• 189 

Error Recovery Control Communications Area (CHAERC) ... .•••••193 

SERR/EMCI Data Table CCHAERE) • 197 

Error Recording Block (CHAERR) •• •• 199 

Enter Tables 1 and 2 (CHAET1 S CHAET2> . ..•••• 202 

TSS External Page Table CCHAEXT) 204 

Macro Instruction Parameter Lists CCHAFNQ, CHARDQ, CHAWRQ, CHACLQ t CHAFRQ) . . . 205 

General Queue Entry Table (CHAGQE) ••••.. • .... 209 

General Services Macro Table (CHAGSM) 213 

Available Device Table (CHAHED, CHAAHD, and CHAAVE) 215 

Interrupt Control Block (CHAICB) 217 

Interrupt Device Entry (CHAIDE) ............ •••••220 

I/O Inboard Error Record CCHAIER) • 221 

I/O Paging Control Block CCHAIOP) 223 

I/O Request Control Block (CHAIOR) 225 

Interrupt Queue Entry CCHAIQE) 239 

Interrupt Request Entry (CHAIRE) •...••.•••••.•• 242 

Interrupt Storage Area CCHAISA) ...... ........ 243 

Internal Symbol Dictionary (CHAISD) •••••••...••• •••• 254 

Task Monitor Interruption Table (CHAITB) . •••• •• 258 

Data Set Header /Trailer Label 1 CCHALB1). 263 

Data Set Header/Trailer Label 2 (CHALB2) 265 

System Operator Log CCHALOG) Header ••••••••..••••••••••••• 267 

Message Control Block CCHAMCB) . ••...... 268 

Multiplexer Channel Table (CHAMCH) .... ... ....... 270 

Message Event Control Block (CHAMEB> 272 

Merge List (CHAMGL) 273 

Symbol Control Block CCHAMSW) 274 

Multiterminal Status Control Block CCHAMTS) 277 

Module Usage Table CCHAMUT) . ........ 279 

New Task Common (CHANTC) • 280 

Operator* s Device Path Table (CHAODP) ••...••••••• .... 282 



iii 



I/O Outboard Error Record (CHAOER) . 283 

Option O UFLOW Macro Table (CHAOFL) . . . . . 285 

Operator Header CCHAOPH) ...... 286 

Page Allocation Table (CHAPAT) . . 288 

Page Control Block (CHAPCB) ..•...• ............... 290 

Task Monitor Push Down Save Area (CHAPDS) • .......... 293 

Paging-Error Control Block (CHAP EC) .. ••.....••••.. 295 

User Profile CCHAPFL) , Character Translation Table CCHACTT) and Profile 

Character and Switch Table (CHAPCT) . . . . ......... 299 

Page Table (CHAPGT, and External Page Table (CHAXPT) • • 303 

Communications Bucket (CBAPLI) 306 

Partitioned Organization Directory (CHAPOD) 9 Member Descriptor (CHAPOM), and 

Alias Descriptor (CHAPOE). ....... . 308 

Page Table Page Header CCHAPPH) , and Page Table Page Entry Header ICHAPTH). . . . 311 

Prefixed Storage Area (CHAPSA) . . . • .*....... . . 313 

Direct Access Paging Statistical Data Record CCHAPSD) . . . . . 319 

Public/Private Volume Table CCHAPVT) . 321 

Reply Checking Table (CHARET, CHADES f € CHARWD) . . . . . 323 

Reletive External Storage Correspondence Table (CHARHD,CHADHD,CHAMHD,CHAEPE) . . . 325 

RJE Retry Threshold Value Table (CHARJE) . . . 333 

Reply Queue Entry (CHARQE) . • . 334 

Request Queue (CHARQU, CHASHD, 6 CHAENT). .................... 335 

Resident Shared-Page Index CCHARSP) ... 338 

TSSS Real Symbol Table CCHARST) . 340 

Real-Time I nterrupt- Pending Queue CCHARTI) Entry. . . • •••••• 341 

SymboULc-to-Actual Conversion Table (CHASAC). • .•••••••••••••••• 342 

SERR Auxiliary Queue (CHASAQ) . 343 

System Activity and Resources Table (CHASAR). .«••••••• 345 

System Accounting Table (CHASAT) . . . . . . 348 

Screen Routines Common Area (CHASCA) 349 

SAM Communication Block CCHASCB) . .............. . . 350 

Selector Channel Table CCHASCH) . ..... 355 

System Common (CHASCM) . . . . 356 

Scan Table CCHASCN) •• 360 

Supervisor Core Control CHASCT) •••• • 362 

Symbolic Device Allocation Table (CHASDA) . • 363 

Shared Data Set Table CCHASDS, CHASDM, * CHASDE) • • 370 

I/O Statistical Data Table (CHASDT) 374 

OLTS Section Control Table CCHASKT) 378 

Source List (CHASLP f CHASLH, CHASLM) 380 

Symbolic Library Index (CHASLX) 383 

Scan Master Control Table (CHASMC and CHASME) 384 

System Operator ID Table CCHASOT) and CHASOT Entry (CHASID) 386 

SERR/Reconfiguration Path Table (CHASPP) • • 388 

Shared Page Table (CHASPT) and External Shared Page Table (CHAXSP) 389 

System Statistics Table (CHASST) .••.....•• 392 

Station Identification and Features CCHASTA). .••.•••.••••••..«• 394 

Schedule Table Entry (CHASTE) . 396 

Stack Entry Table CCHASTK) 399 

System Table (CHASYS) • • • • .•••••..... 401 

TBLOCKS CCHATBD f CHATBC f CHATBS f CHATBO) 414 

Task Common CCHATCM) 421 

Terminal Control Table (CHATCT) ••••• 427 

Terminal Device Table (CHATDE) .•••• 430 

Task Data Definition Table (CHATDT) 433 

Task Dictionary Table (CHATDY) .. 441 

Terminal Interrupt Information DSECT ICHATII) •• 449 

Terminal I/O Control Block (CHATIO) 450 

Terminal Access Operational Status Table (CHAT OS) . 453 

Text Editor Transaction Table (CHATRN) 463 

Task Symbolic Device List (CHATS D) • 465 

Task Status Index (CHATSI) and Extended Task Status Index (CHAXTS) . ....... 467 

User Catalog Table (CHAUCT) 478 

Option 4 UFLOW Macro Table (CHAUFN) ............ 479 

User Limit Table Entry CCHAULT) • 480 

User Table (CHAUSE) ...... •••••• 482 

Virtual Program Status Word CCHAVPS) . • •••• 486 

VAM Tape Control Record (CHAVTR) 488 

External Prompt Message Table (CHAXPR1 • ... 491 



iv 



I 



Index of DSECT Names 

CHAAAA ........ 2 

CHAABD H 

CHAACT 5 

CHAAHD . . . . . . . . . 216 

CHAAIR ...... 7 

CHAASA 9 

CHAASB 11 

CHAAST 12 

CHAAUL 15 

CHAAVE 216 

CHABCT 18 

CHABFP 37 

CHABPK 38 

CHABPL 39 

CHABPT 40 

CHABWM 41 

CHABWQ 42 

CHACBH 51 

CHACBT 49 

CHACCB 52 

CHACCC ...... 57 

CHACDS 64 

CHACEP 66 

CHACHL 68 

CHACLH 71 

CHACLK 70 

CHACLQ . 207 

CHACMR 72 

CHACOM ..... ......... 102 

CHACST 104 

CHACTT 301 

CHACUT 106 

CHACVF 108 

CHADAI ....... 109 

CHADAS 169 

CHADBP 113 

CHADCB 120 

CHADCT 141 

CHADEB . 144 

CHADEC 150 

CHADEN 142 

CHADES 324 

CHADEV . 157 

CHADHD 329 

CHADMR ..... ....... 161 

CHADSC 163 

CHADSE ........ . ...... 173 

CHADSF 177 

CHADSV 167 

CHAECW 179 

CHAECX 189 

CHAENT 337 

CHAEPE 331 

CHAERC 193 

CHAERE 197 

CHAERR 199 

CHAET1 ........... . ..... 202 

CHAET2 203 

CHAEXT 204 

CHAFNQ . 205 

CHAFRQ . 207 

CHAGQE 209 

CHAGSM 213 

CHAHED 215 

CHAICB 217 

CHAIDE . 220 

CHAIER 221 

CHAIOP 223 

CHAIOR ....... ... ..... 225 



CHAIQE . . . . . 239 

CHAIRE . . . . ....... 242 

CHAISA 21*3 

CHAISD . . . . . 254 

CHAITB . . . . . 258 

CHALB1 263 

CHALB2 265 

CHALOG . . . . 267 

CHAMAP . • . 447 

CHAMCB • 268 

CHAMCH • • • * • • • • 270 

CHAMEB . / . . . . . . . . 272 

CHAMGL • 273 

CHAMHD ......... ...... 330 

CHAMSW 274 

CHAMTS 277 

CHAMUT 279 

CHANTC 280 

CHAODP . 282 

CHAOER 283 

CHAOFL 285 

CHAOPH 286 

CHAPAT 288 

CHAPCB . 290 

CHAPCT 301 

CHAPDS . 293 

CHAPEC 295 

CHAPFL 299 

CHAPGH 448 

CHAPGT 303 

CHAPLI 306 

CHAPOD 308 

CHAPOE 309 

CHAPOM 309 

CHAPPH 311 

CHAPSA .............. . 313 

CHAPSD 319 

CHAPTH 312 

CHAPVT 321 

CHARDQ 206 

CHARET 323 

CHARHD 326 

CHARJE 333 

CHARQE 334 

CHARQU • 335 

CHARSP 338 

CHARST 340 

CHARTI 341 

CHARWD 324 

CHASAC 342 

CHASAQ 343 

CHASAR 345 

CHASAT 348 

CHASCA . 349 

CHASCB 350 

CHASCH 355 

CHASCM 356 

CHASCN 360 

CHASCT 362 

CHASDA 363 

CHASDE ........ . ........ 372 

CHASDM 372 

CHASDS 370 

CHASDT 374 

CHASET 24 

CHASGT 14 

CHASHD 337 

CHASID 387 

CHASKT 378 

CHASLH 381 

CHASLM 381 



t 



( 



CHASLP . 380 

CHASLX 383 

CHASMC 384 

CHASME 385 

CHASOT 386 

CHASPP 388 

CHASPT 389 

CHASST 392 

CHASTA 394 

CHASTE 396 

CHASTK 399 

CHASYS 401 

CHATBC ............ . ..... 417 

CHATBD 414 

CHATBO 419 

CHATBS 418 

CHATCM 421 

CHATCT 427 

CHATDE . 430 

CHATDH .......... . 447 

CHATDT 433 

CHATDY 441 

CHATII 449 

CHATIO 450 

CHATOS 453 

CHATRN 463 

CHATSD . 465 

CHATSI 467 

CHAUCT 478 

CHAUFN 479 

CHAULT 480 

CHAUSE 482 

CHAVPS 486 

CHAVTC 170 

CHAVTR 488 

CHAWRQ . ....... ......... 206 

CHAXPR ...... 491 

CHAXPT 304 

CHAXSP . ......... 390 

CHAXTS 473 



How To Use This Book 



The description of each control block contains : 

* A description of its use. 

* A storage map. 

* Cross reference lists of fields and their displacements. 

* An assembler listing of its DSECT. 

How to read the storage maps ; 

Decimal and hexadecimal addresses show the relative location of the 
leftmost field boundary. 

Large fields are abbreviated with an equal sign (=) on each side 
of the field. 

The label •UNNAMED" designates explicitly allocated storage fields 
having no field name. 

The label "RESERVED" designates storage not specifically allocated 
(created when storage space is skipped to align the following field 
on a halfword, fullword, or doubleword boundary, or at the address 
specified in an ORG instruction) . 

When storage defined following an ORG instruction does not overlay 
already- defined storage, it is made a part of the main map. If such 
storage does overlay already-defined storage, however, it is shown as 
a separate map. You can compare ORG map fields to other fields 
occupying the same storage space by referring to the addresses shown 
at the left of both maps, or by finding, in the cross reference list 
of displacements, the names of fields with the same storage location. 

How to use the cross reference lists : 

Each control block storage map is followed by two lists of fields 
and their displacements. 

The first list shows all fields in order of displacement. You can 
easily identify all fields occupying the same storage space, and recog- 
nize nearby fields, whether or not they directly precede or follow the 
central field in the source list. Fields equated to other fields or 
locations are marked "(EQU)". 

The second list shows all fields in alphabetical order. You can use 
this list to quickly locate a field in the storage map or in the 
listing. Equates are marked "(EQU)". 

How to use the assembler listing : 

The assembler listing contains the source code for each control block, 
including comments giving the use of the control block and its fields. 
The relative locations of fields are shown under "LOCATION"; the loca- 
tion of fields equated to other fields, and the values of flag mas ks 
are shown under "INSTRUCTION". ORG instructions are boxed — [ ORG I — 
to make them easier to find in long listings. 

For some groups of control blocks, the DSECTs for all the control 
blocks in the group are nested in a single listing following the 
cross reference list for the first control block in the group. 



PROLOG 



TABLEA (CHAAAA) 

TABLEA (CHAAAA) is a command system table which the user can modify. CHAAAA con- 
tains return information work areas for the prompter and dictionary handler, 
CHAAAA resides in virtual storage aligned on word boundaries. 

CHAAAA Storage map 



DEC 




HEX 




144 



400 



90 



190 



912 390 



1424 
1432 



1512 



590 
598 



5E8 



| AAAIPC | 
! 1 


AAASW 


i 


AAALRS | 






AAARSP 


= 




I 

1 








AAADEN 






1 
1 








AAACTT 






1 
1 








AAAOCT 






I 


AAAMOD | 


| AAAMOD 


(CONT) 


1 








AAASAV 




| AAARET J 

1 1 









Fields in CHAAAA — by displacement 



DEC HEX FIELD 
0000 0000 AAAIPC 
0002 0002 AAASW 
0004 0004 AAALRS 
0008 0008 AAARSP 



DEC HEX FIELD 
0148 0094 AAADEN 
0404 0194 AAACTT 
0916 0394 AAAOCT 
1428 0594 AAAMOD 



DEC HEX FIELD 
1436 059C AAASAV 
1512 05E8 AAARET 



Alphabetical list of fields in CHAAAA 



FIELD 


DEC 


HEX 


FIELD 


DEC 


HEX 


FIELD 


DEC 


HEX 


AAACTT 


0404 


0194 


AAAMOD 


1428 


0594 


AAASAV 


1436 


059C 


AAADEN 


0148 


0094 


AAAOCT 


0916 


0394 


AAASW 


0002 


0002 


AAAIPC 


0000 


0000 


AAARET 


1512 


05E8 








AAALRS 


0004 


0004 


AAARSP 


0008 


0008 









2 CHAAAA 



Assembler listing of CHAAAA 



LOCATION INSTRPCTION SOURCE INST OPER COMMENT 
02 00000 CHAAAA DSECT 

* TABLEA - A WORK AREA FOR THE COMMAND SYSTEM 

* THAT CAN BE 

* REFERENCED BY USERS 
02 00000 DS OF 

02 00000 AAAIPC DS PL2 INTERVENTION PREVENTION 

* SWITCH 

02 00002 AAASW DS H ATTENTION SWITCH 

* WORK AREAS FOR USER PROMPTER RETURN 

* INFORMATION. 

* THESE AREAS CONTAIN THE STRING RETURNED FROM A 

* PROMPTER 

* CALL REQUESTING AN UNPREDICTABLE RESPONSE, THEY 

* ARE AVAILABLE 

* TO THE NON- PRIVILEGED PROMPTER CALLER. 

02 00004 AAALRS DS F RESPONSE STRING LENGTH 

02 00008 AAARSP DS 140CL1 RESPONSE STRING 



02 00094 
02 00194 

02 00394 

02 00594 
02 0059C 

02 005E8 



* 
* 
* 

* 
* 

AAADEN 
AAACTT 

* 

AAAOCT 

AAAMOD 
AAASAV 

AAARET 



WORK AREAS FOR RETURN INFORMATION FROM THE 

DICTIONARY 

HANDLERS. THE DICTIONARY HANDLERS (CZASD) MOVE 

THE ENTRY 

LOCATED BY A REF ENTRY IN CHBAA SO THAT THEY 

WILL BE AVAILABLE 

TO A NON -PRIVILEGED CZASD CALLER. THE ENTIRE 

ENTRY IS MOVED. 

SPACE IS PROVIDED FOR A MAX LENGTH ENTRY OF 256 

BYTES. 

DS 256CL1 DICTIONARY ENTRY 

DS 512X INPUT CHARACTER TRANSLATION 

N464 
DS 512X OUTPUT CHARACTER 

TRANSLATION N464 



DS 
DS 

DS 



CL8 
19A 



SAVE AREA FOR NON-PRIV 
DSPTCH N369.2 
RETURN CODE FROM TRASCAN 
N365 



CHAAAA 



Assign BULKIO Device DSECT (CHAABD) 

CHAABD is the message format used by the BULK 10 and Batch Monitor/Operator tasks 
to add to f or delete from those unit record devices assigned to the BULKIO task. The 
message contains one-word entries specifying the Symbolic Device Address of a unit 
record device, and flags indicating whether the device is to be added to or deleted 
from the task. 
Each 4- byte CHAABD entry resides on word boundaries. 

CHAABD Storage map 



DEC 




HEX 



0|ABDFL1 
i 



|ABDFL2 | 

L 



ABDSDA 



± 



Fields in CHAABD — by displacement 



DEC HEX FIELD 



0000 


0000 


ABDADD 


(EQU) 


0000 


0000 


ABDDEL 


CEQU) 


0000 


0000 


ABDEND 


(EQU) 


0000 


0000 


ABDDFL 


(EQU) 



DEC HEX FIELD 
0000 0000 ABDDOR 
0000 0000 ABDDYN 
0000 0000 ABDLOK 
0000 0000 ABDFL1 



DEC HEX FIELD 
(EQU) 0000 0000 ABDTOP 
(EQU) 0001 0001 ABDFL2 
(EQU) 000 2 0002 ABDSDA 

0004 0004 ABDBOT 



Alphabetical list of fields in CHAABD 



FIELD DEC HEX FIELD 

ABDADD 0000 0000 (EQU) ABDDOR 

ABDBOT 0004 0004 ABDDYN 

ABDDEL 0000 0000 (EQU) ABDEND 

ABDDFL 0000 0000 (EQU) ABDFL1 



DEC HEX 



FIELD 



0000 0000 (EQU) ABDFL2 
0000 0000 (EQU) ABDLOK 
(EQU) ABDSDA 



0000 0000 
0000 0000 



ABDTOP 



DEC HEX 

0001 0001 
0000 0000 

0002 0002 
0000 0000 



(EQU) 



Assembler listing of CHAABD 



LOCATION 

03 00000 
03 00000 



INSTRUCTION 
03 00000 



03 00000 

00000080 
03 00000 
00000020 
03 00000 

00000010 
03 00000 

00000008 
03 00000 
00000004 
03 00000 
00000002 
03 00000 
00000001 



03 00001 
03 00002 



03 00004 



00000004 



SOURCE 
CHAABD 
ABDTOP 
ABDFL1 
ABDLOK 
* 

ABDLOKM 

ABDDYN 

ABDDYNM 

ABDDOR 

* 

ABDDORM 

ABDDFL 

* 

ABDDFLM 

ABDEND 

ABDENDM 

ABDDEL 

ABDDELM 

ABDADD 

ABDADDM 

ABDFL2 

ABDSDA 

* 

ABDBOT 
ABDLEN 



INST 

DSECT 

DS 

DS 

EQU 

EQU 
EQU 
EQU 
EQU 

EQU 
EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

DS 

DS 



OPER 

OF 
X 

ABDFL1 

X^O 1 
ABDFL1 
X"20 f 
ABDFL1 

X f 10' 
ABDFL1 

x'os* 

ABDFL1 

X , 04 f 

ABDFL1 

X , 02 i 

ABDFL1 

X'Ol' 

X 

H 



COMMENT 



FIRST FLAG BYTE 

SDAT HAS BEEN LOCKED FOR 

THIS 

DEVICE 

CZAWS CALLED BY CZAWA TO 

DYNAMICALLY RE-ADD DEVICE 

THIS MESSAGE WAS USED BY 

BATCH 

MONITOR TO AWAKEN BULKIO 

DEFAULT - GET ALL AVAILABLE 

UNIT 

RECORD DEVICES 

END OF PARAMETER STRING 

DELETE A DEVICE 

ADD A DEVICE 

SECOND FLAG BYTE 

SDA OF DEVICE TO BE ADDED 

OR 

DELETED 



DS 
EQU 



OF 

ABDBOT-ABDTOP LENGTH OF ENTRY 



4 CHAABD 



Task Accounting and Statistical Data DSECT (CHAACT) 

CHAACT describes an area in the privileged PSECTs of both LOGOFF and ABEND. It 
provides addressability to the work area used for tabulating task accounting data by 
user-provided accounting routines. CHAACT occupies 104 bytes of storage. 

CHAACT Storage map 



DEC 



HEX 



8 


8 


16 


10 


24 


18 


32 


20 


40 


28 


56 


38 


64 


40 


72 


48 


80 


50 


88 


58 


96 


60 



ACTUID 



ACTCHG 



ACTFLG | 



ACTRES1 



ACTPP 



ACTMTD 



ACTRAP 



ACTRES2 



ACTPTA 



ACTAWT 



ACTPIA 



ACTPOA 



ACTMPA 



ACTCON 



Fields in CHAACT — by displacement 



ACTTMP 



ACTDAD 



ACTHSP 



ACTTWT 



ACTTSE 



ACTPIE 



ACTPOE 



ACTCPU 



ACTRES3 



DEC 

0000 

0008 

0016 

0016 

0016 

0016 

0016 

0017 

0020 



HEX 

0000 

0008 

0010 

0010 

0010 

0010 

0010 

0011 

0014 



FIELD 

ACTUID 

ACTCHG 

ACTBCK 

ACTABN 

ACTNCV 

ACTEXB 

ACTFLG 

ACTRES1 

ACTTMP 



DEC 

0024 

0028 

CEQU) 0032 

(EQU) 0036 

(EQU) 0040 

(EQU) 0044 

0056 

0060 

0064 



HEX 

0018 
001C 
0020 
0024 
0028 
002C 
0038 
003C 
0040 



ACTPP 

ACTDAD 

ACTMTD 

ACTHSP 

ACTRAP 

ACTRES2 

ACTPTA 

ACTTWT 

ACTAWT 



DEC 

0068 

0072 

0076 

0080 

0084 

0088 

0092 

0096 

0100 



HEX 

0044 

0048 

004C 

0050 

0054 

0058 

005C 

0060 

0064 



FIELD 

ACTTSE 

ACTPIA 

ACTPIE 

ACTPOA 

ACTPOE 

ACTMPA 

ACTCPU 

ACTCON 

ACTRES3 



Alphabetical list of fields in CHAACT 



FIELD DEC HEX FIELD DEC HEX 

ACTABN 0016 0010 (EQU) ACTHSP 0036 0024 

ACTAWT 0064 0040 ACTMPA 0088 0058 

ACTBCK 0016 0010 (EQU) ACTMTD 0032 0020 

ACTCHG 0008 0008 ACTNCV 0016 0010 

ACTCON 0096 0060 ACTPIA 0072 0048 

ACTCPU 0092 005C ACTPIE 0076 004C 

ACTDAD 0028 001C ACTPOA 0080 0050 

ACTEXB 0016 0010 (EQU) ACTPOE 0084 0054 

ACTFLG 0016 0010 ACTPP 0024 0018 



FIELD DEC HEX 

ACTPTA 0056 0038 

ACTRAP 0040 0028 

ACTRES1 0017 0011 

(EQU) ACTRES2 0044 002C 

ACTRES3 0100 0064 

ACTTMP 0020 0014 

ACTTSE 0068 0044 

ACTTWT 0060 003C 

ACTUID 0000 0000 



CHAACT 



Assembler listing of CHAACT 



LOCATION 


INSTRUCTION 


[ SOURCE 


INST 


OPER 




04 


00000 


CHAACT 


DSECT 




04 00000 








DS 


0D 


04 00000 






ACTUID 


OS 


2F 


04 00008 






ACTCHG 


DS 


2F 


04 00010 






ACTFLG 

* 


DS 


CL1 




04 


00010 


ACTEXB 


EQU 


ACTFLG 




00000001 


ACTEXBM 


EQU 


X f 01 f 




04 


00010 


ACTNCV 


EQU 


ACTFLG 




00000002 


ACTNCVM 

* 

ACTABN 


EQU 


X , 02 f 




04 


00010 


EQU 


ACTFLG 




00000004 


ACTABNM 


EQU 


X , 04 i 




04 


00010 


ACTBCK 


EQU 


ACTFLG 




00000008 


ACTBCKM 
ACTRES1 


EQU 


x^s 1 


04 00011 






DS 


CL3 


04 00014 






ACTTMP 

* 

ACTPP 


DS 


F 


04 00018 






DS 


F 


04 0001C 






ACTDAD 


DS 


F 


04 00020 






ACTMTD 


DS 


F 


04 00024 






ACTHSP 


DS 


F 


04 00028 






ACTRAP 


DS 


F 


04 0002C 






ACTRES2 


DS 


3F 


04 00038 






ACTPTA 


DS 


F 


04 0003C 






ACTTWT 


DS 


F 


04 00040 






ACTAWT 


DS 


F 


04 00044 






ACTTSE 


DS 


F 


04 00048 






ACTPIA 


DS 


F 


04 0004C 






ACTPIE 


DS 


F 


04 00050 






ACTPOA 


DS 


F 


04 00054 






ACTPOE 
ACTMPA 


DS 


F 


04 00058 






DS 


F 


04 0005C 






ACTCPU 


DS 


F 


04 00060 






ACTCON 


DS 


F 


04 00064 






ACTRES3 


DS 


F 




00000068 


ACTLEN 


EQU 


*- ACTUID 



COMMENT 



CURRENT USERID 

CURRENT CHARGE NUMBER 

ACCTING TABLE-TASK TYPE 

FLAG 

EXPRESS BATCH FLAG 

EXPRESS BATCH MASK 

NON-CONVERSATIONAL TASK 

NON-CONVERSATIONAL TASK 

MASK 

CALLED FROM ABEND FLAG 

ABEND CALL MASK 

BACK TASK FLAG 

105594 
BACK TASK MASK 

105594 
RESERVED 

DEVICE-SECOND PRODUCTS: 
TEMPORARY PAGES 
PERMANENT PAGES 
PRIVATE DISK 
PRIVATE TAPE 
PRIVATE PRINTER 
PRIVATE RDR/PUNCH 
RESERVED 
TOTAL NO- AUX. 
PAGES (DRUM+DISK) SNAP 
TOTAL NO. OF TWAITS 
TOTAL NO. OF AWAITS 
TOTAL NO. OF TIME SLICE 
ENDS 

TOTAL PAGE- INS FROM 
AUX (DRUM+DISK) 
TOTAL PAGE- INS FROM EXT. 
STORAGE 

TOTAL PAGE-OUTS TO AUX 
TOTAL PAGE- OUTS TO EXT. 
STORAGE 

MAXIMUM PAGES HELD ON AUX 
DISK 

CPU TIME 

TERMINAL CONNECT TIME 
RESERVED 
TABLE LENGTH 
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ABEND Interlock Release Table (CHAAIR) 

The ABEND Interlock Release Table (AIR) provides information required to reset 
interlocked shared tables to their pre- locked state. The table also contains intern- 
al control data for ABEND. 

The AIR table is open-ended, with no practical limit on the number of entry chains 
it can contain. The entries in AIR are chained together by forward and backward 
links. 

Each entry chain in the AIR table occupies 4096 bytes of virtual storage, aligned 
on doubleword boundaries. 

CHAAIR Storage map 



DEC 


8 

16 

24 

32 



HEX 



0| 

1 


AIRAAP 






AIRMSG | 


8|AIRFG 

1 


|AIRCNT | 
1 1 


AIRRS1 




AIRRS2 | 


10 | 

1 


AIRDS1 






A1RDS2 | 


18| 

1 


AIRBWL 






AIRPTR | 


20 | 

\_ 

1 
1 
1 






AIRINR 





Fields in CHAAIR — by displacement 



DEC HEX FIELD DEC HEX FIELD 

0000 0000 AIRAAP 0008 0008 AIRF1 

0004 0004 AIRMSG 0008 0008 AIRFO 

0008 0008 AIRF7 (EQU) 0008 0008 AIRFG 

0008 0008 AIRF6 (EQU) 0009 0009 AIRCNT 

0008 0008 AIRF5 (EQU) 0010 000A AIRRS1 

0008 0008 AIRF4 (EQU) 0012 000C AIRRS2 

0008 0008 AIRF3 (EQU) 0016 0010 AIRDS1 

0008 0008 AIRF2 (EQU) 0020 0014 AIRDS2 



DEC HEX FIELD 
(EQU) 0024 0018 AIRBWL 
(EQU) 0028 001C AIRPTR 

0032 0020 AIRVCN (EQU) 

0032 0020 AIRINR 

0036 0024 AIRRCN (EQU) 

0040 0028 AIRINF (EQU) 



Alphabetical list of fields in CHAAIR 



FIELD 

AIRAAP 

AIRBWL 

AIRCNT 

AIRDS1 

AIRDS2 

AIRFG 

AIRFO 

AIRF1 



DEC HEX 
0000 0000 
0024 0018 
0009 0009 
0016 0010 
0020 0014 
0008 0008 
0008 0008 
0008 0008 



FIELD 
AIRF2 
AIRF3 
AIRF4 
AIRF5 
AIRF6 
AIRF7 
(EQU) AIRINF 
(EQU) AIRINR 



DEC HEX FIELD 

0008 0008 (EQU) AIRMSG 

0008 0008 (EQU) AIRPTR 

0008 0008 (EQU) AIRRCN 

0008 0008 (EQU) AIRRS1 

0008 0008 (EQU) AIRRS2 

0008 0008 (EQU) AIRVCN 

0040 0028 (EQU) 
0032 0020 



DEC HEX 

0004 0004 

0028 001C 

0036 0024 (EQU) 

0010 000A 

0012 000C 

0032 0020 (EQU) 



CHAAIR 



Assembler listing of CHAAIR 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 






05 


00000 


CHAAIR 


DSECT 




05 


00000 








DS 


0D 


05 


00000 






AIRAAP 


DS 


IF 


05 


00004 






AIRMSG 

♦ 


DS 


IF 


05 


00008 






AIRFG 


DS 


XL1 






05 


00008 


AIRFO 


EQU 


AIRFG 






00000080 


AIRFOM 


EQU 


X^O' 






05 


00008 


AIRF1 


EQU 


AIRFG 






00000040 


AIRF1M 


EQU 


X^O 1 






05 


00008 


AIRF2 


EQU 


AIRFG 






00000020 


AIRF2M 


EQU 


X - 20 f 






05 


00008 


AIRF3 


EQU 


AIRFG 






00000010 


AIRF3M 


EQU 


X'lO' 






05 


00008 


AIRF4 


EQU 


AIRFG 






00000008 


AIRF4M 


EQU 


X 9 0B 9 






05 


00008 


AIRF5 


EQU 


AIRFG 






00000004 


AIRF5M 


EQU 


X , 04 i 






05 


00008 


AIRF6 


EQU 


AIRFG 






00000002 


AIRF6M 


EQU 


X f 02 f 






05 


00008 


AIRF7 


EQU 


AIRFG 






00000001 


AIRF7M 


EQU 


X'01 f 


05 


00009 






AIRCNT 


DS 


X 


05 


0000A 






AIRRS1 


DS 


H 


05 


OOOOC 






AIRRS2 

* 


DS 


IF 


05 


00010 






* 
AIRDS1 


DS 


IF 


05 


00014 






AIRDS2 


DS 


IF 


05 


00018 






AIRBWL 


DS 


IF 


05 


0001C 






AIRPTR 


DS 


IF 


05 


00020 






AIRINR 


DS 


254XL16 






05 


00020 


AIRVCN 


EQU 


AIRINR 






05 


00024 


AIRRCN 


EQU 


AIRINR* 4 






05 


00028 


AIRINF 


EQU 


AIRINR* 8 



COMMENT 



RECOVERY ADDR FOR RECURSIVE 

ABEND 

POINTER TO ABEND ERROR 

MESSAGES 

ABEND FLAGS 

NOT USED 

NOT USED 

NOT USED 

NOT USED 

NOT USED 

NOT USED 

TASK TO BE DELETED 

TASK TO BE DELETED MASK 

SYSOUT CLOSED 

SYSOUT NOT EXIST (NON-CONV) 

PRE-LOGON FLAG 

NOT USED 
NOT USED 

NO OF INTRLK REL ROUTINE 
ENTRIES 

NO OF MSGS ALREADY STACKED 
1ST AVAIABLE BYTE IN MSG 
STRING 

(TO BE USED WITH AIRMSG) 
2ND LEVEL RECURSION ADDRESS 
NOT USED 
BACKWARD LINK 
POINTER TO NEXT AIR TABLE 
AREA FOR INTRLK REL RTN 
ENTRIES 
VCON ADDR 
RCON ADDR 
INFORMATION AREA 



t 
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Auxiliary Storage Allocation Table (CHAASA) , and (CHAASB) 

The Auxiliary Storage Allocation Table (ASAT) describes the availability status of 
ail auxiliary storage devices. 

ASAT functions as a resident bookkeeper and is maintained by the Auxiliary Storage 
Allocation Queue Processor and the Auxiliary Storage Release subroutine. Startup 
will initialize ASAT according to the current auxiliary storage configuration. 

A core storage entry of 176 bytes is allocated to ASAT; the first 16 of these 
bytes contain an overall auxiliary storage device status description, while the next 
160 bytes comprise a drum directory. All other drum and disk directories are chained 
to ASAT f keeping its size fixed. 

CHAASA Storage map 



DEC 


8 

16 

24 

32 

48 



176 



HEX 



| AS ANAM 

1 


IASALOCK | ASATMA 
1 1 


1 

1 


ASAPCT 


1 

1 


ASAFSC | 


8|ASANAK 

1 


| UNNAMED 

1 


1 

1 




ASATKA 




10| 

1 


ASAPOK 


1 

1 




ASAPDM 




18|ASAFL1 

1 


IASANSP | ASANA1 
1 1 


1 

1 


ASANBP 


1 
1 


ASASDA | 


20| 

1 


ASANXH 


1 

1 








1 
1 




ASADS1 




30| 

1 


|ASABS1 IASAMS1 |ASAPS1 | 
1 1 1 1 








1 
1 

1 




ASADS2 





B0| 

L 



Fields in CHAASA — by displacement 



DEC 

0000 

0001 

0002 

0004 

0006 

0008 

0012 



HEX 

0000 

0001 

0002 

0004 

0006 

0008 

O00C 



FIELD 

AS ANAM 

ASALOCK 

ASATMA 

ASAPCT 

ASAFSC 

ASANAK 

ASATKA 



DEC 

0016 

0020 

0024 

0024 

0025 

0026 

0028 



HEX 

0010 

0014 

0018 

0018 

0019 

001A 

001C 



FIELD 

ASAPDK 

ASAPDM 

ASASP 

ASAFL1 

ASANSP 

ASANAl 

ASANBP 



(EQU) 



Alphabetical list of fields in CHAASA 



FIELD 

ASABS1 

AS ADS 1 

ASADS2 

ASAFL1 

ASAFSC 

ASALOCK 

ASAMS1 



DEC HEX 

0049 0031 
0036 0024 
0052 0034 
0024 0018 
0006 0006 
0001 0001 

0050 0032 



FIELD 

ASANAK 

ASANAM 

ASANA1 

ASANBP 

ASANSP 

ASANXM 

ASAPCT 



DEC 

0008 

0000 

0026 

0028 

0025 

0032 

0004 



HEX 

0008 

0000 

001A 

001C 

0019 

0020 

0004 



0030 001E 


ASASDA 


0032 0020 


ASANXM 


0036 0024 


ASADS1 


0049 0031 


ASABS1 


0050 0032 


ASAMS1 


0051 0033 


ASAPS1 


0052 0034 


AS ADS 2 


FIELD 
ASAPDK 


DEC 
0016 


HEX 
0010 


ASAPDM 


0020 


0014 


AS APS 1 


0051 


0033 


ASASDA 


0030 


001E 


ASASP 


0024 


0018 (EQU) 


ASATKA 


0012 


oooc 



ASATMA 0002 0002 



CHAASA 



Assembler listing of CHAASA 



LOCATION 


INSTRUCTION 


! SOURCE 


INST 


OPER 




06 


00000 


CHAASA 


DSECT 




06 00000 






ASANAM 


DS 


XUL 


06 00001 






ASALOCK 


DS 


XL1 


06 00002 






ASATMA 


DS 


H 


06 00004 






ASAPCT 


DS 


H 


06 00006 






ASAFSC 


DS 


H 


06 00008 






ASANAK 


DS 


XL1 


06 00009 








DS 


XL3 


06 0000C 






ASATKA 


DS 


F 


06 00010 






ASAPDK 


DS 


F 


06 00014 






ASAP DM 


DS 


F 


06 00018 






ASAFL1 


DS 


XL1 




06 


00018 


AS ASP 


EQU 


ASAFL1 




00000080 


ASASPM 


EQU 


X , 80 t 


06 00019 






ASANSP 


DS 


CL1 


06 0001A 






ASANA1 


DS 


H 


06 0001C 






ASANBP 

♦ 


DS 


H 


06 0001E 






ASASDA 


DS 


H 


06 00020 






ASANXM 


DS 


F 


06 00024 






AS ADS 1 


DS 


XL13 


06 00031 






ASABS1 


DS 


XL1 


06 00032 






ASAMS1 

♦ 


DS 


XL1 


06 00033 






ASAP SI 


DS 


XL1 


06 00034 






ASADS2 


DS 


8XL16 



COMMENT 

AUXILIARY STORAGE 

ALLOCATION TABLE - ASAT 

NUMBER OF AUXILARY DRUMS 

TEST AND SET LOCK BYTE FOR 

ASAT 

TOTAL AUXILIARY DRUM PAGES 

AVAILABLE 

LOW DRUM AVAILABILITY 

THRESHOLD 

INITIAL DRUM PAGES 

AVAILABLE 

NUMBER OF AUXILIARY DISKS 

RESERVED 

TOTAL AUXILIARY DISK PAGES 

AVAILABLE 

POINTER TO DISK FROM WHICH 

TO ASSIGN PAGES 

POINTER TO DRUM FROM WHICH 

TO ASSIGN PAGES 

FLAG BYTE 1 

SUPPRESS ALLOCATION ON THIS 

DEVICE 

1 - SUPPRESS 

NEXT SLOT POINTER 

NUMBER OF PAGES AVAILABLE 

ON THIS DRUM 

NUMBER OF BAD PAGES ON THIS 

DEVICE 

SYMBOLIC DEVICE ADDRESS OF 

THIS DRUM 

POINTER TO NEXT DRUM IN 

CHAIN 

BIT DIRECTORY - SLOT 1 

BYTE NO. FROM WHICH TO 

ASSIGN PAGES IN SLOT 

MASK -BIT NO- FROM WHICH TO 

LOOK FOR AVAIL PGS 

NUMBER OF PAGES AVAILABLE 

WITHIN SLOT 

BIT DIRECTORY - SLOTS 2-9 



t 
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CHAASB Storage map 



dec 



8 

16 



208 



408 



HEX 



0| 


ASBNBP 


[ASBFL1 (ASBBIP | 
1 1 1 


ASBBYP 


1 


ASBAVP | 


8| 


ASBNBD 


| ASBDEV | 
1 1 




ASBCHA 




101 




ASBCNT 






= 


DO) 


I 1 
I I 






ASBBIT 








198| 


I 

1 





Fields in CHAASB — by displacement 



DEC HEX FIELD 
0000 0000 ASBNBP 
0002 0002 ASBSP 

0002 0002 ASBFL1 

0003 0003 ASBBIP 



DEC HEX FIELD 

0004 0004 ASBBYP 

CEQU) 0006 0006 ASBAVP 

0008 0008 ASBNBD 

0010 000A ASBDEV 



DEC HEX FIELD 
0012 00 OC ASBCHA 
0016 0010 ASBCNT 
0215 00D7 ASBBIT 



Alphabetical list of fields in CHAASB 



FIELD 

ASBAVP 

ASBBIP 

ASBBIT 

ASBBYP 



DEC HEX 
0006 0006 

0003 0003 
0215 00D7 

0004 0004 



FIELD 

ASBCHA 

ASBCNT 

ASBDEV 

ASBFL1 



DEC HEX 
0012 000C 
0016 0010 
0010 000A 
0002 0002 



FIELD DEC HEX 

ASBNBD 0008 0008 

ASBNBP 0000 0000 

ASBSP 0002 0002 (EQU) 



Assembler listing of CHAASB 

LOCATION INSTRUCTION 
07 00000 



SOURCE 



INST OPER 
DSECT 



CHAASB 

* 

* DEFINITION FOR 2311 

* STORAGE ALLOCATION 



07 00000 






ASBNBP 


DS 


H 


07 00002 






ASBFL1 


DS 


XL1 




07 


00002 


ASBSP 


EQU 


ASBFL1 




00000080 


ASBSPM 


EQU 


X f 80 f 


07 00003 






ASBBIP 


DS 


XL1 


07 00004 






ASBBYP 


DS 


H 


07 00006 






ASBAVP 


DS 


H 


07 00008 






ASBNBD 


DS 


H 


07 O0O0A 






ASBDEV 


DS 


H 


07 0000C 






ASBCHA 


DS 


F 


07 00010 






ASBCNT 


DS 


XL199 


07 000D7 






ASBBIT 

* 


DS 


XL199 



COMMENT 

BIT DIRECTORY FOR AUXILIARY 
2311 DISK 
BIT DIRECTORY FOR AUXILIARY 

NUMBER OF BAD PAGES ON THIS 

DEVICE 

FLAG BYTE 1 

SUPPRESS ALLOCATION CN THIS 

DEVICE 

1 - SUPPRESS 

BIT POINTER FROM WHICH TO 

LOOK FOR AVAIL PAGE 

BYTE NUMBER FROM WHICH TO 

LOOK FOR AVAIL PAGE 

BINARY NUMBER OF PAGES 

AVAILABLE ON THIS DISK 

BINARY NUMBER OF BYTES IN 

DIRECTORY - X , 00C7 t 

SYMBOLIC DEVICE ADDRESS OF 

THIS DISK 

POINTER TO NEXT DISK BIT 

DIRECTORY 

CYLINDER COUNT OF PAGES 

AVAILABLE 

AVAILABILITY BITS - ONE BIT 

FOR EACH PAGE NO. 
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Auxiliary Segment Table (CHAAST) and Segment Table (CHASGT) 



The Auxiliary Segment Table (AST) contains information concerning segment entries 
assigned to a task's virtual storage area. The AST is directly preceded by the SGT, 
aligned on full word boundaries in core storage (128-32,768 bytes). 

The Segment Table (SGT) entry maintains the length, origin, and availability of a 
page table. The Segment Table is a contiguous list of SGT entry groups. Each group 
contains sixteen 4-byte entries. A maximum of 4096 entries is allowed the user. The 
SGT (64- 16,384 bytes) resides in core storage in a task f s External Task Status Index 
(XTSI) . The SGT is aligned on fullword boundaries. 



i 



CHAAST Storage map 



DEC 




HEX 
Of 
I. 



ASTDA 



IASTN 



|ASTU 



I ASTM 



IASTF 



Fields in CHAAST — by displacement 

DEC HEX FIELD 

0000 0000 ASTDA 

0004 0004 ASTSPT (EQU) 

0004 0004 ASTN 

0005 0005 ASTU 

0006 0006 ASTPPS (EQU) 



DEC HEX FIELD 
0006 0006 ASTDKP 

0006 0006 ASTM 

0007 0007 ASTA 
0007 0007 ASTSE 
0007 0007 ASTTA 



DEC HEX FIELD 

(EQU) 0007 0007 ASTS (EQU) 

0007 0007 ASTP (EQU) 

(EQU) 0007 0007 ASTV (EQU) 



(EQU) 

(EQU) 



0007 0007 ASTF 



Alphabetical list of fields in CHAAST 



FIELD 

ASTA 

ASTDA 

ASTDKP 

ASTF 

ASTM 



DEC HEX FIELD 

0007 0007 (EQU) ASTN 
0000 0000 ASTP 

0006 0006 (EQU) ASTPPS 

0007 0007 ASTS 



0006 0006 



ASTSE 



DEC HEX FIELD 
0004 0004 ASTSPT 

0007 0007 (EQU) ASTTA 

0006 0006 (EQU) ASTU 

0007 0007 (EQU) ASTV 
0007 0007 (EQU) 



DEC HEX 

0004 0004 (EQU) 
0007 0007 (EQU) 

0005 0005 

0007 0007 (EQU) 



Assembler listing of CHAAST 



LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 




08 


00000 


CHAAST 


DSECT 




08 00000 








DS 


OF 


08 00000 






ASTDA 

* IF THE 


DS 


F 








SEGMENT IS NOT 








* OFF) , 


ASTDA 










* CONTAINS THE 


SEGMENT 1 








* IS THE 

* 
ASTN 


FIRST 




08 00004 






DS 


XL1 




08 


00004 


ASTSPT 


EQU 


ASTN 


08 00005 






ASTU 


DS 


XL1 


08 00006 






ASTM 


DS 


X 




08 


00006 


ASTDKP 


EQU 


ASTM 




00000080 


ASTDKPM 


EQU 


X'80 t 




08 


00006 


ASTPPS 


EQU 


ASTM 




00000040 


ASTPPSM 


EQU 


X^O' 


(Listing 


of 


CHAAST 


continued 


on pag 


e 13) 



COMMENT 

AUXILIARY SEGMENT TABLE 

PAGE TABLE EXTERNAL 
LOCATION 
THE FIRST ON A PTP (ASTSEM 

NUMBER OF THE SEGMENT THAT 

ON THE PAGE TABLE PAGE 

IN-USE PAGE COUNT 

IF SHARED SEGMT, BYTES 4-5 

SPT NUMBER 

UNUSED PAGE COUNT 

FLAG BYTE 

N470 
DISK PREFERENCE FLAG 

N470 
DISK PREFERENCE MASK 

N470 
PRE-PAGE SET PTP FLAG 

N470 
PRE-PAGE SET PTP MASK 
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(Listing of CHAAST continued from page 12) 



LOCATION INSTRUCTION 


SOURCE 


INST 


OPER 


08 00007 

08 00007 


ASTF 
ASTV 


DS 
EQU 


XL1 
ASTF 


00000080 
08 00007 


ASTVM 
ASTP 


EQU 
EQU 


X^O' 
ASTF 


ooooooao 

08 00007 


ASTPM 
ASTS 


EQU 
EQU 


X f 40 f 
ASTF 


00000010 
08 00007 
00000008 


ASTSM 
ASTTA 
ASTTAM 


EQU 
EQU 
EQU 


ASTF 

x^s^ 


08 00007 


ASTSE 

* 


EQU 


ASTF 


00000002 
08 00007 
00000001 


ASTSEM 

ASTA 

ASTAM 


EQU 
EQU 
EQU 


X , 02 < 

ASTF 

X^l - 



COMMENT 

N470 
FLAG BYTE 

VARIABLE LENGTH SEGMENT 
FLAG l=ON 

PAGE TABLE IN ANOTHER XTSI 
PG. l=ON 

SHARED SEGMENT 
1=SHARED 

TEMPORARY AUXILIARY STORAGE 
1=AUXILIARY 0=EXTERNAL FOR 
SHARED PAGES ONLY N470 
FIRST PT IN A PT PAGE 
N470 

SEGMENT ASSIGNED 1=ASSIGNED 
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CHASGT Storage map 

DEC HEX 

OiSGTPTL | SGTPTO | J 

I I I * 

Fields in CHASGT — by displacement 

DEC HEX FIELD DEC HEX FIELD DEC HEX FIELD 

0000 0000 SGTPTL 0000 0000 SGTSTE 0001 0001 SGTPTO 

0003 0003 SGTPA (EQU) 

Alphabetical list of fields in CHASGT 

FIELD DEC HEX FIELD DEC HEX FIELD DEC HEX 
SGTPA 0003 0003 (EQU) SGTPTL 0000 0000 SGTPTO 0001 0001 

SGTSTE 0000 0000 

Assembler listing of CHASGT 

LOCATION INSTRUCTION SOURCE INST OPER COMMENT 

89 00000 CHASGT DSECT SEGMENT TABLE ENTRY 

89 00000 SGTSTE DS OF SEGMENT TABLE ENTRY 

89 00000 SGTPTL DS C PAGE TABLE LENGTH 

89 00001 SGTPTO DS CL3 

♦BITS 8-19 - CONTAINS THE CORE BLOCK ADDRESS OF THE 

♦PAGE IN WHICH 

♦ THE PAGE TABLE FOR THE SEGMENT RESIDES 

♦ IF THE TASK IS 

♦ IN THE WALL AND NOT IN TIME SLICE END. 

♦ OTHERWISE IT 

♦ CONTAINS THE IDENTIFICATION OF THE 

♦ PAGE TABLE PAGE IN 

♦ WHICH THE PAGE TABLE RESIDES 
♦BITS 20-30- ALWAYS CONTAINS THE OFFSET OF THE 
♦PARTICULAR PAGE 

♦ TABLE IN THE PAGE TABLE PAGE. NOTE- THE 

♦ ENTRIES ARE 

♦ ON HALF WORD BOUNDARIES. 
♦BIT 31 - DENOTES PAGE TABLE AVAILABILITY 

89 00003 SGTPA EQU SGTPTO+2 PAGE TABLE AVAILABILITY 

♦ FLAG 

00000001 SGTPAM EQU 1 PAGE TABLE AVAILABLE MASK 
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Active User Table Entry (CHAAUL) 

The Active User Table contains one entry C CHAAUL) for each active user ID in the 
system. CHAAUL entries are built by the RCR OPEN macro. 

The 112- byte CHAAUL entries reside in virtual storage aligned on doubleword 
boundaries. 

CHAAUL Storage map 



DEC 


8 

16 

24 

32 

40 

48 

56 

64 

72 

80 

96 

104 



HEX 



01 


AULLCK 


|AULF1 |AULF2 

1 I 


| AULF3 | 
I 1 


AULTID 


1 

I 


AULTMID 


8| 


AULUID 


10 


AULCHG 


18| 




AULUTB 


1 

1 




AULTLC 




20 




AULTLC (CONT> 


I 

» 




AULP01 




28| 




AULP02 


i 

1 




AULP03 




30 




AULP04 


1 

1 




AULP05 




38| 




AULP06 


1 

I 




AUL05 




40 




AUL06 


I 

1 




AUL07 




48| 




AUL08 


1 

1 




AUL09 




50 




AUL10 


I 

» 














AULINS 




60 


1 




AULBCK 




68 






AULON 









Fields in CHAAUL — by displacement 



DEC 


HEX 
0000 


FIELD 




DEC 
0008 


HEX 
0008 


FIELD 


DEC 
0060 


HEX 
003C 


FIELD 


0000 


AULLCK 


AULUID 


AUL05 


0001 


0001 


AULMEF 


(EQU) 


0016 


0010 


AULMEPTR 


(EQU) 0064 


0040 


AUL06 


0001 


0001 


AULNCV 


(EQU) 


0016 


0010 


AULCHG 


0068 


0044 


AUL07 


0001 


0001 


AULCP 


CEQU) 


0024 


0018 


AULUTB 


0072 


0048 


AUL08 


0001 


0001 


AULCV 


(EQU) 


0028 


001C 


AULTLC 


0076 


004C 


AUL09 


0001 


0001 


AULPRM 


CEQU) 


0036 


0024 


AULP01 


0080 


0050 


AUL10 


0001 


0001 


AULF1 




0040 


0028 


AULP02 


0084 


0054 


AULINS 


0002 


0002 


AULF2 




0044 


002C 


AULP03 


0100 


0064 


AULBCK 


0003 


0003 


AULF3 




0048 


0030 


AULP04 


0104 


0068 


AULON 


0004 


0004 


AULTID 




0052 


0034 


AULP05 








0006 


0006 


AULTMID 




0056 


0038 


AULP06 









Alphabetical list of fields in CHAAUL 



FIELD 


DEC 


HEX 




FIELD 


DEC 


HEX 




FIELD 


DEC 


HEX 


AULBCK 


0100 


0064 




AULNCV 


0001 


0001 


(EQU) 


AULTMID 


0006 


0006 


AULCHG 


0016 


0010 




AULON 


0104 


0068 




AULUID 


0008 


0008 


AULCP 


0001 


0001 


(EQU) 


AULPRM 


0001 


0001 


(EQU) 


AULUTB 


0024 


0018 


AULCV 


0001 


0001 


(EQU) 


AULP01 


0036 


0024 




AUL05 


0060 


003C 


AULF1 


0001 


0001 




AULP02 


0040 


0028 




AUL06 


0064 


0040 


AULF2 


0002 


0002 




AULP03 


0044 


002C 




AUL07 


0068 


0044 


AULF3 


0003 


0003 




AULP04 


0048 


0030 




AUL08 


0072 


0048 


AULINS 


0084 


0054 




AULP05 


0052 


0034 




AUL09 


0076 


004C 


AULLCK 


0000 


0000 




AULP06 


0056 


0038 




AUL10 


0080 


0050 


AULMEF 


0001 


0001 


(EQU) 


AULTID 


0004 


0004 










AULMEPTR 


0016 


0010 


(EQU) 


AULTLC 


0028 


001C 
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Assembler listing of CHAAUL 



LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 


COMMENT 






09 


00000 


CHAAUL 


DSECT 






*********************************************************************** 


♦ 










ACTIVE USER TABLE * 


* 




THIS DSECT 


DESCRIBES 


THE ENTRIES OF THE ACTIVE USER TABLE. * 


♦ 


THESE 


ENTRIES WILL BE LOCATED IN 


SHARED 


VIRTUAL MEMORY. THERE WILL* 


* 


BE ONE ENTRY FOR 


EACH ACTIVE USER ID IN 


THE SYSTEM. THE ENTRIES * 


* 


ARE BUILT BY THE 


RCR OPEN 


MACRO, 


EACH ENTRY IS A FIXED LENGTH OF * 


* 


6^ BYTES, 








♦ 


09 


00000 








DS 


0D 








00000124 


AULMNE 


EQU 


8*4096/112 MAXIMUM NUMBER OF ENTRIES 


09 


00000 






AULLCK 


DS 


XL1 


LOCK AND ACTIVE BYTE 


09 


00001 






AULF1 


DS 


XL1 


FLAG BYTE 






09 


00001 


AULPRM 

* 


EQU 


AULF1 


PRIMARY ENTRY/CREATED BY 
CZAFM 






00000080 


AULPRMM 


EQU 


X'80 f 


PRIMARY ENTRY MASK 






09 


00001 


AULCV 

* 


EQU 


AULF1 


CONVERSATIONAL TASK ENTRY 
FLAG 






00000008 


AULCVM 


EQU 


x'os 1 


CONVERSATIONAL TASK ENTRY 










♦ 






MASK 






09 


00001 


AULCP 


EQU 


AULF1 


CONVERSATIONAL PRIMARY 
ENTRY/CREATED 






00000088 


AULCPM 


EQU 


X'88 1 


ENTRY IS CONVERSATIONAL 










* 






/BY CZAFM 






09 


00001 


AULNCV 


EQU 


AULF1 


NON- CONVERSATIONAL TASK 
FLAG 






00000004 


AULNCVM 


EQU 


X , 04" 


NON- CONVERSATIONAL TASK 










♦ 






MASK 






09 


00001 


AULMEF 

* 


EQU 


AULF1 


FLAG INDICATES NEW SDST 
MEMBR NTRY CREATED 103941 






0000005C 


AULMEFM 


EQU 


X'SC 1 


BY SRCHSDST AND SUBSEQUENT 










♦ 






VMA FAILURE 103941 


09 


00002 






AULF2 


DS 


XL1 


FLAG BYTE 


09 


00003 






AULF3 


DS 


XL1 


FLAG BYTE 


09 


00004 






AULTID 


DS 


H 


TASK ID 


09 


00006 






AULTMID 


DS 


H 


TERMINAL ID OR ZEROES 


09 


00008 






AULUID 


DS 


CL8 


USERID 


09 


00010 






AULCHG 


DS 


CL8 


CHARGE NUMBER 






09 


00010 


AULMEPTR 

* 


: EQU 


AULCHG 


OVERLAY FOR SDST MEMBR NTRY 
ADDR IN CASE 103941 
OF GETSMAIN-VMA FAILURE 
RECOVERY 103941 


09 


00018 






AULUTB 


DS 


F 


POINTER TO USER ENTRY 


09 


0001C 






AULTLC 

* 


DS 


2F 


TIME LAST CHANGED 
155. 7N 


09 


00024 






AULP01 

* 


DS 


F 


TASK TEMPORARY PAGE PRODUCT 
155. 7N 


09 


00028 






AULP02 

* 


DS 


F 


PERMANENT PAGE PRODUCT (FOR 
EASE OF 

IMPLEMENTATION ONLY) 
155. 7N 


09 


0002C 






AULP03 


DS 


F 


TASK DIRECT ACCESS PRODUCT 
155. 7N 


09 


00030 






AULP04 

* 


DS 


F 


TASK MAG. TAPE PRODUCT 
155. 7N 


09 


00034 






AULP05 

* 


DS 


F 


TASK PRINTER PRODUCT 
155. 7N 


09 


00038 






AULP06 

* 


DS 


F 


TASK RDR/PU PRODUCT 
155. 7N 


09 


0003C 






AUL05 


DS 


F 


TASK TEMPORARY PAGE ACCUM. 



t 



(Listing of CHAAUL continued on page 17) 



16 CHAAUL 



(Listing of CHAAUL continued from page 16) 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 


09 00040 




AUL06 

* 


DS 


F 


09 00044 




AUL07 


DS 


F 


09 00048 




AUL08 


DS 


F 


09 0004C 




AUL09 


DS 


F 


09 00050 




AUL10 


DS 


F 


09 00054 




AULINS 


DS 


CL16 


09 00064 




AULBCK 


DS 


F 


09 00068 




AULON 


DS 


CL8 




00000070 


AULLEN 


EQU 


*- CHAAUL 



COMMENT 

155-7N 
TASK PERM, PAGE ACCUM. (FOR 
EASE OF 
IMPLEMENTATION ONLY) 

155. 7N 
DIRECT ACCESS DRIVES-THIS 
TASK 155.7N 
MAGNETIC TAPE DRIVES -THIS 
TASK 

HIGH SPEED PRINTERS -THIS 
TASK 

READER/PUNCH -THIS 

TASK 

INSTALLATION DATA 
BACKED TASK f S CONNECT TIME 

105594 
TIME TASK LOGGED ON 
LENGTH OF ENTRY 
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BULKIO Table (CHABCT and CHASET) 



The BULKIO Table, used by Batch Monitor to schedule BULKIO requests, contains a 
header (CHABCT), and one or more S-entries (CHASET). 

BULKOMM table (CHABCT), the BULKIO table header, contains header fields, S-entry 
allocation length, the total length of the BULKIO table, and information used for 
public VAM BULKIO functions. 

A maximum of nine S-entries (CHASET) can follow the common header. Each S-entry 
describes a device/job entry residing in the BULKOMM csect (CHBBCT) . The first entry 
immediately follows the header. Subsequent entries are contiguous. CHASET contains 
control information for a system defined unit record device, as well as information 
for a BULKIO job performed on that device. 

The 8192-byte CHABCT resides on word boundaries. Each 8 00-byte CHASET resides on 
doubleword boundaries within CHABCT. 



i 



CHABCT Storage map 



DEC 



HEX 



8 


8 


16 


10 


2U 


18 



56 38 



88 58 



120 


78 


128 


80 


136 


88 


mn 


90 


152 


98 



216 



D8 



BCTCNT 




I 

1 


BCTFUL | BCTNSR | 


BCTLPS | 




BCTSET 




| BCTTIM | 


BCTDEF | 


BCTSOI 




1 
I 


BCTUN1 |BCTFL1 | BCTFL2 | 
i 1 1 


BCTNTA | 


BCTNOT 




! 


BCTFLT | 












BCTUN2 






i 

I 




BCTLRT 












i 
.1 




BCTLET 












I 

i 


BCTUN3 | BCTRUS | 
» 1 


BCTEUS | 


BCTBIO | BCTAKT 
f 


| BCTALM 

I 


| BCTARK | BCTPCT 
I 1 






BCTPRT 




| BCTCONT 




BCTCALL | 


BCTARE 


BCTILK 




| BCTLOK 
1 


[BCTBSNL | BCTBSN 
i 1 





(CHABCT continued on page 19) 



18 CHABCT 



CCHABCT continued from page 18) 



DEC 
224 



424 



440 



HEX 



E0| 








BCTAKD 




1A8 


BCTFL3 


1 
i 




BCTRSV 










1B8 






UNNAMED 


i 
1 


BCTALL 



ORG 


BCTLRT 
3A 






















58 




BCTL1F 






BCTL2R 




BCTL3R | 


64 


40| 
1 


BCTL4R 




BCTL5F 


i 




BCTL6R 




BCTL7R | 


72 


48| 


BCTL8R 




BCTL9B 






BCTLAR 




BCTLBR | 


80 


501 

1 


BCTLCR 




BCTLDF 


i 




BCTLER 




BCTLFR | 


88 


58| 
1 


BCTLGR 


















ORG 


BCTLET 
5A 








90 




BCTL1E 




BCTL2E 




BCTL3E | 


96 


60| 


BCTL4E 




BCTL5E 




BCTL6E 




1 BCTL7E | 


104 


68) 

\ 


BCTL8E 




BCTL9E 




BCTLAE 




1 BCTLBE | 


112 


701 

I 


BCTLCE 




BCTLDE 




BCTLEE 




i BCTLFE | 


120 


781 
1 


BCTLGE 


Bment 
















Fields 


in CHABCT 


— by displace 






DEC 


HEX 


FIELD 




DEC 


HEX 


FIELD 




DEC 


HEX 


FIELD 




0000 


0000 


BCTCNT 




0028 


001C 


BCTUN2 




0104 


0068 


BCTL8E 




0000 


0000 


BCTHED 




0058 


003A 


BCTL1R 




0106 


006A 


BCTL9E 




0002 


0002 


BCTFUL 




0058 


003A 


BCTLRT 




0108 


006C 


BCTLAE 




0004 


0004 


BCTNSR 




0060 


003C 


BCTL2R 




0110 


006E 


BCTLBE 




0006 


0006 


BCTLPS 




0062 


003E 


BCTL3R 




0112 


0070 


BCTLCE 




0008 


0008 


BCTSET 




0064 


0040 


BCTL4R 




0114 


0072 


BCTLDE 




0012 


oooc 


BCTTIM 




0066 


0042 


BCTL5R 




0116 


0074 


BCTLEE 




0014 


000E 


BCTDEF 




0068 


0044 


BCTL6R 




0118 


0076 


BCTLFE 




0016 


0010 


BCTSOI 




0070 


0046 


BCTL7R 




0120 


0078 


BCTLGE 




0018 


0012 


BCTUN1 




0072 


0048 


BCTL8R 




0122 


007 A 


BCTUN3 




0020 


0014 


BCTABN 


(EQU) 


0074 


004A 


BCTL9R 




0124 


007C 


BCTRUS 




0020 


0014 


BCTIIP 


(EQU) 


0076 


004C 


BCTLAR 




0126 


007E 


BCTEUS 




0020 


0014 


BCTBHS 


(EQU) 


0078 


004E 


BCTLBR 




0128 


0080 


BCTBIO 




0020 


0014 


BCTINP 


(EQU) 


0080 


0050 


BCTLCR 




0129 


0081 


BCTAKT 




0020 


0014 


BCTBTO 


(EQU) 


0082 


0052 


BCTLDR 




0130 


0082 


BCTALM 




0020 


0014 


BCTOTB 


(EQU) 


0084 


0054 


BCTLER 




0131 


0083 


BCTARK 




0020 


0014 


BCTDOR 


(EQU) 


0086 


0056 


BCTLFR 




0132 


0084 


BCTPCT 




0020 


0014 


BCTINI 


(EQU) 


0088 


0058 


BCTLGR 




0136 


0088 


BCTPRT 




0020 


0014 


BCTFL1 




0090 


005A 


BCTL1E 




0140 


008C 


BCTCONT 




0021 


0015 


BCTWRK 


(EQU) 


0090 


005A 


BCTLET 




0144 


0090 


BCTCALL 




0021 


0015 


BCTICO 


(EQU) 


0092 


005C 


BCTL2E 




0152 


0098 


BCTARE 




0021 


0015 


BCTASY 


(EQU) 


0094 


005E 


BCTL3E 




0216 


O0D8 


BCTILK 




0021 


0015 


BCTFL2 




0096 


0060 


BCTL4E 




0218 


00DA 


BCTLOK 




0022 


0016 


BCTNTA 




0098 


0062 


BCTL5E 




0219 


O0DB 


BCTBSNL 




0024 


0018 


BCTNOT 




0100 


0064 


BCTL6E 




0220 


00DC 


BCTBSN 




0026 


001A 


BCTFLT 




0102 


0066 


BCTL7E 




0224 


00E0 


BCTAKD 




(Continued on page 


20) 
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(Continued from page 19) 





DEC HEX 


FIELD 




DEC HEX 


FIELD 


DEC HEX 


FIELD 




0424 01A8 BCTWIE 


(EQU) 


0425 01A9 BCTRSV 


044 8 01C0 BCTENT 




424 01A8 BCTFL3 




0444 01BC BCTALL 


0448 01C0 BCTLST 


All 


>habetical list of 


fields in 


CHABCT 














FIELD 


DEC 


HEX 




FIELD 


DEC 


HEX 


FIELD 


DEC 


HEX 




BCTABN 


0020 


0014 


(EQU) 


BCTILK 


0216 


00D8 


BCTL4E 


0096 


0060 




BCTAKD 


0224 


00E0 




BCTINI 


0020 


0014 


(EQU) BCTL4R 


0064 


0040 




BCTAKT 


0129 


0081 




BCTINP 


0020 


0014 


(EQU) BCTL5E 


0098 


0062 




BCTALL 


0444 


01BC 




BCTLAE 


0108 


006C 


BCTL5R 


0066 


0042 




BCTALM 


0130 


0082 




BCTLAR 


0076 


004C 


BCTL6E 


0100 


0064 




BCTARE 


0152 


0098 




BCTLBE 


0110 


006E 


BCTL6R 


0068 


0044 




BCTARK 


0131 


0083 




BCTLBR 


0078 


004E 


BCTL7E 


0102 


0066 




BCTASY 


0021 


0015 


(EQU) 


BCTLCE 


0112 


0070 


BCTL7R 


0070 


0046 




BCTBHS 


0020 


0014 


(EQU) 


BCTLCR 


0080 


0050 


BCTL8E 


0104 


0068 




BCTBIO 


0128 


0080 




BCTLDE 


0114 


0072 


BCTL8R 


0072 


0048 




BCTBSN 


0220 


OODC 




BCTLDR 


0082 


0052 


BCTL9E 


0106 


006A 




BCTBSNL 


0219 


OODB 




BCTLEE 


0116 


0074 


BCTL9R 


0074 


004A 




BCTBTO 


0020 


0014 


(EQU) 


BCTLER 


0084 


0054 


BCTNOT 


0024 


0018 




BCTCALL 


0144 


0090 




BCTLET 


0090 


005A 


BCTNSR 


0004 


0004 




BCTCNT 


0000 


0000 




BCTLFE 


0118 


0076 


BCTNTA 


0022 


0016 




BCTCONT 


0140 


008C 




BCTLFR 


0086 


0056 


BCTOTB 


0020 


0014 (EQU) 




BCTDEF 


0014 


000E 




BCTLGE 


0120 


0078 


BCTPCT 


0132 


0084 




BCTDOR 


0020 


0014 


(EQU) 


BCTLGR 


0088 


0058 


BCTPRT 


0136 


0088 




BCTENT 


0448 


01C0 




BCTLOK 


0218 


OODA 


BCTRSV 


0425 


01A9 




BCTEUS 


0126 


007E 




BCTLPS 


0006 


0006 


BCTRUS 


0124 


007C 




BCTFLT 


0026 


00 1A 




BCTLRT 


0058 


003A 


BCTSET 


0008 


0008 




BCTFL1 


0020 


0014 




BCTLST 


0448 


01C0 


BCTSOI 


0016 


0010 




BCTFL2 


0021 


0015 




BCTL1E 


0090 


005A 


BCTTIM 


0012 


oooc 




BCTFL3 


0424 


01A8 




BCTL1R 


0058 


003A 


BCTUN1 


0018 


0012 




BCTFUL 


0002 


0002 




BCTL2E 


0092 


005C 


BCTUN2 


0028 


001C 




BCTHED 


0000 


0000 




BCTL2R 


0060 


003C 


BCTUN3 


0122 


007A 




BCTICO 


0021 


0015 


(EQU) 


BCTL3E 


0094 


005E 


BCTWIE 


0424 


01A8 (EQU) 




BCTIIP 


0020 


0014 


(EQU) 


BCTL3R 


0062 


003E 


BCTWRK 


0021 


0015 (EQU) 


Assembler listinq of 


CHABCT 


















LOCATION 


INSTRUCTION SOURCE INST OPER 


COMMENT 










OA 00000 


CHABCT DSECT 












* 
* 
* 
* 


************************************************************** 




* 
* 


CHABCT, THE 


DSECT OF 


THE BULKCOMM TABLE CSECT 


CHBBCT * 




************************************************************** 










* 








ENTRY CHBBIO 








0A 00000 






BCTHED DS 


OD 




START OF BULKCOMM 


TABLE 










* 








M03481 








0A 00000 






BCTCNT DS 


H 




NUMBER OF FULL 












* 








S-ENTRIES/NOT DELETED 




0A 00002 






BCTFUL DS 


H 




NUMBER OF FULL OUTPUT 










♦ 








S-ENTRIES 








0A 00004 






BCTNSR DS 


H 




NUMBER OF ACTIVE ! 


3 ENTRIES 










* 








(I.E., 














* 








ASSIGNED AND 


NOT HALTED). 




0A 00006 






BCTLPS DS 


H 




LAST-USED SEQUENCE NUMBER 










* 








NNNN FOR 














♦ 








SYSINNNN USER SYSIN 










* 








DATASET NAME 


• 






OA 00008 






BCTSET DS 


A 




ADDRESS OF LAST S- 


-ENTRY IN 










* 








CONTROL 








0A 0O00C 






BCTTIM DS 


H 




BIO BASE (CYCLE) TIME (CS ECS) 










* 








N319.37 








0A 0000E 






BCTDEF DS 


H 




DEFAULT BASE 


TIME(CSECS) 




v. 






* 








N319.37 














* 








MILLISECONDS 








0A 00010 






BCTSOI DS 


H 




OPERATOR INTERVENTION TIME 










* 








N319.37 








OA 00012 






BCTUN1 DS 


H 




UNUSED 








(Listing 


Of CHABCT 


continued on page ; 


21) 








20 


CHABCT 





















* 



(Listing of CHABCT continued from page 20) 



LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 


COMMENT 








* 






N319.37 








* 






MILLISECONDS • 


0A 


00014 




BCTFL1 

* 


DS 


XL1 


1ST TABLE FLAG 

BYTE, INITIALIZED OFF. 






OA 00014 


BCTINI 


EQU 


BCTFL1 


BULKIO TASK IS INITIALIZED, 






00000080 


BCTINIM 


EQU 


X^O* 








OA 00014 


BCTDOR 


EQU 


BCTFL1 


ON=BULKIO TASK IS 
DORMANT, NOT AWAKE, 






00000040 


BCTDORM 


EQU 


X'40' 








OA 00014 


BCTOTB 

* 


EQU 


BCTFL1 


OPERATOR-TO-BULK IO- TASK 
MASTER ALERT 






00000020 


BCTOTBM 


EQU 


X'20 1 








OA 00014 


BCTBTO 

* 


EQU 


BCTFL1 


BULKI O- TASK-TO- OPERATOR 
MASTER ALERT 






00000010 


BCTBTOM 


EQU 


X'lO 1 


(NOT PRESENTLY USED) 






OA 00014 


BCTINP 

* 


EQU 


BCTFL1 


IF ON TASKID 2 INIT. IN 
PROGRESS 






00000008 


BCTINPM 


EQU 


X f 08 f 


TASKID 2 INIT. IN PROGRESS 
MASK 






OA 00014 


BCTBHS 


EQU 


BCTFL1 


BULKIO TASK IS NOW BEHIND 
SCHEDULE. 






00000004 


BCTBHSM 


EQU 


X , 04 i 








OA 00014 


BCTIIP 


EQU 


BCTFL1 
N 


1=CZAWA, ABEND RTN, CALLED 
CZ AWS , INITIALIZATIO 
RTN,0=OPTASK CALLED IT 






00000002 


BCTIIPM 


EQU 


X'02 f 








OA 00014 


BCTABN 

* 


EQU 


BCTFL1 


ABEND OF BULKIO-2 TASK IN 
PROGRESS, 






00000001 


BCTABNM 

* 


EQU 


X - 01' 


SET BY CZAWA,BIO-2 ABEND 
PROCESSOR 


0A 


00015 




BCTFL2 

* 


DS 


XL1 


2ND TABLE FLAG 

BYTE, INITIALIZED OFF. 






OA 00015 


BCTASY 

* 


EQU 


BCTFL2 


ABEND RECOVERY ROUTINE 
RETURNS 






00000080 


BCTASYM 


EQU 


X f 80' 


CONTROL TO TASK MONITOR 






OA 00015 


BCTICO 


EQU 


BCTFL2 


SET TO 1 WHEN CZAWV, INPUT 
CLOSEOUT, 






00 000040 


BCTICOM 


EQU 


X^O 1 


IS CALLED BY 

C ZAWS , INITI ALI ZATION 






OA 00015 


BCTWRK 

* 


EQU 


BCTFL2 


USEFUL WORK FLAG 
N319.37 






00000020 


BCTWRKM 


EQU 


X^O* 


USEFUL WORK MASK 
N319.37 


0A 


00016 




BCTNTA 

* 


DS 


H 


NUMBER TIMES BULKIO TASK 
ACTIVATED. 


0A 


00018 




BCTNOT 

* 
* 
* 


DS 


H 


NUMBER OF TIMES BULKIO TASK 

HAS BEEN 

FOUND BEHIND SCHEDULE VIA 

BCTBHS. 


OA 


0001A 




BCTFLT 

* 

* 


DS 


H 


FLUTTER COUNT (NONPRODUCTIVE 

N319.37 
WORK CYCLE COUNT) 
N319.37 


OA 


0001C 




BCTUN2 


DS 


15H 


RESERVED 
N319.37 


OA 


0003A 




BCTLRT 


DS 


16H 


NUMBER OF TIMES REAL TIME 
IS LESS 

THAN X BCTRUS UNITS, WHERE 
X= . 






OA 0003A 




|ORG| 


BCTLRT 


OA 


0003A 




BCTL1R 


DS 


H 


1 


OA 


0003C 




BCTL2R 


DS 


H 


2 


OA 


0003E 




BCTL3R 


DS 


H 


3 


OA 


00040 




BCTL4R 


DS 


H 


4 


OA 


00042 




BCTL5R 


DS 


H 


5 


OA 


00044 




BCTL6R 


DS 


H 


6 


OA 


00046 




BCTL7R 


DS 


H 


7 


OA 


00048 




BCTL8R 


DS 


H 


8 


(Listing 


Of CHABCT 


continued 


on page 22) 





CHABCT 21 



(Listing of CHABCT continued from page 21) 





LOCATION INSTRUCTION SOURCE 


INST 


OPER 


COMMENT 




OA 


0004A 


BCTL9R 


DS 


H 


9 




OA 


0004C 


BCTLAR 


DS 


H 


10 




OA 


0004E 


BCTLBR 


DS 


H 


11 




OA 


00050 


BCTLCR 


DS 


H 


12 




OA 


00052 


BCTLDR 


DS 


H 


13 




OA 


00054 


BCTLER 


DS 


H 


14 




OA 


00056 


BCTLFR 


DS 


H 


15 




OA 


00058 


BCTLGR 

* 


DS 


H- 


NO. TIMES REAL TIME >15 
BCTRUS UNITS 




OA 


0005A 

OA 0005A 


BCTLET 

* 


DS 
|ORG| 


16H 
BCTLET 


NUMBER X OF BCTEUS TIME 
UNITS SPENT 
IN MASTER SERVICE 
LOOP, WHERE X= . 




OA 


0005A 


BCTL1E 


DS 


H 


1 




OA 


0005C 


BCTL2E 


DS 


H 


2 




OA 


0005E 


BCTL3E 


DS 


H 


3 




OA 


00060 


BCTL4E 


DS 


H 


4 




OA 


00062 


BCTL5E 


DS 


H 


5 




OA 


00064 


BCTL6E 


DS 


H 


6 




OA 


00066 


BCTL7E 


DS 


H 


7 




OA 


00068 


BCTL8E 


DS 


H 


8 




OA 


0006A 


BCTL9E 


DS 


H 


9 




OA 


0006C 


BCTLAE 


DS 


H 


10 




OA 


0006E 


BCTLBE 


DS 


H 


11 




OA 


00070 


BCTLCE 


DS 


H 


12 




OA 


00072 


BCTLDE 


DS 


H 


13 




OA 


00074 


BCTLEE 


DS 


H 


14 




OA 


00076 


BCTLFE 


DS 


H 


15 




OA 


00078 


BCTLGE 


DS 


H 


>15. 




OA 


0007A 


BCTUN3 

* 


DS 


H 


RESERVED 
N319.37 




OA 


0007C 


BCTRUS 

* 


DS 


H 


REAL TIME MEASURING 
UNIT,MIILISECNDS 




OA 


0007E 


BCTEUS 

* 


DS 


H 


MASTER SERVICING TIME 
UNIT,MIILISECS 




OA 


00080 


BCTBIO 

* 


DS 


C 


LAST BULKIO-2 SECTION IN 
CONTROL 




OA 


00081 


BCTAKT 


DS 


HL1 


COUNT OF BKIO-2 ABENDS 
SINCE STARTUP 




OA 


00082 


BCTALM 


DS 


HLl'SO 1 


BULKIO-2 ABEND LIMIT 




OA 


00083 


BCTARK 


DS 


HL1 


RECURSIVE ABEND COUNTER 




OA 


00084 


BCTPCT 

* 


DS 


F 


PREVIOUS COMPUT TIME 
VALUE, MI LLISECS 




OA 


00088 


BCTPRT 

* 


DS 


F 


PREVIOUS REAL TIME 
VALUE , MI1LISECNDS 




OA 


0008C 


BCTCONT 


DS 


A 


CONTINUATION ADDRESS 




OA 


00090 


BCTCALL 

* 


DS 


CL8 


NAME OF LAST MODULE CALLED 
BY BULKIO 




OA 


00098 


BCTARE 


DS 


16F 


STM0,15 SETS RECURS IV 
ADDRESSABILITY 




OA 


000D8 


BCTILK 

* 


DS 


CL2 


SIGNATURE OF RTN WHO LOCKED 
BULKCOMM 




OA 


OOODA 


BCTLOK 

* 


DS 


X 


HEADER LOCK 

BYTE, INITIALIZED UNLOCKD 




OA 


OOODB 


BCTBSNL 

* 


DS 


X 


BATCH SEQUENCE NUMBER LOCK 
BYTE, 




OA 


OOODC 


BCTBSN 

* 


DS 


PL4 


PACKED DECIMAL BATCH 
SEQUENCE NUMBER 




OA 


OOOEO 


BCTAKD 


DS 


CL200 


ACKNOWLEDGEMENT DATASET DCB 




OA 


001A8 


BCTFL3 

* 
* 


DS 


X 


CORRESPONDS TO CHBBIO IN 

M03481 
CHBBCT 

M03481 






OA 001A8 


BCTWIE 


EQU 


BCTFL3 


OFF=BIO TO RUN TIMER DRIVEN 
M03481 






00000008 


BCTWIEM 


EQU 


x'os' 


ON=BIO TO RUN INTRPT DRIVEN 
M03481 




(Listing of CHABCT 


continued 


on page 23) 




22 CHABCT 















t 



(Listing of CHABCT continued from page 22) 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 


COMMENT 


OA 001A9 




BCTRSV 


DS 


XL15 


RESERVED 


OA 001B8 




♦ 


DS 


F 


RESERVED 
M03481 


OA 001BC 




BCTALL 

* 
* 
* 


DS 


F 


TOTAL S-ENTRY 
ALLOCATION, I. E. ,M03481 
LEN FROM BCTENT TO END OF 
BCT M03481 


OA 001CO 




BCTLST 

* 


DS 


OX 


DEFINE END OF BCT HEADER 
M03481 




000001C0 


BCTLEN 

* 
* 


EQU 


BCTLST- 


-CHABCT LENGTH OF BCT HEADER 
M03481 
M03481 


OA 001C0 




BCTENT 

* 


DS 


OD 


ALIGN FIRST S-ENTRY 
M03481 



CHABCT 23 



CHASET Storage map 



DEC 




352 



824 



HEX 


8 



40 


28 


48 


30 


56 


38 


64 


40 


80 


50 


88 


58 


96 


60 


104 


68 


112 


70 


120 


78 


128 


80 


136 


88 


144 


90 


152 


98 



160 



552 


228 


560 


230 


568 


238 



338 



(SETS ID (SETAORD I SETNBR | 
111 i 




SETUID 




| SETUID (CONT) | 
1 1 








1 SETDSN 






| SETBSN | 
1 1 


| SETBSN (CONT) (SETLOK | SETHEY | RESERVED | 
I lilt 


SETBUF | 


| SETETL 










1 1 

1 i 


| SETBGN 










I 

1 


RESERVED | 


| SETTOT | 

I 1 




SETNOW 




| SETSUM | 




SETMOV 




| SETPSDA | 
» I 


SETSDA 


i 


SETTYP | 


| SETSTA | 


| SETRCH | 
I 1 


SETDUC 


I 

1 


SETTIM | 


| SETPTI I SETRS4 
1 i 


i 


SETCALL I 


1 SETCALL (CONT) 


1 

I 


RESERVED | 


| SETRCR | 
1 1 


SETRCRC 


i 
i 


SETRCRO | 


SETDVC 


SETDDC 


[SETFL1 |SETFL2 | SETFL3 | SETFL4 |SETPF1 | SETPF2 | SETPF3 (SETPF4 | 
1 1 1 1 1 1 1 1 I 


| SETFL5 | SETFL6 | 
1 1 i 


SETEE 






SETWORK 


I ORG OVERLAP I 



; 



(CHASET continued on page 25) 



24 CHASET 



DEC HEX 
ORG SETWORK 



(CHASET continued from page 24) 



568 
576 
584 
592 



640 



656 



744 
752 



238|SETFL7 |SETFL8 | SETFL9 | RESERVED | 
1 1 1 1 1 


SETINB 




240 | SETGC4 | 
1 1 


SETFC4 | 

1 


SETFC8 | 


24 8 | SETISZ | SETKER | 
1 1 1 


SETIKE 




250|SETIKE |SETBTE |SETBBE |RESERVED| 
1 1 1 1 1 






SETICB 
1 
1 

1 




280 1 | 

1 1 
| SETCMN | 

1 1 


290|SETFFS | 
1 1 






SETFSV 
1 
1 
1 




2E8| 
1 


| SETCMI | 
1 1 


RESERVED | 



2F0| 



SETZRC 



ORG SETWORK 



568 
576 
584 



720 
728 
736 
744 
752 

ORG SETYMSKA+3 



238|SETYFLJ1 
[ 


SETYFLJ2 | SETYFLJ3 | SETPRS | SETYPAG 
1111 


(SETYHDG | RESERVED I 
1 1 i 


240| 

L 






SETYRC | 




SETYRS1 | 


248| 
L 






SETYRS2 | 






1 
i 

L 






SETYHDR 




2D0) 

L 






SETYPGE 


1 

1 


RESERVED | 


2D8J 

L 






SETYOUTP | 




SETYINP | 


2E0| 

L 






SETBIG | 




SETEND | 


2E8| 

L 


SETYLNS 


| SETYUPL | SETYLINE 
1 1 


| RESERVED | 
1 1 


2F0| 

L 






SETYLRE | 




SETYMSKA | 



759 
760 
768 
776 



2F7 



[SETYMASK 



8|SETYCC 
1 


|SETYCODE|SETYJCD 
1 1 


(RESERVED 

1 


SETYCONT 


J SETYNOWS 
1 


SETYXPUT 


8| 

! 


SETYXTRL 




SETYTRCT [ SETYSHRT 
I I 



(CHASET continued on page 26) 



CHASET 25 



(CHASET continued from page 25) 



DEC HEX 
























784 3101 

! 


SETYBADC 


| SETYFLGD | 
1 1 






SETFRM 








792 318J 

1 










| RESERVED | 
1 I 




SETCMB 




800 320ISETYSKP1| 

i 1 


SETYSPC1 


|SETYSPC3ISETFLA 
1 1 


| SETFLB 
1 






SETOUI 




808 328| 




SETOUI 


(CONT) 










SETOBS 




816 330|SETOBS 

1 1 


SETOCT 


I 
i 




SETRSV 












1 

1 








Fields in CHASET 


— by displacement 


















DEC 


HEX 


FIELD 




DEC 


HEX 


FIELD 




DEC 


HEX 


FIELD 




0000 


0000 


SETSID 




0555 


022B 


SETFL4 




0569 


0239 


SETCNM 


(EQU) 


0000 


0000 


SETORG 




0556 


022C 


SETPF1 




0569 


0239 


SETEXC 


(EQU) 


0001 


0001 


SETAORD 




0557 


022D 


SETPF2 




0569 


0239 


SETFN1 


(EQU) 


0002 


0002 


SETNBR 




0558 


022E 


SETPF3 




0569 


0239 


SETINES 


(EQU) 


0004 


0004 


SETUID 




0559 


022F 


SETPF4 




0569 


0239 


SETINEA 


(EQU) 


0012 


OOOC 


SETDSN 




0560 


0230 


SETDEL 


(EQU) 


0569 


0239 


SETINEE 


(EQU) 


0047 


002F 


SETBSN 




0560 


0230 


SETVIS 


(EQU) 


0569 


0239 


SETFMT 


(EQU) 


0051 


0033 


SETLOK 




0560 


0230 


SETSER 


(EQU) 


0570 


02 3A 


SETYFLJ3 




0052 


0034 


SETBTO 


(EQU) 


0560 


0230 


SETXAS 


(EQU) 


0570 


023A 


SETFL9 




0052 


0034 


SETOTB 


(EQU) 


0560 


0230 


SETCUR 


(EQU) 


0570 


02 3A 


SETSPLT 


(EQU) 


0052 


0034 


SETHEY 




0560 


0230 


SETDED 


(EQU) 


0570 


023A 


SETNSTW 


(EQU) 


0054 


0036 


SETBUF 




0560 


0230 


SETXSU 


(EQU) 


0570 


023A 


SETNLK 


(EQU) 


0056 


0038 


SETETL 




0560 


0230 


SETIOI 


(EQU) 


0570 


023A 


SETSCF 


(EQU) 


0071 


0047 


SETBGN 




0560 


0230 


SETFL5 




0570 


023A 


SETTOP 


(EQU) 


0088 


0058 


SETTOT 




0561 


0231 


SETBRK 


(EQU) 


0570 


023A 


SETRLC 


(EQU) 


0092 


005C 


SETNOW 




0561 


0231 


SETGSW 


(EQU) 


0570 


023A 


SETDDL 


(EQU) 


0096 


0060 


SETSUM 




0561 


0231 


SETCRCR 


(EQU) 


0570 


023A 


SETABN 


(EQU) 


0100 


0064 


SETMOV 




0561 


0231 


SETRRCR 


(EQU) 


0570 


023A 


SETRJL 


(EQU) 


0104 


0068 


SETPSDA 




0561 


0231 


SETVABN 


(EQU) 


0570 


02 3A 


SETIID 


(EQU) 


0108 


006C 


SETSDA 




0561 


0231 


SET PER 


(EQU) 


0570 


023A 


SETDID 


(EQU) 


0110 


006E 


SETTYP 




0561 


0231 


SETFL6 




0570 


023A 


SETDUF 


(EQUX 


0112 


0070 


SETSTA 




0562 


0232 


SETEE 




0571 


023B 


SETPRS 




0120 


0078 


SETRCH 




0568 


0238 


SETYFLJ1 




0572 


023C 


SETYPAG 




0124 


007C 


SETDUC 




0568 


0238 


SETCZAWY 




0572 


023C 


SETINB 




0126 


007E 


SETTIM 




0568 


0238 


SETFL7 




0573 


023D 


SETYHDG 




0128 


0080 


SETPTI 




0568 


0238 


SETCZAWZ 




0576 


0240 


SETYRC 




0130 


0082 


SETRS4 




0568 


0238 


SETYAOM 


(EQU) 


0576 


0240 


SETGC4 




0133 


0085 


SETCALL 




0568 


0238 


SETYREC 


(EQU) 


0580 


0244 


SETYRS1 




0144 


0090 


SETRCR 




0568 


0238 


SETYLIN 


(EQU) 


0580 


0244 


SETFC4 




0148 


0094 


SETRCRC 




0568 


0238 


SETYDSO 


(EQU) 


0582 


0246 


SETFC8 




0150 


0096 


SETRCRO 




0568 


0238 


SETYNPG 


(EQU) 


0584 


0248 


SETYRS2 




0152 


0098 


SETDVC 




0568 


0238 


SETYFST 


(EQU) 


0584 


0248 


SETISZ 




0352 


0160 


SETDDC 




0568 


0238 


SETYFIN 


(EQU) 


0586 


02 4A 


SETKER 




0552 


0228 


SETXPS 


CEQU) 


0568 


0238 


SETYPUT 


(EQU) 


0588 


024C 


SETYHDR 




0552 


0228 


SETPUN 


(EQU) 


0568 


0238 


SETYTOP 


(EQU) 


0588 


024C 


SETIKE 




0552 


0228 


SETAMT 


(EQU) 


0568 


0238 


SETOPN 


(EQU) 


0593 


0251 


SETBTE 




0552 


0228 


SETPNT 


(EQU) 


0568 


0238 


SETFST 


(EQU) 


0594 


0252 


SETBBE 




0552 


0228 


SETRES 


(EQU) 


0568 


0238 


SETPAS 


(EQU) 


0596 


0254 


SETICB 




0552 


0228 


SET ASS 


(EQU) 


0568 


0238 


SETEMF 


(EQU) 


0640 


0280 


SETCMN 




0552 


0228 


SETFL1 




0568 


0238 


SETTRO 


(EQU) 


0656 


0290 


SETFFS 




0553 


0229 


SETFN2 


(EQU) 


0568 


0238 


SETEMG 


(EQU) 


0656 


0290 


SETEDS 


(EQU) 


0553 


0229 


SETCBU 


(EQU) 


0568 


0238 


SETSIN 


(EQU) 


0656 


0290 


SETFRD 


(EQU) 


0553 


0229 


SETSUR 


(EQU) 


0568 


0238 


SETWORK 




0656 


0290 


SETFTN 


(EQU) 


0553 


0229 


SETINH 


(EQU) 


0569 


0239 


SETYFLJ2 




0657 


0291 


SETFSV 




0553 


0229 


SETFL2 




0569 


0239 


SETFL8 




0720 


02D0 


SETYPGE 




0554 


022A 


SETRPU 


(EQU) 


0569 


0239 


SETYINI 


(EQU) 


0724 


02D4 


SETYPGEB 


(EQU) 


0554 


022A 


SETERR 


(EQU) 


0569 


0239 


SETYXPS 


(EQU) 


0728 


02D8 


SETYOUTP 




0554 


022A 


SETAKP 


(EQU) 


0569 


0239 


SETEOD 


(EQU) 


0732 


02DC 


SETYINP 




0554 


022A 


SETAKQ 


(EQU) 


0569 


0239 


SETSYN 


(EQU) 


0736 


02E0 


SETBIG 




0554 


022A 


SET IRQ 


(EQU) 


0569 


0239 


SETYBAD 


(EQU) 


0740 


02E4 


SETEND 




0554 


022A 


SETCCF 


(EQU) 


0569 


0239 


SETYFCC 


(EQU) 


0744 


02E8 


SETYLNS 




0554 


022A 


SETACT 


(EQU) 


0569 


0239 


SETYHOL 


(EQU) 


0746 


02EA 


SETYUPL 




0554 


022A 


SETRJE 


(EQU) 


0569 


0239 


SETCOM 


(EQU) 


0748 


02EC 


SETYLINE 




0554 


022A 


SETFL3 




0569 


0239 


SETCNMl 


(EQU) 


0749 


02ED 


SETCMI 




(Continued on page 


i 27) 



















26 CHASET 



(Continued from page 26) 



DEC HEX FIELD 

0749 02ED SETCMP (EQU) 

0752 02F0 SETYLRE 

0752 02F0 SETZRC 

0756 02F4 SETYMSKA 

0759 02F7 SETYMASK 

0760 02F8 SETYCC 

0761 02F9 SETYCODE 

0762 02FA SETYJCD 
0764 02FC SETYCONT 
0768 0300 SETYNOWS 
0772 0304 SETYXPUT 
0776 0308 SETYXTRL 




FIELD DEC HEX FIELD 

SETYTRCT 0803 0323 SETFLA 

SETYSHRT 0803 0323 SETHLD 

SETYBADC 0804 0324 SETFLB 

SETYFLGD 080 4 324 SETPU 
SETYPOP (EQU) 0804 0324 SETPR 
SETYBOT (EQU) 0804 0324 SETOID 

SETFRM 0804 0324 SET JOB 

SETCMB 0805 0325 SETOUI 

SETYSKP1 0813 03 2D SETOBS 

SETYTRCC 0817 0331 SETOCT 

SETYSPC1 0818 0332 SETRSV 

SETYSPC3 08 32 03 40 SETLST 



(EQU) 

(EQU) 
(EQU) 
(EQU) 
(EQU) 



Alphabetical list of fields in CHASET 



FIELD DEC 

SHTABN 0570 

SETACT 0554 

SETAKP 0554 

SETAKQ 0554 

SETAMT 0552 

SETAORD 0001 

SETASS 0552 

SETBBE 0594 

SETBGN 0071 

SETBIG 0736 

SETBRK 0561 

SETBSN 0047 

SETBTE 0593 

SETBTO 0052 

SETBUF 0054 

SETCALL 0133 

SETCBU 0553 

SETCCF 0554 

SETCMB 0798 

SETCMI 074 9 

SETCMN 0640 

SETCMP 0749 

SETCNM 0569 

SETCNM1 0569 

SETCOM 0569 

SETCRCR 0561 

SETCUR 0560 

SETCZAWY 0568 

SETCZAWZ 0568 

SETDDC 0352 



SETDDL 

SETDED 

SETDEL 

SETDID 

SETDSN 

SETDUC 

SETDUF 

SETDVC 

SETEDS 

SETEE 

SETEMF 

SETEMG 

SETEND 

SETEOD 

SET ERR 

SETETL 

SETEXC 

SEFFC4 

SETFC8 

SETFFS 

SETFLA 

SETFLB 

SETFL1 



0570 
0560 
0560 
0570 
0012 
0124 
0570 
0152 
0656 
0562 
0568 
0568 
0740 
0569 
0554 
0056 
0569 
0580 
0582 
0656 
0803 
0804 
0552 



(Continued on 



HEX 

023A 

022A 

022A 

022A 

0228 

0001 

0228 

0252 

0047 

02E0 

0231 

002F 

0251 

0034 

0036 

0085 

0229 

022A 

031E 

02ED 

0280 

02ED 

0239 

0239 

0239 

0231 

0230 

0238 

0238 

0160 

023A 

0230 

0230 

023A 

000C 

007C 

023A 

0098 

0290 

0232 

0238 

0238 

02E4 

0239 

022A 

0038 

0239 

0244 

0246 

0290 

0323 

0324 

0228 

page 



(EQU) 

(EQU) 
(EQU) 
(EQU) 
(EQU) 

(EQU) 



(EQU) 
(EQU) 



(EQU) 
(EQU) 



(EQU) 
(EQU) 

(EQU) 
(EQU) 
(EQU) 
(EQU) 



(EQU) 
(EQU) 
(EQU) 
(EQU) 



(EQU) 

(EQU) 

(EQU) 
(EQU) 

(EQU) 
(EQU) 

(EQU) 



FIELD 

SETFL2 

SETFL3 

SETFL4 

SETFL5 

SETFL6 

SETFL7 

SETFL8 

SETFL9 

SETFMT 

SETFN1 

SETFN2 

SETFRD 

SETFRM 

SETFST 

SETFSV 

SETFTN 

SETGC4 

SETGSW 

SETHEY 

SETHLD 

SETICB 

SETIID 

SETIKE 

SETINB 

SETINEA 

SETINEE 

SETINES 

SETINH 

SETIOI 

SETIRQ 

SETISZ 

SETJOB 

SETKER 

SETLOK 

SETLST 

SETMOV 

SETNBR 

SETNLK 

SETNOW 

SETNSTW 

SETOBS 

SETOCT 

SETOID 

SETOPN 

SETORG 

SETOTB 

SETOUI 

SETPAS 

SETPER 

SETPF1 

SETPF2 

SETPF3 

SETPF4 



DEC 

0553 

0554 

0555 

0560 

0561 

0568 

0569 

0570 

0569 

0569 

0553 

0656 

0787 

0568 

0657 

0656 

0576 

0561 

0052 

0803 

0596 

0570 

0588 

0572 

0569 

0569 

0569 

0553 

0560 

0554 

0584 

0804 

0586 

0051 

0832 

0100 

0002 

0570 

0092 

0570 

0813 

0817 

0804 

0568 

0000 

0052 

0805 

0568 

0561 

0556 

0557 

0558 

0559 



HEX 

0229 

022A 

022B 

0230 

0231 

0238 

0239 

023A 

0239 

0239 

0229 

0290 

0313 

0238 

0291 

0290 

0240 

0231 

0034 

0323 

0254 

023A 

024C 

02 3C 

0239 

0239 

0239 

0229 

0230 

022A 

0248 

0324 

024A 

0033 

0340 

0064 

0002 

023A 

005C 

023A 

032D 

0331 

0324 

0238 

0000 

0034 

0325 

0238 

0231 

022C 

022D 

022E 

022F 



(EQU) 
(EQU) 
(EQU) 
(EQU) 

(EQU) 

(EQU) 

(EQU) 

(EQU) 

(EQU) 



(EQU) 

(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 

(EQU) 



(EQU) 
(EQU) 



(EQU) 
(EQU) 

(EQU) 

(EQU) 
(EQU) 



FIELD 

SETPNT 

SETPR 

SETPRS 

SETPSDA 

SETPTI 

SETPU 

SETPUN 

SETRCH 

SETRCR 

SETRCRC 

SETRCRO 

SETRES 

SETRJE 

SETRJL 

SETRLC 

SETRPU 

SETRRCR 

SETRSV 

SETRS4 

SETSCF 

SETS DA 

SETSER 

SETSID 

SETSIN 

SETSPLT 

SETSTA 

SETSUM 

SETSUR 

SETSYN 

SETTIM 

SETTOP 

SETTOT 

SETTRO 

SETTYP 

SETUID 

SETVABN 

SETVIS 

SETWORK 

SETXAS 

SETXPS 

SETXSU 

SETYAOM 

SETYBAD 

SETYBADC 

SETYBOT 

SETYCC 

SETYCODE 

SETYCONT 

SETYDSO 

SETYFCC 

SETYFIN 

SETYFLGD 

SETYFLJ1 



DEC 

0552 

0804 

0571 

0104 

0128 

0804 

0552 

0120 

0144 

0148 

0150 

0552 

0554 

0570 

0570 

0554 

0561 

0818 

0130 

0570 

0108 

0560 

0000 

0568 

0570 

0112 

0096 

0553 

0569 

0126 

0570 

0088 

0568 

0110 

0004 

0561 

0560 

0568 

0560 

0552 

0560 

0568 

0569 

0784 

0786 

0760 

0761 

0764 

0568 

0569 

0568 

0786 

0568 



HEX 

0228 

0324 

023B 

0068 

0080 

0324 

0228 

0078 

0090 

0094 

0096 

0228 

022A 

023A 

023A 

022A 

0231 

0332 

0082 

023A- 

006C 

0230 

0000 

0238 

023A 

0070 

0060 

0229 

0239 

007E 

023A 

0058 

0238 

006E 

0004 

0231 

0230 

0238 

0230 

0228 

0230 

0238 

0239 

0310 

0312 

02F8 

02F9 

02FC 

0238 

0239 

0238 

0312 

0238 



(EQU) 
(EQU) 



(EQU) 
(EQU) 



(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 



(EQU) 

(EQU) 

(EQU) 
(EQU) 

(EQU) 
(EQU) 

(EQU) 

(EQU) 



(EQU) 
(EQU) 

(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 

(EQU) 



(EQU) 
(EQU) 
(EQU) 



28) 



CHASET 27 



(Continued from page 27) 





FIELD 
SETYFLJ2 


DEC 
0569 


HEX 
0239 


FIELD 
SETYMASK 


DEC 
0759 


HEX 
02F7 


FIELD DEC HEX 
SETYRS2 0584 0248 




SETYFLJ3 


0570 


023A 


SETYMSKA 


0756 


02F4 


SETYSHRT 0782 03 0E 




SETYFST 


0568 


0238 


(EQU) SETYNOWS 


0768 


0300 


SETYSKP1 0800 0320 




SETYHDG 


0573 


023D 


SETYNPG 


0568 


0238 


(EQU) SETYSPC1 0801 0321 




SETYHDR 


0588 


024C 


SETYOUTP 


0728 


02D8 


SETYSPC3 0802 0322 




SETYHOL 


0569 


0239 


(EQU) SETYPAG 


0572 


023C 


SLTYTOP 0568 0238 (EQU) 




SETYINI 


0569 


0239 


(EQU) SETYPGE 


0720 


02 DO 


SETYTRCC 0800 0320 




SETYINP 


0732 


02DC 


SETYPGEB 


0724 


02D4 


(EQU) SETYTRCT 0780 030C 




SETYJCD 


0762 


02FA 


SETYPOP 


0786 


0312 


(EQU) SETYUPL 0746 02EA 




SETYLIN 


0568 


0238 


(EQU) SETYPUT 


0568 


0238 


(EQU) SETYXPS 0569 0239 (EQU) 




SETYLINE 


0748 


02EC 


SETYRC 


0576 


0240 


SETYXPUT 0772 0304 




SETYLNS 


0744 


02E8 


SETYREC 


0568 


0238 


(EQU) SETYXTRL 0776 0308 




SETYLRE 


0752 


02F0 


SETYRS1 


0580 


0244 


SETZRC 0752 02F0 


Assembler 


listinq of 


CHASET 














LOCATION 


INSTRUCTION SOURCE 


INST OPER 


COMMENT 






88 00000 


CHASET 


DSECT 








88 00000 






SETORG 

* 


DS 


0D 




ALIGN S ENTRY ON DOUBLEWORD 
BOUNDARY 




88 00000 






SETSID 


DS 


C 




S-ENTRY IDENTIFIER f BB' 






000000BB 


SETSIDM 


EQU 


X^BB* 






88 00001 






SETAORD 

* 


DS 


X 




DEVICE FOR THIS S-ENTRY IS 

ASSIGNED 

X'AA^OR WAS DELETED 

X'DD* ,ASNBD. 






OOOO0OAA 


SETAA 


EQU 


X f AA' 


IN SETAORD IF A DEVICE IS 










* 








ASSIGNED 






000000DD 


SETDD 


EQU 


X'DD' 


IN SETAORD IF THE DEVICE 










* 








WAS DELETED 






0000004C 


SETDDMSG 


EQU 


76 




DISPL TO MSGID IN DDEFS 










♦ 








PSECT,CZAEAR 




88 00002 






SETNBR 


DS 


CL2 


NUMBER OF THIS 










♦ 








S-ENTRY, INTEGER 01-99 




88 00004 






SETUID 


DS 


CL8 


USERID, FOR OUTPUT AND 










* 








INPUT JOBS. 




88 O000C 






SETDSN 


DS 


CL35 


USER'S DATA SET NAME IF 










♦ 








OUTPUT JOB, 










♦ 








SYSINNNN SYSIN NAME IF 










♦ 








INPUT JOB. 




88 0002F 






SETBSN 


DS 


CL4 


BATCH SEQUENCE NUMBR, OUTPUT 










* 








JOB ONLY 




88 00033 






SETLOK 


DS 


X 




S ENTRY LOCK 
BYTE f INITIALIZD UNLOCKD 




88 00034 






SETHEY 


DS 


X 




S ENTRY ALERT BYTE, 
INITIALIZED OFF. 






88 00034 


SETOTB 


EQU 


SETHEY 


OPERATOR-TO-BULK IO-TASK 










♦ 








ALERT FLAG. 






00000080 


SETOTBM 


EQU 


x'so* 








88 00034 


SETBTO 


EQU 


SETHEY 


BULKIO-TO-OPERATOR-TASK 










♦ 








ALERT FLAG. 






00000040 


SETBTOM 


EQU 


X f 40 f 


(NOT PRESENTLY USED) 




88 00036 






SETBUF 

* 


DS 


H 




NUMBER OF BUFFERS FOR MSAM 

DEVICE, 

CONTAINS NEW NO. IF SETCBU 

FLAG ON 




88 00038 






SETETL 


DS 


CL15 


KEY OF USER RECORD 










* 








TO , SETL , TO BEFORE 










# 








NEXT OUTPUT SERVICE CYCLE. 










♦ 








USED 










* 








WITH SETPNT FLAG FOR 










♦ 








OPERATOR USE 










* 








ONLY, NOT NEW JOB. IGNORED 










♦ 








IF ALL 










* 








ZEROS. FOR VISAM OUTPUT 










♦ 








JOBS ONLY. 




88 00047 






SETBGN 


DS 


CL15 


BEGINNING OUTPUT DS 










♦ 








LINEt/VISAM KEY, 




(Listing 


Of CHASET 


continued 


on page ; 


29) 




28 CHASET 



















(Listing of CHASET continued from page 28) 



LOCATION INSTRUCTION SOURCE INST OPER 



COMMENT 



88 00058 
88 0005C 

88 00060 

88 00064 



88 00068 
88 0006C 
88 0006E 



88 00070 
88 00078 

88 0007C 

88 0007E 

88 00080 

88 00082 

88 00085 

88 00090 

88 00094 
88 00096 

88 00098 
88 00098 

88 00160 
88 00160 

88 00228 
88 00228 

(Listing 



SETTOT 

SETNOW 

* 
* 
* 
SETSUM 

* 
* 

SETMOV 

* 
* 

* 

* 
* 
SETPSDA 

SETSDA 

SETTYP 

SETURCR 

* 

SETURCP 

SETURPT 

SETRJECR 

SETRJEPT 

SETSTA 
SETRCH 

* 

SETDUC 
SETTIM 
SETPTI 

SETRS4 

* 

SETCALL 

* 

SETRCR 

* 

SETRCRC 
SETRCRO 
SETDCBL 

SETDVC 
SETDDC 



SETFL1 
88 00228 SETASS 

* 

of CHASET continued 



DS 



DS 



DS 



DS 



00000801 
00000802 
00000808 
00004001 
00004008 



DS 



DS 



DS 



EQU 
EQU 



O000O0C8 



USED WITH SETVIS 

LINE/NON-LINE FLAG 
F TOTAL RECORDS THRU THIS 

DEVICE SINCE 

BULKIO STARTED UP, 
F POSITION OF CURRENT OUTPUT 

RECORD, 

RELATIVE TO START OF USER 

DATASET 
F NO. RECORDS READ OR WRITTEN 

THIS JOB, 

FOR WHICH USER WILL BE 

CHARGED, 
F NO. RECORDS TO 

FORWARD/BACKSPACE IN 

USER DATA SET BEFORE NEXT 

OUTPUT 

SERVICE CYCLE. USED WITH 

SETAMT 

FLAG FOR OPERATOR USE 

ONLY, NOT 

NEW JOB. FOR VS/VISAM 

OUTPUT JOBS. 
CL4 PRINTABLE EBCDIC FORM OF 

SDA 
H SYMBOLIC DEVICE ADDRESS, 

THIS ENTRY 
XL2 DEVICE TYPE CODE ON THIS S 

ENTRY, 
X , 0801 f 2540 CARD READER 

15651 
X , 0802 i 2540 CARD PUNCH 
15651 

1403 PRINTER 
15651 

2780 CARD READER 
15651 
X'HQQ8' 2780 PRINTER 

15651 
CL8 RJE STATION ID 
AL4 CHAIN POINTER TO OTHER 

S-ENTRY 
H DIAL UP COUNT INITIALIZED 

TO 
H DEVICE CYCLE TIME(CSECS) 

N319.37 
H RJE PUNCH CYCLE TIME(CSECS) 

N319.37 
XL3 RESERVED 

N319.37 
CL8 LAST MODULE CALLED FOR THIS 

S 

ENTRY 
F * PTR TO USER 

TABLE, RETURNED BY RCR 
H WORK AREA FOR RCR CLOSE 

H WORK AREA FOR RCR OPEN 

200 LENGTH OF A DCB 
0D ALIGN DCB 
CL (SETDCBL) DCB REPRESENTING DEVICE 

AS A DATASET 
0D ALIGN DCB 

CL(SETDCBL) DCB FOR VSAM OR VISAM 

DATA SET 
OF 
X 
SETFL1 



EQU X'OSOS* 
EQU X'4001 1 



EQU 

DS 
DS 

DS 

DS 

DS 

DS 

DS 



DS 

DS 

DS 

EQU 

DS 

DS 

DS 

DS 

DS 
DS 
EQU 



on page 30) 



FIRST FLAG BYTE 

S ENTRY CURRENTLY ASSIGNED 

TO A JOB. 



JS, 



CHASET 29 



(Listing of CHASET continued from page 29) 



LOCATION INSTRUCTION SOURCE 



88 00229 



88 0022A 



00000080 
88 00228 

00000040 

88 00228 

00000010 

88 00228 

00000008 

88 00228 

00000004 

88 00228 

00000001 

88 00229 
00000080 
88 00229 
00000020 
88 00229 
00000010 
88 00229 
00000008 

88 0022A 
00000080 
88 0022A 

00000040 

88 0022A 
00000020 
88 0022A 
00000010 
88 0022A 

00000008 

88 0022A 

00000004 

88 0022A 
00000002 

88 0022A 

00000001 



88 0022B 
88 0022C 
88 0022C 

88 0022D 
C Listing 



SETASSM 
SETRES 

SETRESM 

* 

SETPNT 

SETPNTM 

SETAMT 

SETAMTM 

SETPUN 

* 

SETPUNM 

* 

SETXPS 

SETXPSM 

SETFL2 
SETINH 

* 

SETINHM 

* 

SETSUR 

SETSURM 

SETCBU 

* 

SETCBUM 
* 
SETFN2 

* 

SETFN2M 

SETFL3 
SETRJE 
SETRJEM 
SETACT 

* 

SETACTM 

* 

SETCCF 

SETCCFM 

SETIRQ 

SETIRQM 

SETAKQ 

* 

SETAKQM 
SETAKP 

SETAKPM 

* 

SETERR 
SETERRM 

SETRPU 

SETRPUM 
SETFL4 



INST OPER 
EQU X f 80» 



EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

DS 
EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

DS 
EQU 
EQU 
EQU 

EQU 

EQU 
EQU 
EQU 
EQU 
EQU 

EQU 

EQU 

EQU 

EQU 

EQU 



SETPF1 
* 

SETPF2 
of CHASET continued 



EQU 
DS 
DS 
DS 



SETFL1 

X^O 1 

SETFL1 

X'lO' 

SETFL1 

X'OS 1 

SETFL1 

X f 04 f 

SETFL1 

X^Ol 1 

X 

SETFL2 

X^O 1 

SETFL2 

X^O' 

SETFL2 

X'10' 

SETFL2 

X^S* 

X 

SETFL3 

X^O" 

SETFL3 

X^O 1 

SETFL3 

X^O' 

SETFL3 

X , 10 t 

SETFL3 

x'os' 

SETFL3 

X , 04 f 

SETFL3 
X , 02 t 



EQU SETFL3 



X f 01- 
X 

OF 
X 



DS X 

on page 31) 



COMMENT 

RESTART OUTPUT OF USER VSAM 

DATASET 

BY SETL TYPE B TO 

BEGINNING. 

SETL TYPE K TO USER f S 

OUTPUT VI SAM 

RECORD SPECIFIED IN SETETL 

FIELD. 

GET-FORWARD/SETL-TYPE-P-BACKWARD IN 

VSAM OUT DATASET BY SETMOV 

AMOUNT 

1=COMBINE/0=DECOMBINE IF 

COMBIND f THE 

CARD RDR IN SETSDA WITH 

THIS PUNCH 

CHANGE PRINTER SPACING TO 

VALUE PUT 

INTO SETPRS BY SYSTEM 

OPERATOR. 

SECOND FLAG BYTE 

1=SET/0=RESET IF WAS SET, 

THE OPTION 

TO INHIBIT MS AM MSG TO 

OPERATOR. 

SETUR MACRO MUST BE 

REISSUED TO MSAM 

OUTPUT DEVICE BY ATTEND 

ALERT RTN 

CHANGE NUMBER BUFFERS FOR 

THIS MSAM 

OUTPUT DEVICE TO AMOUNT IN 

SETBUF 

FINISH MACRO MUST BE 

REISSUD TO MSAM 

OUTPUT DEVICE BY ATTEND 

ALERT RTN 

THIRD FLAG BYTE 

RJE DEVICE FLAG 

RJE DIVICE MASK 

THIS JOB AND ITS DEVICE ARE 

HALTED 

THIS JOB AND DEVICE HALTED 

MASK 

CONTINUE CARD RECEIVED 

CONTINUE CARD RECEIVED MASK 

INTERVENTION REQUIRED FLAG 

INTERVENTION REQUIRED MASK 

ACKNOWLEDGEMENTS PENDING 

FLAG 

ACKNOWLEDGEMENTS PENDING 

MASK 

PRINTING ACKNOWLEDGEMENTS 

FLAG 

PRINTING ACKNOWLEDGEMENTS 

MASK 

l=ERROR PROCESSING ACKS 

0=ACKS PROCESSED WITHOUT 

ERROR 

REMOTE PUNCH AVAILABLE 

N412.2 
N412.2 
FOURTH FLAG BYTE 

PREVIOUS SETFL1 FROM LAST 

CYCLE 

PREVIOUS SETFL2 FROM LAST 



4 



30 CHASET 



( 



(Listing 


Of CHASET 


continued : 


from page 30 > 




LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 


COMMENT 








* 






CYCLE 


88 


0022£ 




SETPF3 

* 


DS 


X 


PREVIOUS SETFL3 FROM LAST 
CYCLE 


88 


0022F 




SETPF4 


DS 


X 


PREVIOUS SETFL4 FROM LAST 
CYCLE 






00000002 


SETFLAL 


EQU 


SETFL3-SETFL1 NUMBER OF FLAGS SAVED 








♦ 






BY CZAWU 


88 


00230 




SETFL5 


DS 


X 


FIFTH FLAG BYTE 






88 00230 


SETIOI 


EQU 


SETFL5 


1=THIS IS AN INPUT DEVICE, 
0=OUTPUT. 






00000080 


SETIOIM 


EQU 


x'80' 








88 00230 


SETXSU 


EQU 


SETFL5 


UNBREAKABLE SETUP, DON'T 
CHANGE THE 






00000040 


SETXSUM 

* 


EQU 


X^O' 


FORM ON THIS MSAM OUTPUT 
DEVICE. 






88 00230 


SETDED 


EQU 


SETFL5 


DEDICATED DEVICE. ALL JOBS 
REQUIRING 






00000020 


SETDEDM 

* 


EQU 


X , 20 i 


THIS FORM MUST GO TO THIS 
DEVICE. 






88 00230 


SETCUR 


EQU 


SETFL5 


THIS ENTRY CURRENTLY BEING 
SERVICED. 






00000010 


SETCURM 


EQU 


X'10' 








88 00230 


SETXAS 

* 


EQU 


SETFL5 


S ENTRY NOT TO BE ASSIGNED 
TO A JOB. 






00000008 


SETXASM 


EQU 


x'os 1 








88 00230 


SETSER 


EQU 


SETFL5 


THIS ENTRY WAS SERVICED 
DURING 






00000004 


SETSERM 


EQU 


X , 04 t 


THE CURRENT MASTER SERVICE 
CYCLE. 






88 00230 


SETVIS 


EQU 


SETFL5 


l=LINE f 0=NON~LINE VISAM 
USER DATA 






00000002 


SETVISM 


EQU 


X , 02" 


SET TO BE OUTPUT. 






88 00230 


SETDEL 

* 


EQU 


SETFL5 


1=DELETE THIS RDR f PUNCH, 
OR PRINTER 






00000001 


SETDELM 


EQU 


X'Ol' 




88 


00231 




SETFL6 


DS 


X 


SIXTH FLAG BYTE 






88 00231 


SETPER 

* 


EQU 


SETFL6 


PERMANENT MSAM I/O ERROR 
RC=8 FROM 






00000080 


SETPERM 

* 


EQU 


X f 80 t 


CZAWU SETUR/FINISH, SET FOR 
CZAWY 






88 00231 


SETVABN 

* 


EQU 


SETFL6 


SET TO 1 WHEN CZAWA, ABEND 
ROUTINE, 






00000040 


SETVABNM 

* 


EQU 


X^O* 


CALLS CZAWY, OUTPUT SERV 
EODAD RTN 






88 00231 


SETRRCR 


EQU 


SETFL6 


l=CZAWV f Y,OR A MUST DO RCR 

RATION 






00000020 


SETRRCRM 


EQU 


X f 20 f 


0=RCR RATION DONE BY CZAWV 
OR Y. 






88 00231 


SETCRCR 

* 


EQU 


SETFL6 


l=CZAWV,Y,OR A MUST DO RCR 
CLOSE 






00000010 


SETCRCRM 

* 


EQU 


X'lO' 


0=RCR CLOSE DONE BY CZAWV 
OR Y . 






88 00231 


SETGSW 


EQU 


SETFL6 








00000008 


SETGSWM 

# 


EQU 


X f 08 f 


PRINT 2ND SET OF BREAK 
CHARS 






88 00231 


SETBRK 


EQU 


SETFL6 


l=NO BREAK LINES AFTER 
PRINTOUTS 






00000004 


SETBRKM 


EQU 


X , 04 i 


NO BREAK LINES AFTER 
PRINTOUTS MASK 


88 


00232 




SETEE 


DS 


XL6' ££££££££££££• DEBUGGING DUMP 








♦ 






DELIMITER, SEEN AS E f S 


88 


00238 






DS 


0D 




88 


00238 


88 00238 


SETWORK 


DS 
|ORG| 


CL256 
SETWORK 




88 


00238 




SETCZAWZ 


DS 


0D 


WORK AREAS USED BY INPUT 

SERVICE 

(CZAWZ) 


88 


00238 




SETFL7 


DS 


X 


SEVENTH FLAG BYTE 


( Listing 


of CHASET 


continued 


on page 32) 





CHASET 31 



(Listing of CHASET continued from page 31) 



LOCATION INSTRUCTION SOURCE 


INST 


OPER 


88 00238 


SETSIN 


EQU 


SETFL7 


00000080 


SETSINM 


EQU 


X'8Q* 


88 00238 


SETEMG 


EQU 


SETFL7 


00000040 


SETEMGM 


EQU 


X^O* 


88 00238 


SETTRO 


EQU 


SETFL7 


00000020 


SETTROM 


EQU 


X f 20' 


88 00238 


SETEMF 


EQU 


SETFL7 


00000008 


SETEMFM 


EQU 


x'os" 


88 00238 


SETPAS 


EQU 


SETFL7 


00000004 


SETPASM 


EQU 


X f 04 f 


88 00238 


SETFST 


EQU 


SETFL7 


00000002 


SETFSTM 


EQU 


X'02' 


88 00238 


SETOPN 

* 


EQU 


SETFL7 


00000001 


SETOPNM 


EQU 


X'Ol' 


88 00239 


SETFL8 


DS 


X 


88 00239 


SETFMT 


EQU 


SETFL8 


00000080 


SETFMTM 


EQU 


x'so 1 


88 00239 


SETINEE 


EQU 


SETFL8 


00000040 


SETINEEM 


EQU 


X f 40* 


88 00239 


SETINEA 


EQU 


SETFL8 


00000020 


SETINEAM 


EQU 


X , 20 i 


88 00239 


SETINES 


EQU 


SETFL8 


00000010 


SETINESM 


EQU 


X^O' 


88 00239 


SETFN1 


EQU 


SETFL8 


00000008 


SETFN1M 


EQU 


X'08* 


88 00239 


SETEXC 


EQU 


SETFL8 


00000004 


SETEXCM 


EQU 


X'04* 


88 00239 


SETCNM 


EQU 


SETFL8 


00000002 


SETCNMM 


EQU 


X i 02 l 


88 00239 


SETCNM1 


EQU 


SETFL8 


00000001 


SETCNM1M 


EQU 


X'Ol' 


88 0023A 


SETFL9 


DS 


X 


88 0023A 


SETDUF 


EQU 


SETFL9 


00000080 


SETDUFM 

# 


EQU 


x'so 1 


88 0023A 


SETDID 


EQU 


SETFL9 


00000040 


SETDIDM 


EQU 


X'40' 


88 0023A 


SETIID 


EQU 


SETFL9 


00000020 


SETIIDM 


EQU 


X'20' 


88 0023A 


SETRJL 


EQU 


SETFL9 


00000010 


SETRJLM 


EQU 


X'lO' 


88 0023A 


SETABN 


EQU 


SETFL9 


00000008 


SETABNM 


EQU 


x'os 1 


88 0023A 


SETDDL 


EQU 


SETFL9 


00000004 


SETDDLM 


EQU 


X f 04' 


88 0023A 


SETRLC 


EQU 


SETFL9 


00000002 


SETRLCM 


EQU 


X f 02 f 


88 0023C 


SETINB 


DS 


F 


(Listing of CHASET 


continued 


on page 33) 



COMMENT 

1=SYSIN DATASET,0=SYSOUT 

DATASET. 

MSAM GET UNRECOVERABLE CARD 

READER 

I/O ERROR FOUND BY INPUT 

SERVICE. 

THROW AWAY REST OF CARD RDR 

INPUT TO 

VAM DS AFTER ONE MSAM READ 

ERROR. 

MSAM FINISH UNRECOVERABLE 

I/O ERROR 

FOUND BY INPUT SERVICE. 

1=CARD INPUT JOB IN 

PROGRESS. 

1=FIRST INPUT CARD HAS BEEN 
READ. 

1=MUST REMOVE CARD INPUT 
DATASET. 

EIGHTH FLAG BYTE 
l=EBDCIC f 0=BCD INPUT CARD 
FORMAT. 

1=END INPUT JOB ON MSAM 
ERROR 

1=ACCEPT INPUT CARD RECORD 
ON MSAM 

1=SKIP INPUT CARD RECORD ON 

MSAM 

GET ERROR. 

FINISH MACRO MUST BE 

REISSUD TO MSAM 

DEVICE BY INPUT 

SERVICE RTN 

1=WRAP UP EXPRESS 

BATCH SYSIN 

1=EXPRESS MODE 

0=NOT EXPRESS MODE 

1=EXP MODE 1ST RECORD 

0=EXP MODE NOT 1ST RECORD 

NINTH FLAG BYTE FOR RJE 

DIAL-UP FLAG INITIALIZED 

OFF 

DIAL-UP FLAG INITIALIZED 

OFF MASK 

DUPLICATE STATION ID 

DUPLICATE STATION ID MASK 

INVALID STATION ID 

INVALID STATION ID MASK 

RJEND CARD RECEIVED 

RJEND CARD RECEIVED MASK 

ASSIGN BSN FLAG FOR INPUT 

CLOSEOUT 

ASSIGN BSN MASK 

DEDICATED LINE FLAG 

DEDICATED LINE MASK 

SIGNAL CZAWW TO ENABLE RJE 

LN 

SIGNAL CZAWW TO ENABLE RJE 

LN MASK 

ADDRESS OF 1ST INPUT RECORD 

BYTE IN 



t 
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C Listing of CHASET continued from page 32) 



LOCATION INSTRUCTION SOURCE INST OPER 
88 00240 
88 00244 
88 00246 



COMMENT 



DS 



DS 



88 00248 
88 0024A 

88 0024C 
88 00251 

88 00252 

88 00254 

88 00254 

88 00280 

88 00280 
88 00290 



0000002C 



00000010 



88 00290 
00000080 
88 00290 
00000040 
88 00290 
00000020 



88 00291 

88 002ED 
88 002F0 
88 00238 

88 00238 



88 002ED 
00000080 



88 00238 



88 00238 



(Listing 



88 00238 
00000080 
88 00238 
00000040 
88 00238 
00000020 
88 00238 
00000010 
88 00238 

00000008 
of CHASET 



* 
SETGC4 

SETFC4 

* 

SETFC8 DS 

SETISZ DS 
SETKER DS 

SETIKE DS 
SETBTE DS 

SETBBE DS 
» 

DS 
SETICBL EQU 
SETICB DS 
* 
♦ 

DS 
SETCMNL EQU 

SETCMN DS 

SETFFS DS 

* 

SETFTN EQU 

SETFTNM EQU 

SETFRD EQU 

SETFRDM EQU 

SETEDS EQU 

* 

SETEDSM EQU 

SETFSV DS 

* 

* 

SETCMI 
SETCMP 
SETCMPM 
SETZRC 

* 




H 



H 



H 
H 

CL5 
XL1 

XL1 

OF 
44 



MS AM BUFFER, FROM MSAM GET. 

COUNT OF , GET f RETRIES 

AFTER RC=4. 

COUNT OF 'FINISH' RETRIES 

AFTER RC = 4 

COUNT OF •FINISH' RETRIES 

AFTER RC=8 

LOGICAL RECORD LENGTH. 

# CARDS SKIPPED OR ACCEPTED 

W/ERRORS 

SEQUENCE NUMBER 

RELATIVE START BYTE, INPUT 

JOBS ONLY. 

RELATIVE END BYTE, INPUT 

JOBS ONLY. 

ALIGN ICB 

LENGTH OF AN ICB 
XL(SETICBL) ASYNCHRONOUS INTERRUPT 

ICB FOR CARD 

READER S ENTRY ONLY. 
OF ALIGN COMMUNICATIONS AREA 
16 LENGTH OF AN ICB 

COMMUNICATIONS AREA 
XL (SETCMNL) COMMUNICATIONS AREA FOR 

SETICB 

THIS FIELD DEFINES THOSE 

FLAGS 

REQUIRED FOR FTN OPTION 

FTN OPTION BEING PROCESSED 

FLAG 

FTN OPTION BEING PROCESSED 

MASK 

FIRST FTN SOURCE RECORD 

BEING PROCESSED 

FST SOURCE RECORD BEING 

PRO. MASK 

LAST RECORD OF FTN SOURCE 

BEING PROCESSED 

LAST RECORD OF SOURCE BEING 

PRO. MASK 

BUFFER SAVE AREA FOR FTN 

CONVERSION 

92 BYTES REPRESENT ONE 

RECORD OF A 

LINE DATASET 

DATA COMPRESSION INDS. 

SET ON INDICATE D.S. 

COMPRESSION REQUIRED 

LAST RETURN CODE FROM MSAM 
N412.2 



CL1 



SETFFS 



x'80' 



SETFFS 



X'40 1 



SETFFS 



X'20" 



CL92 



CL1 

SETCMI 
X'80' 
A 



SETWORK 
0D 



SETCZAWY 

SETYTOP EQU * 
♦ 

SETYFLJ1 DS X 

SETYPUT EQU SETYFLJ1 

SETYPUTM EQU X'80' 

SETYFIN EQU SETYFLJ1 

SETYFINM EQU X'40' 

SETYFST EQU SETYFLJ1 

SETYFSTM EQU X'20' 

SETYNPG EQU SETYFLJ1 

SETYNPGM EQU X'10« 

SETYDSO EQU SETYFLJ1 
* 

SETYDSOM EQU X'08' 
continued on page 34) 



WORK AREAS USED BY OUTPUT 
SER- 

(CZAWY) 
TOP OF JOB 



DEPENDENT 



JOB FLAG 1 
REISSUE MSAM 



PUT 



VICE 
♦ * 

AREA 

*# 

** 
#* 
** 
** 
** 
*♦ 
#* 

** INPUT DSORG - 1=VISAM, 

0=VSAM 

*♦ 



REISSUE MSAM FINISH 



FIRST PASS ON THIS JOB 



NEW PAGE REQUIRED 
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(Listing of CHASET continued from page 33) 



LOCATION INSTRUCTION SOURCE 



INST OPER 



88 00239 



88 0023A 



88 0023B 
88 0023C 

88 0023D 

88 00240 

88 00244 
88 00248 
88 0024C 



88 00238 

00000004 
88 00238 

00000002 

88 00238 

00000001 

88 00239 

00000080 
88 00239 

00000040 
88 00239 

00000020 
88 00239 

00000010 

88 00239 

00000008 
88 00239 

00000004 
88 00239 

00000002 

88 00239 

00000001 

88 0023A 

00000080 

88 0023A 
00000040 
88 0023A 
00000020 

88 0023A 
00000010 
88 0023A 

00000008 
000000C5 
O0OOO0D7 
O0O0O0C8 



SETYLIN 

* 

SETYLINM 

SETYREC 

SETYRECM 

SETYAOM 

* 

SETYAOMM 

SETYFLJ2 

SETCOM 

* 

SETCOMM 
SETYHOL 

SETYHOLM 

SETYFCC 

* 

SETYFCCM 

SETYBAD 

SETYBADM 

* 

SETSYN 
* 

SETSYNM 
SETEOD 

* 

SETEODM 

SETYXPS 

* 

SETYXPSM 

* 

SETYINI 

* 

SETYINIM 

* 

SETYFLJ3 

SETT OP 

SETTOPM 

SETSCF 
SETSCFM 
SETNLK 
SETNLKM 

* 

SETNSTW 

SETNSTWM 

SETSPLT 

SETSPLTM 

SETPRS 

SETYEDIT 

SETYPAG 

# 

SETYPAGM 

SETYHDG 

SETYHDGM 
SETYRC 

SETYRS1 
SETYRS2 

SETYHDR 



EQU 

EQU 
EQU 

EQU 

EQU 

EQU 

DS 

EQU 

EQU 
EQU 

EQU 
EQU 

EQU 
EQU 

EQU 

EQU 

EQU 

EQU 

EQU 
EQU 

EQU 

EQU 

EQU 

DS 
EQU 

EQU 

EQU 
EQU 
EQU 
EQU 

EQU 
EQU 
EQU 

EQU 

DS 

EQU 

DS 

EQU 
DS 

EQU 
DS 

DS 
DS 
DS 



SETYFLJ1 

X , 04 i 
SETYFLJ1 

X'02 f 

SETYFLJ1 

X'01' 

X 

SETYFLJ2 

X«80' 
SETYFLJ2 

X , 40 i 
SETYFLJ2 

X^O 1 
SETYFLJ2 

X f 10' 

SETYFLJ2 

x'os 1 

SETYFLJ2 

X , 04 f 
SETYFLJ2 

X'02 1 

SETYFLJ2 

X'Ol^ 

X 
SETYFLJ3 

X^O* 

SETYFLJ3 
X^O' 
SETYFLJ3 
X^O' 

SETYFLJ3 

X'10' 
SETYFLJ3 

x'08' 

C 

C f E f 

C 

C'P* 
C 

C f H f 
A 

F 
F 
CL132 



COMMENT 

** LINE DATA SET - 

DSORG=VI f RKP=4, 

** RECFM=V, KEYLEN=7 

** RECORD FORMAT - 

0=FIXED 

** 

1=VARIABLE 

** TYPE OF EDIT - 

0=MACHINE 

** 1=ASA 

** JOB FLAG 2 

** THIS OUTPUT JOB IS 

COMPLETED. 

** 

** LOCATION FOUND BY MS AM 

PUT HAS 

** NOT BEEN FILLED. 

** ON IF WYINIT2 IS 

DETERMINING 

** TYPE OF EDIT. 

** ERROR RECORD WAS FOUND 

(SHORTER 

** THAN START BYTE, OR 

BAD CO 

** VI SAM SYNAD ENTRY 

OCCURRED. 

** 

** VSAM/VISAM EODAD ENTRY 

OCCURRED. 

** 

** RELAY OF 

CHANGE- PRINTSP ACE REQUEST 

** BY OPERATOR FROM 

CZAWU/ATT ALERT 

** CZAWY HAS PERFORMED 

FIRST-PASS 

** INITIALIZATION FOR 

THIS JOB. 

** OUTPUT JOB FLAG BYTE 3 

** JOB TO BE STOPPED BY 

SETL TYPE E 

** TO END OF OUTPUT 

DATA SET. 

SOFT CANCEL OPTION 

SOFT CANCEL OPTION MASK 

1=CZAWN ADDED 1 TO BCTNSR 

0=CZAWN DID NOT ADD 1 TO 

BCTNSR 

1=FINISH WITH NO STOW 

0=ISSUE FINISH AND A STOW 

FLAG WHICH INDICATES THAT 

AN 

ACK IS GREATER THAN 137 

BYTES 

** PRINTER SPACE OPTION 

** EDIT REQUESTED 

** P FOR PAGE NUMBERING 

REQUIRED 

** 

** H FOR PAGE HEADINGS 

REQUIRED 

#* 

** LAST RETURN CODE 

RECEIVED 

** RESERVED AREA 

** RESERVED AREA 

*♦ USER'S PAGE HEADING 

LINE 



(Listing of CHASET continued on page 35) 
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(Listing of CHASET continued from page 3**) 



LOCATION 
88 002D0 



INSTRUCTION SOURCE 



INST OPER 



COMMENT 



88 002D4 



88 002D8 

88 002DC 

88 002EO 
88 002E4 
88 002E8 
88 002EA 

88 002EC 
88 002F0 

88 002F4 

88 002F7 



88 002F8 
88 002F9 



SETYPGE 
SETYPGEB 

SETYOUTP 

SETYINP 

* 

SETBIG 

SETEND 

SETYLNS 

SETYUPL 

* 

* 

SETYLINE 

* 

SETYLRE 

* 
SETYMSKA 



88 002F7 



DS 
EQU 

DS 

DS 

DS 

DS 
DS 
DS 



DS 



DS 



DS 
ORG | 

DS 



00000008 

00000004 
00000002 

00000001 



00000000 
00000002 

00000004 



88 002FA 
88 002FC 
88 00300 
88 00304 
88 00308 
88 0030C 



88 0030E 
88 00310 



88 00312 
000000DA 



88 00312 
88 00313 
88 0031E 



88 00320 
(Listing 



88 00312 
00000080 



PL5 ** CURRENT PAGE NUMBER 

SETYPGE+L'SETYPGE-l ** LAST BYTE 

OF SETYPGE 
A ** POINTER TO OUTPUT 

RECORD 
A ** POINTER TO INPUT 

RECORD 

** RELATIVE START BYTE 

** RELATIVE END BYTE 

** MAXIMUM LINES PER PAGE 

** STANDARD NUMBER OF 

LINES BUMPED 

** AFTER ONE PRINT 

** CURRENT LINE NUMBER ON 

PAGE 
F ** LOGICAL RECORD LENGTH 

FOR FIXED 

** LENGTH RECORDS 
A ** 

SETYMSKA* 3 ** SERVES TO ALIGN 



F 
F 
H 

H 



H 



X , 08 i 

X i 04 f 
X , 02 f 



X 1 
X 



01' 



X 

X , 00 i 

X'02 f 

x^a 1 



SETYMASK 

* 

SETYPRMC EQU 

SETYPRAS EQU 
SETYPUMC EQU 

SETYPUAS EQU 
SETYCC DS 

* 

SETYCODE DS 

SETYCODN EQU 

SETYCODA EQU 

* 

SETYCODS EQU 

SETYJCD DS 

SETYCONT DS 

SETYNOWS DS 

SETYXPUT DS 

SETYXTRL DS 

SETYTRCT DS 

* 

SETYSHRT DS 

SETYBADC DS 

SETYBOT EQU 

SETYLENG EQU 

♦ 

SETYFLGD DS 
SETYPOP EQU 
SETYPOPM EQU 
SETFRM DS 

* 

SETCMB DS H 

* 

SETYTRCC DS 0XL3 
of CHASET continued on page 36) 



SETYMASK 

** MASK FOR PR/PU 

ASA/ MACHINE EDIT 

** PRINT WITH MACHINE 

EDIT 

PRINT WITH ASA EDIT 
PUNCH WITH MACHINE 



** 
** 

EDIT 

** 

** 



H 
H 



SETYBOT- 

X 

SETYFLGD 

x'so* 

CLIO 



PUNCH WITH ASA EDIT 
STANDARD CONTROL 

CHARACTER 

** JOB COMPLETION CODE 

** NORMAL JOB COMPLETION 

** ABNORMAL JOB 

TERMINATION 

SOFT CANCEL CODE FOR VSEND 

TO BM 

** COMPLETION CODE FOR 

EOJ MESSAGE 

** CONTINUATION ADDRESS 

FROM ERROR 

** SETNOW AT TIME OF 

ERROR 

** RETURN ADDRESS FROM 

WYXPUT 

** RETURN ADDR FROM 

WYTRAILR 

** COUNT OF TRIPLE SPACES 

OR BREAK 

** LINES REMAINING 

** COUNT OF SHORT RECORDS 

** COUNT OF RECORDS WITH 

BAD CC f S 

** BOTTOM OF JOB 

DEPENDENT AREA 
SETYTOP ** LENGTH OF JOB 

DEPENDENT AREA 

DEVICE FLAG 

TYPE OF DEVICE - 0=PUNCH 

1= PRINTER 

CARD PUNCH OR PRINTER FORM 

NUMBER 

USED BY MSAM SETUR MACRO. 

SDA OF CARD READER THAT CAN 

BE COM- 
BINED BY MSAM WITH THIS 

CARD PUNCH 

* TRAILER CONTROL 
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(Listing of CHASET continued from page 35) 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 


COMMENT 








* 






CHARACTERS 


88 


00320 




SETYSKP1 


DS 


X 


* SKIP TO CHANNEL 1 


88 


00321 




SETYSPC1 


DS 


X 


* SINGLE SPACE 


88 


00322 




SETYSPC3 


DS 


X 


* TRIPLE SPACE 


88 


00323 




SETFLA 

* 


DS 


XL1 


FLAG BYTE TEN 
N412.2 






88 00323 


SETHLD 


EQU 


SETFLA 


HOLD OUTPUT REQUEST 
N412.2 






00000080 


SETHLDM 


EQU 


X^O' 


N412.2 


88 


00324 




SETFLB 


DS 


XL1 


FLAG BYTE ELEVEN 
N412.2 






88 00324 


SETJOB 


EQU 


SETFLB 


BSN OUTPUT REQUEST 
N412.2 






00000080 


SETJOBM 


EQU 


X^O* 


N412.2 






88 00324 


SETOID 


EQU 


SETFLB 


USERID OUTPUT REQUEST 
N412.2 






00000040 


SETOIDM 


EQU 


X^O" 


N412.2 






88 00324 


SETPR 

* 


EQU 


SETFLB 


REQUEST FOR PRINTER OUTPUT 
N412.2 






00000008 


SETPRM 


EQU 


x'os' 


N412.2 






88 00324 


SETPU 


EQU 


SETFLB 


REQUEST FOR PUNCH OUTPUT 
N412.2 






00000004 


SETPUM 


EQU 


X'04' 


N412.2 


88 


00325 




SETOUI 


DS 


CL8 

2 
CL4 


USERID REQUESTED FOR OUTPUT 
N412. 


88 


0032D 




SETOBS 


DS 


BSN REQUESTED FOR OUTPUT 








♦ 






N412.2 


88 


00331 




SETOCT 

* 


DS 


XL1 


OUTPUT REQ BWQ SEARCH COUNT 
N412.2 


88 


00332 




SETRSV 


DS 


XL14 


RESERVED 
N412.2 






0000001D 


SETOUTL 


EQU 


♦-SETFLA 


LENGTH OF OUTPUT PARAMS 
N412.2 


88 


00340 




SETLST 


DS 


OX 


END OF S-ENTRY 
M03481 






00000340 


SETLEN 


EQU 


SETLST-CHASET LENGTH OF AN S-ENTRY 








♦ 






M03481 






88 00340 




1QRG1 







i 
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Buffer Page (CHABFP) 

The Buffer Page defines one page of virtual storage containing buffer slots for 
the RTAM program, CHABFP is pointed to by the CHAMTS control block; it is initially 
located in segment one of real core. 

CHABFP Storage map 



DEC 




4080 
4088 



HEX 




FFO 
FF8 





BFPCON 


1 
1 








BFPARA 






BFPFWD 


1 

1 


BFPREV | 


BFPACS 


|BFPLCK 
I 


(UNNAMED | 
1 1 


UNNAMED | 



ORG BFPCON 



0(BFPCN1 (BFPCN2 | BFPCN3 | BFPCN4 | 
I I i 1 I 

Fields in CHABFP — by displacement 



DEC HEX FIEID 
0000 0000 BFPCN1 

0000 0000 BFPCON 

0001 0001 BFPCN2 

0002 0002 BFPCN3 



DEC HEX FIELD 

0003 0003 BFPCN4 

0004 0004 BFPARA 
4080 0FF0 BFPFWD 
4084 0FF4 BFPREV 



DEC HEX FIELD 
4088 0FF8 BFPACS 
4090 0FFA BFPLCK 



Alphabetical list of fields in CHABFP 



FIELD 
BFPACS 


DEC HEX 
4088 0FF8 


FIELD 
BFPCN3 


DEC HEX 
0002 0002 


FIELD DEC HEX 
BFPLCK 4090 0FFA 


BFPARA 


0004 0004 


BFPCN4 


0003 0003 


BFPREV 4084 0FF4 


BFPCN1 


0000 0000 


BFPCON 


0000 0000 




BFPCN2 


0001 0001 


BFPFWD 


4080 0FF0 




sting of 


CHABFP 










LOCATION 


INSTRUCTION 


SOURCE 


INST OPER 


COMMENT 




0B 00000 


CHABFP 


DSECT 




0B 00000 




BFPCON 


DS 


F 


CONTROL INFORMATION 




0B 00000 




I ORG 


BFPCON 




0B 00000 




BFPCN1 


DS 


X 


CONTROL BYTE 1 




00000080 


BFPACT 


EQU 


x , 80 i 


ACTIVE BIT 


0B 00001 




BFPCN2 


DS 


X 


CONTROL BYTE 2 


0B 00002 




BFPCN3 


DS 


X 


CONTROL BYTE 3 


0B 00003 




BFPCN4 


DS 


X 


CONTROL BYTE 4 




00000004 


BFPCNL 


EQU 


4 


LENGTH OF CONTROL AREA 


0B 00004 




BFPARA 


DS 


1019F 


MAX BUFFER SIZE 




00000FF0 


BFPLGH 


EQU 


♦-BFPCON 


BUFFER AREA 


0B 00 FFO 




BFPFWD 


DS 


F 


FORWARD POINTER 


0B O0FF4 




BFPREV 


DS 


F 


REVERSE POINTER 


0B 00FF8 




BFPACS 


DS 


H 


NUMBER OF ACTIVE SLOTS 


0B 00FFA 




BFPLCK 


DS 


X 


LOCK BYTE 


0B 00FFB 






DS 


X 


NOT USED 


0B O0FFC 






DS 


F 


NOT USED 
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Builtin Procedure Key (CHABPK) 



The Builtin Procedure Key (CHABPK) is a communication area for parameters passed 
from the command controller to a builtin procedure. The BUILTIN command, defining 
the builtin procedure, specifies the origin of CHABPK. 
CHABPK resides in virtual storage aligned on word boundaries. 

CHABPK Storage map 



HEX 



DEC 



8 
16 



Fields in CHABPK — by displacement 



0| 

1 


BPKENT 


BPKPS 


8| 

1 


BPKNO 


BPKPAR 


10| 

1 


BPKSNO 





DEC HEX FIELD 
0000 0000 BPKENT 
0004 0004 BPKPS 
0008 0008 BPKID 



DEC HEX FIELD 



DEC HEX FIELD 
0016 0010 BPKSNO 



0008 0008 BPKNO 
0012 000C BPKSPTR (EQU) 0020 0014 BPKSPAR 
(EQU) 0012 000C BPKPAR 



Alphabetical list of fields in CHABPK 

FIELD DEC HEX FIELD 

BPKENT 0000 0000 BPKPAR 

BPKID 000 8 0008 (EQU) BPKPS 

BPKNO 0008 0008 BPKSNO 



DEC HEX 
0012 OO0C 
0004 0004 
0016 0010 



FIELD 



DEC HEX 



BPKSPAR 0020 0014 
BPKSPTR 0012 000C (EQU) 



Assembler listing of CHABPK 



LOCATION INSTRUCTION SOURCE 



INST OPER 



COMMENT 



************************************************************* ********** 

* NSRB 441 * 

* THIS DSECT IS USED TO COVER THE EXPANSION OF THE BPKD MACRO * 
*********************************************************************** 

0C 00000 CHABPK DSECT 

ENTRY POINT OF MODULE TO BE 

CALLED 

PSECT ADDR OF MODULE TO BE 

CALLED 

NO OF PARAMETERS FOR MODULE 

WITH ORIGINAL BPK 

ID FOR BPK WITH 

SUBPARAMETERS 

PLIST FOR ORIGINAL BPK 

POINTER TO EXTENDED ELIST 

NUMBER OF PARAMETERS FOR 

MODULE WITH EXTENDED BPK 

PLIST FOR EXTENDED BPK 



OC 00000 






BPKENT 


DS 


A 


0C 00004 






BPKPS 


DS 


A 


0C 00008 






BPKNO 


DS 


F 




OC 


00008 


BPKID 


EQU 


BPKNO 


OC ooooc 






BPKPAR 


DS 


A 




0C 


ooooc 


BPKSPTR 


EQU 


BPKPAR 


0C 00010 






BPKSNO 


DS 


F 


0C 00014 






BPKSPAR 


DS 


OF 
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Buffer Page List (CHABPL) 

The Buffer Page List (BPL) describes the location and status of all buffers in a 
buffer pool. The BPL is located at the beginning of the buffer pool and is created 
by the GETBUF routine the first time a buffer is requested from the pool. 

The BPL contains a doubleword header and a double word entry for each buffer in 
the pool, and occupies 16 bytes of virtual storage, aligned on doubleword boundaries. 

CHABPL Storage map 



DEC 




HEX 
Of 

L 
81 

I. 



BPLRS1 



BPLNPG 



BPLADD 



|BPLRS2 (BPLNBF | 

I 1 i 

BPLUSE J 



Fields in CHABPL — by displacement 



DEC HEX FIELD 
0000 0000 BPLRS1 
0004 0004 BPLNPG 



DEC HEX FIELD 

0006 0006 BPLRS2 

0007 0007 BPLNBF 



DEC HEX FIELD 
0008 0008 BPLADD 
0012 000C BPLUSE 



Alphabetical list of fields in CHABPL 



( 



FIELD 
BPLADD 


DEC 
0008 


HEX 
0008 


FIELD DEC HEX 
BPLNPG 0004 0004 


FIELD 
BPLRS2 


DEC HEX 
0006 0006 


BPLNBF 


0007 


0007 


BPLRS1 0000 0000 


BPLUSE 


0012 000C 


sting of 


CHABPL 


SOURCE 


INST OPER 


COMMENT 




LOCATION 


INSTRUCTION 






0D 00000 


CHABPL 


DSECT 






0D 00000 








DS 0D 






0D 00000 






BPLRS1 


DS F 


RESERVED 




0D 00004 






BPLNPG 


DS H 


NUMBER OF PAGES IN POOL 


0D 00006 






BPLRS2 


DS X 


RESERVED 




0D 00007 






BPLNBF 


DS X 


NUMBER OF UNUSED BUFFERS IN 








* 




TBL 




0D 00008 






BPLADD 


DS F 


BUFFER ADDR 




0D 0000C 






BPLUSE 


DS XL4 


BUFFER IN USE FLAG 




000000FF 


BPLUSM 


EQU X'FF* 


MASK FOR IN 


USE FLAG 
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BULKIO Performance Table CCHABPT) 



CHABPT is a table of entries for each type of device which may be assigned 
to BULKIO. Values in each entry represent the approximate time it takes to 
fill or empty the specified number of buffers for the device being described. 

For each device assigned to BULKIO, this table will be used to select the 
appropriate base time value. Base time values will then be used by BULKIO in 
order to ensure that BULKIO will never cycle faster than the base time of the 
fastest active device assigned to it. 

CHABPT Storage map 



t 



DEC 




HEX 
0| 



BPTCNT 



BPTTYP 



BPTSIN 



BPTDOU 



L 



BPTTRI 



± 



BPTQUA 



BPTQUI 



Fields in CHABPT — by displacement 



DEC HEX FIELD 
0000 0000 BPTCNT 
0002 0002 BPTTYP 
0004 0004 BPTSIN 



DEC HEX FIELD 
0006 0006 BPTDOU 
0008 0008 BPTTRI 
0010 000A BPTQUA 



DEC HEX FIELD 
0012 000C BPTQUI 



Alphabetical list of fields in CHABPT 



FIELD 

BPTCNT 

BPTDOU 



DEC HEX 
0000 0000 
0006 0006 



BPTQUA 0010 000A 



FIELD DEC HEX FIELD 

BPTQUI 0012 000C BPTTYP 

BPTSIN 0004 0004 

BPTTRI 0008 0008 



DEC HEX 
0002 0002 



Assembler listing of CHABPT 



LOCATION INSTRUCTION SOURCE INST OPER 
0E 00000 CHABPT DSECT 

* 



COMMENT 

BULKIO PERFORMANCE TABLE 
N319.37 



*********************************************************************** 

* CODE BELOW FOR BIO DYNAMIC BASE TIME INTERVAL - NSRB 319.37 * 

* CHABPT — DSECT FOR CHBBP : BULKIO PERFORMANCE TABLE * 

* A TABLE OF ENTRIES FOR EACH TYPE OF DEVICE WHICH MAY BE ASSIGNED TO* 

* BULKIO. VALUES IN EACH ENTRY REPRESENT THE APPROXIMATE TIME IT * 

* TAKES TO FILL OR EMPTY THE SPECIFIED NUMBER OF BUFFERS FOR THE * 

* DEVICE IN QUESTION. FOR EACH DEVICE ASSIGNED TO BULKIO, THIS TABLE* 

* WILL BE USED TO SELECT THE APPROPRIATE BASE TIME VALUE. BASE TIME * 

* VALUES WILL THEN BE USED BY BULKIO IN ORDER TO INSURE THAT BULKIO * 

* WILL NEVER CYCLE FASTER THAN THE BASE TIME OF THE FASTEST ACTIVE * 

* DEVICE ASSIGNED TO IT. * 

* *********************** * ****************************** ****** ********** 



0E 00000 
0E 00002 

0E 00004 
0E 00006 
0E 00008 
0E 0000A 

0E 0000C 



00O0000C 
00000005 



BPTCNT 

BPTTYP 

* 

BPTSIN 

BPTDOU 

BPTTRI 

BPTQUA 

* 

BPTQUI 

* 

BPTLEN 

BPTHI 

* 

* 



DS 
DS 

DS 
DS 
DS 
DS 

DS 

EQU 
EQU 



H 
XL2 

H 
H 
H 
H 



BPTTYP 



DEVICE ENTRY COUNT 

DEVICE CODE (LAST 2 BYTES OF 

SDADEV) 

BASE TIME-SINGLE BUFFERED 

BASE TIME-DOUBLE BUFFERED 

BASE TIME-TRIPLE BUFFERED 

BASE TIME-QUADRUPLE 

BUFFERED 

BASE TIME-QUINTUPLE 

BUFFERED 

LENGTH OF DEVICE ENTRY 

NUMBER OF BUFFER TIME 

ENTRIES 

PER DEVICE ENTRY 
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BULKIO Message DSECT (CHABWM) 



V 



CHABWM maintains a standard for all messages output by the BULKIO message modules: 
CZAWM and CZAWN. CZAWN uses MSAM PUT to write the messages to an RJE station, and so 
must limit the message length to 132 bytes. If the specified message is greater than 
132 bytes f CZAWN references CHABWM at two points, for separate 132-byte message 
pieces, and uses MSAM PUT twice to write the total message in two parts. 
CHABWM is 256 bytes in length. 



CHABWM Storage map 



DEC 




HEX 
01 



BWMLEN 



ORG BWMLEN 



0| 

I. 
81 



BWMOUTL 



BWMHEADE 



ORG BWMHEADE* 8 



12 



BWMKEY 



Fields in CHABWM — by displacement 

DEC HEX FIELD 

0000 0000 BWMOUTL 

0000 0000 BWMLEN 

0004 0004 BWMHEADE 



DEC HEX FIELD DEC HEX FIELD 

0009 0009 BWMBIOID (EQU) 0136 0088 BWMSPLIT CEQU) 

0012 O0OC BWMKEY 

0014 000E BWMOUT (EQU) 



Alphabetical list of fields in CHABWM 



FIELD 



DEC HEX 



FIELD 



BWMBIOID 0009 0009 (EQU) BWMLEN 
BWMHEADE 0004 0004 BWMOUT 
BWMKEY 0012 000C BWMOUTL 



DEC HEX 
0000 0000 
0014 OO0E (EQU> 
0000 0000 



FIELD 



DEC HEX 



BWMSPLIT 0136 0088 (EQU) 



Assembler listing of CHABWM 



LOCATION INSTRUCTION 

OF 00000 
OF 00000 



OF 00000 



OF 00000 
OF 00004 

OF 0000C 



OF OOOOC 

OF 0000E 
OF 00088 
OF 00088 
OF 00100 
OF 00009 
00000002 
O0O0O00C 
00000100 
O00000OA 



SOURCE 
CHABWM 
BWMLEN 

I 

BWMOUTL 
BWMHEADE 

I 
BWMKEY 
BWMOUT 

i 

BWMSPLIT 

I 

BWMBIOID 

BWMKEYL 

BWMKEYP 

BWMLRECL 

BWMHEDLE 



INST OPER COMMENT 

DSECT BULKIO MESSAGE DSECT 

MAXIMUM SIZE FOR WRITE 

LENGTH OF MESSAGE 

NON DATA PORTION OF MASSAGE 

MESSAGE KEY 



CL256 

BWMLEN 

A 

CLIO 

BWMHEADE+8 

H 

♦ 

BWMHEADE+132 

* 

BWMHEADE+5 BULKIO MODULE ID 
L ' BWMKEY KEYLENGTH 
(BWMKEY-BWMOUTL) KEY POSITION 
L* BWMLEN LOGICAL RECORD LENGTH 
L 1 BWMHEADE HEADER LENGTH 
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Batch Work Queue (CHABWQ) 



The Batch Work Queue (BWQ) stores requests for nonconversational tasks until they 
can be initiated. The BWQ also maintains a record of active nonconversational tasks. 
BWQ occupies 200 bytes of virtual storage, aligned on doubleword boundaries. 



t 



CHABWQ Storage map 



DEC 




HEX 
01 



BWQTID 



| BWQ AC | BWQ ST | 



BWQSYS 



32 


20 


40 


28 


48 


30 


56 


38 


64 


40 


72 


48 


80 


50 



[RESERVED] 



BWQUID 



J_ 



BWQBSN 


BWQPWD 


BWQPWD 


(CONT) 


BWQCHG 


BWQCHG 


(CONT) 


BWQSTA 


BWQSTA 


(CONT) 


BWQDV1 


BWQDV2 


BWQPFL 1 
1 



BWQPAR 



ORG *-4 



76 4C 



| BWQDEA | BWQDEB | BWQDEC | BWQDED 
I I I 1 



ORG BWQPAR 



85 



55 



120 


78 


128 


80 


136 


88 


144 


90 


152 


98 









1 

1 












BWQDSN 






BWQBYT 




1 

1 


BWQBBT 






BWQSPC 




| BWQH | 
i I 


BWQLNS 




BWQLNS 


(BWQP | 




BWQERS 




( BWQERR | 

1 1 




BWQERR 


(CONT) 


I 
1 


BWQFRJV5 





BWQFRM (CONT) 



| BWQTPT J 

_L 



(CHABWQ continued on page 43) 
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DEC 



HEX 



(CHABWQ continued from page 42) 



J 



BWQBLK 



L 

ORG BWQPAR 



85 



55 



r 



120 


78 


128 


80 


136 


88 


144 


90 











1 

1 










BWQNWE 






BWQBTE 




I 
1 


BWQBBE 






BWQSEL 




1 
1 


BWQRSE 




BWQRSE | 
I 






BWQBIN 




| BWQFOR | 
1 1 




BWQFOR 


(CONT> 




i 
I 










BWQBLN 





ORG BWQPAR 



85 55 



120 



152 
160 
168 
176 
184 



78 



98 
A0 
A8 
B0 
B8 





i 

1 








BWQNAM 




BWQNNM | 




BWQVID | 


BWQVID | BWQFAC 
1 


BWQBYE 




| BWQBBY | 
I I 


BWQBBY CCONT) 


BWQSPA 




| BWQHH | 
1 1 


BWQLNE 


| BWQPP | 
1 I 


BWQASE 




BWQASE (CONT) | 

1 


BWQBNK 











(CHABWQ continued on page 44) 
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DEC HEX 
ORG BWQPAR 



(CHABWQ continued from page 43) 



85 

88 



55 
58 



128 
136 



80 
88 



168 
176 



A8 
BO 









1 

1 


BWQVOL | 


BWQVOL 


(CONT) 


1 

1 


BWQTRK 


1 1 
1 1 


BWQTDS | 


| BWQRID | 
1 1 


BWQRID | 
1 






BWQIDS 










1 

1 


BWQLN | 


BWQRRR | | 

1 1 


BWQBLA | 



Fields in CHABWQ — by displacement 



DEC 
0000 
0002 
0003 

0004 

0040 
0048 
0052 
0060 
0068 
0076 
0076 
0077 
0078 
0079 
0080 
0084 
0085 
0085 
0085 



HEX 

0000 

0002 

0003 

0004 

0028 

0030 

0034 

003C 

0044 

004C 

004C 

004D 

004E 

004F 

0050 

0054 

0055 

0055 

0055 



FIELD 

BWQTID 

BWQAC 

BWQST 

BWQSYS 

BWQUID 

BWQBSN 

BWQPWD 

BWQCHG 

BWQSTA 

BWQDEA 

BWQDV1 

BWQDEB 

BWQDEC 

BWQDED 

BWQDV2 

BWQPFL 

BWQVOL 

BWQNAM 

BWQNME 




FIELD 

BWQDSN 

BWQPAR 

BWQTRK 

BWQTDS 

BWQNNM 

BWQBTE 

BWQBYT 

BWQBBE 

BWQBBT 

BWQSEL 

BWQSPC 

BWQRID 

BWQRSE 

BWQH 

BWQLNS 

BWQIDS 

BWQBIN 

BWQP 

BWQERS 



Alphabetical list of fields in CHABWQ 



FIELD 



BWQAC 

BWQASE 

BWQBBE 

BWQBBT 

BWQBBY 

BWQBIN 

BWQBLA 

BWQBLK 

BWQBLN 

(Continued on 



DEC 

0002 

0181 

0124 

0124 

0167 

0137 

0182 

0156 

0149 



HEX 

0002 

00B5 

007C 

007C 

00A7 

0089 

00B6 

009C 

0095 

page 



45) 



FIELD 

BWQBNK 

BWQBSN 

BWQBTE 

BWQBYE 

BWQBYT 

BWQCHG 

BWQDEA 

BWQDEB 

BWQDEC 



DEC 

0186 

0048 

0120 

0163 

0120 

0060 

0076 

0077 

0078 



HEX 

00BA 

0030 

0078 

00 A3 

0078 

003C 

004C 

004D 

004E 



DEC 

0143 

0143 

0149 

0149 

0155 

0155 

0156 

0161 

0163 

0167 

0171 

0172 

0175 

0176 

0176 

0180 

0181 

0182 

0186 



HEX 

008F 

008F 

0095 

0095 

009B 

009B 

009C 

00A1 

00A3 

00A7 

00AB 

00 AC 

00AF 

O0B0 

00B0 

00B4 

00B5 

00B6 

00BA 



FIELD 

BWQFOR 

BWQERR 

BWQBLN 

BWQFRM 

BWQVID 

BWQTPT 

BWQBLK 

BWQFAC 

BWQBYE 

BWQBBY 

BWQSPA 

BWQLN 

BWQHH 

BWQRRR 

BWQLNE 

BWQPP 

BWQASE 

BWQBLA 

BWQBNK 



FIELD 

BWQDED 

BWQDSN 

BWQDV1 

BWQDV2 

BWQERR 

BWQERS 

BWQFAC 

BWQFOR 

BWQFRM 



DEC 

0079 

0085 

0076 

0080 

0143 

0138 

0161 

0143 

0149 



HEX 

004F 

0055 

004C 

0050 

008F 

008A 

00A1 

008F 

0095 



44 CHABWQ 



(Continued from page 44) 



FIELD 

BWQH 

BWQHH 

BWQIDS 

BWQLN 

BWQLNE 

BWQLNS 

BWQNAM 

BWQNME 

BWQNNM 

BWQP 



Assembler listing of CHABWQ 




FIELD 


DEC 


HEX 


BWQPAR 


0085 


0055 


BWQPFL 


0084 


0054 


BWQPP 


0180 


00 B4 


BWQPWD 


0052 


0034 


BWQRID 


0129 


0081 


BWQRRR 


0176 


OOB0 


BWQRSE 


0132 


0084 


BWQSEL 


0128 


0080 


BWQSPA 


0171 


00AB 


BWQSPC 


0128 


0080 



( 



LOCATION 

10 00000 

10 00000 
10 00002 



INSTRUCTION SOURCE 
10 00000 CHABWQ 



00000080 
00000040 
00000020 
00000010 
00000008 
00000004 
00000002 



10 00003 



00000080 
00000040 
00000020 

00000010 



10 00004 

10 00028 

10 00028 
10 00030 



10 00034 
10 0003C 
10 00044 
10 0004C 



10 0004C 



10 0004C 

00000001 

00000002 
00000003 
00000004 

00000000 

00000001 
00000002 
00000004 
00000008 
00000020 
00000080 

10 0004E 

00000010 
00000020 

(Listing of CHABWQ 



10 0004D 



BWQTID 

BWQAC 

BWQAC1 

BWQAC2 

BWQAC 3 

BWQAC4 

BWQAC5 

BWQAC6 

BWQAC7 

* 

BWQST 

BWQST1 

BWQST 2 

BWQST3 

* 

BWQST4 
BWQSYS 



* 

BWQUID 

BWQBSN 



BWQPWD 
BWQCHG 
BWQSTA 
BWQDV1 

* 



BWQDEA 
BWQMCA 

* 

BWQMCB 
BWQMCC 
BWQMCD 

* 

BWQANT 
BWQDEB 
BWQDCA 
BWQDCB 
BWQDCD 
BWQBUR 
BWQBDA 
BWQBMT 
BWQDEC 
BWQUT1 
BWQUT2 
continued 



INST OPER 

DSECT 

DS 0D 



DS 

DS 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

DS 

EQU 
EQU 
EQU 

EQU 
DS 

DS 

DS 
DS 



EQU 

DS 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

DS 

EQU 

EQU 



XL2 

XL1 

X^O' 

X^O" 

X^O 1 

X'lO 1 

X f 08 - 

X f 04' 

X'02* 

XL1 

X«80 f 
X^O' 
X'20 f 

X'10' 
CL35 

OF 

CL8 
CL4 



DS CL8 

DS CL8 

DS CL8 

DS XL4 



| ORG | *-4 

DS XL1 

EQU X f 01' 

EQU X'02 i 

EQU X'03 1 

EQU X f 04 f 



X^O' 

XL1 

X'01' 

X'02' 

X , 04« 

X*Q8* 

X^O' 

X^O' 

XL1 

X'lO 1 

X'20' 



FIELD 


DEC 


HEX 


BWQST 


0003 


0003 


BWQSTA 


0068 


0044 


BWQSYS 


0004 


0004 


BWQTDS 


0094 


005E 


BWQTID 


0000 


0000 


BWQTPT 


0155 


009B 


BWQTRK 


0091 


005B 


BWQUID 


0040 


0028 


BWQVID 


0155 


009B 


BWQVOL 


0085 


0055 



COMMENT 

BATCH WORK QUEUE 
ALIGN TO DOUBLE WORD 
BOUNDARY 
TASK ID (BINARY) 
ACTIVITY FLAG (BINARY) 
EXECUTE TASK 
LIST TASK 
BATCH TASK 
CARD TASK 
RTAPE TASK 
TAPE TASK 
TASK INITIATION 
REQUEST FROM BATCH 
STATUS FLAG (BINARY) 
IN-SERVICE FLAG 
CANCELLED FLAG 
CANCELLED DUE TO SHUT- 
DOWN 

ERASE REQUESTED 
SYS IN DATA SET NAME 
(EBCDIC) 

ALIGN TO FULL WORD 
BOUNDARY 
USER ID (EBCDIC) 
BATCH SEQUENCE NUMBER 
(EBCDIC) (USED AS DATA 
KEY) 

PASSWORD (EBCDIC) 
CHARGE NUMBER (EBCDIC) 
RJE STATION ID 
DEVICE CODE FIELD FOR FIRST 
UNIT RECORD DEVICE OR 
PRIVATE VOLUME FOR 
BULKIO TASK (BINARY), 
(SEE SDADEV IN 2.4.38.) 
SUBFIELD ALIGNMENT 
MODEL CODE 
1050 TERMINAL SYSTEM 
MASK-TAM 

2741 TERMINAL MASK-TAM 
MOD 35 TTY MASK-TAM 
1052-MOD 7 TERMINAL 
MASK-TAM 

MODEL NOT A TERMINAL 
DEVICE CLASS 
DIAL LINE MASK-TAM 
DEDICATED LINE MASK-TAM 
AUTOMATIC CALL FEATURE-TAM 
DEVICE CLASS UNIT RECORD 
DEVICE CLASS DIRECT ACCESS 
DEVICE CLASS MAGNETIC TAPE 
UNIT TYPE 

IBM TERMINAL CONTROL TYPE 1 
IBM TERMINAL CONTROL TYPE 2 



on page 46) 



CHABWQ 4 5 



(Listing of CHABWQ continued from page 45 ) 



LOCATION INSTRUCTION SOURCE 



INST OPER 



10 0004F 



00000030 
00000040 
00000080 

00000001 

00000002 

00000003 

00000004 

00000005 
00000001 
00000002 
00000008 
00000010 
00000001 
00000002 
00000003 
00000008 
00000001 

00000010 
00000020 
00000030 
00000040 
00000050 
00000000 
00000001 
00000002 
00000003 
00000040 
00000080 
00000080 
00000080 
00000040 
OO000OB0 
OOO000EO 

OOO0O0A0 

O000O0CO 
00000080 



10 00050 

10 00054 
10 00055 

10 00055 
10 00078 
10 0007C 
10 00080 
10 00084 



10 00055 



BWQUT3 
BWQUT4 
BWQUT5 

BWQUTA 

BWQUTB 

* 

BWQUTC 

BWQUTD 

BWQUTE 

BWQCRD 

BWQCPN 

BWQCPT 

BWQPPT 

BWQDA11 

BWQDA01 

BWQDA21 

BWQDA14 

BWQTAPE 

BWQDED 

BWQOFA 

BWQOFB 

BWQOFC 

BWQOFD 

BWQOFE 

BWQOF1 

BWQOF2 

BWQOF3 

BWQOF4 

BWQPFR 

BWQOCI 

BWQDUC 

BWQSCN 

BWQTRV 

BWQSTO 

BWQTPW 

BWQTPN 

BWQTR9 
BWQTP9 
BWQDV2 

* 
* 
* 

* 
BWQPFL 

* 

BWQPAR 

* 
* 

BWQDSN 

BWQBYT 

BWQBBT 

* 

BWQSPC 

* 
BWQH 



EQU 
EQU 
EQU 

EQU 



EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

DS 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 



EQU 

EQU 
EQU 
DS 



DS 



DS 



X'30 t 
X'UO 1 
X^O' 

X'Ol* 



EQU X'02' 
EQU. X , 03 i 



X , 04 i 

X'05 f 
X'Ol' 
X'02' 

x'os' 

X'10' 

X'Ol' 

X«02 - 

X'03* 

X'08" 

X^l" 

XL1 

X'lO* 

X^O' 

X^O 1 

X'40 f 

X'50' 

X'OO' 

X'Ol 1 

X , 02' 

X'03' 

X f 40' 

X^O' 

X^O" 

X^O' 

X'40' 

X'BO' 

X'EO' 




DS 



DS 



DS 



DS 



X'AO' 
X'CO' 

x'so' 

XL4 



XL1 



CL115 



CL35 



XL4 



COMMENT 

TELEGRAPH CONTROL TYPE 1 

TELEGRAPH CONTROL TYPE 2 

WORLD TRADE TERMINAL 

CONTROL 

270 2 TRANSMISSION 

CONTROL-TAM 

2701 ON MULTIPLEXOR 

CHANNEL-TAM 

MULTIPLEXOR 

CHANNEL-TAM (1052-7) 

SELECTOR CHANNEL MASK (TAM 

1052-7) 

2701 ON SELECTOR CHANNEL 

2540 CARD READER 

2540 CARD PUNCH 

1403 PRINTER 

PPT READER 

D/A 



2671 
2311 
2301 D/A 
2321 D/A 



2314 D/A 
2400 SERIES 
OPTIONAL FEATURES 
IBM LINE ADAPTER TYPE 1-TAM 
IBM LINE ADAPTER TYPE 2 -TAM 
DATA SET LINE ADAPTER-TAM 
AUTOMATIC CALL ADAPTER-TAM 
TELEGRAPH LINE ADAPTER-TAM 
SAD ZERO MASK-TAM 
SAD ONE MASK-TAM 
SAD TWO MASK-TAM 
SAD THREE MASK-TAM 
PUNCH FEED READ 
CARD IMAGE 

UNIVERSAL CHAR SET (PTR) 
SCAN- D/A 

TRACK OVERFLOW- D/A 
SCAN AND TRACK OVER FLOW- D/A 
7 TRACK WITH DATA 
CONVERSION 

7 TRACK WITHOUT DATA 
CONVERSION 
9 TRACK TAPE 
9 TRACK TAPE 
DEVICE CODE FIELD FOR 
SECOND UNIT RECORD DEVICE 
OR PRIVATE VOLUME FOR 
BULKIO TASK (BINARY - ZERO 
IF NOT REQUIRED) . 
(SEE SDADEV IN 2.4.38.) 
FLAG INDICATING WHICH 
DEVICES 

ARE USED BY THIS TASK. 
BULKIO PARAMETER LIST 
M3431 
THE FOLLOWING ENTRIES ARE INCLUDED ONLY 
A LIST TASK. 
BWQPAR 

DSNAME OF DATA SET TO BE 

PRINTED (EBCDIC) 

STARTING BYTE NUMBER 

(BINARY) 

ENDING BYTE NUMBER 

( BINARY ) 

PRINT SPACING PARAMETER 

(EBCDIC) 

HEADER PARAMETER 

(EBCDIC) 



XL4 



CL4 



CL1 



(Listing of CHABWQ continued on page 47) 
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(Listing of CHABWQ continued from page 4 6) 



LOCATION INSTRUCTION SOURCE 



INST OPER 



COMMENT 



10 


00085 




BWQLNS 

* 


DS 


xl4 


10 


00089 




BWQP 

* 


DS 


CL1 


10 


0008A 




BWQERS 


DS 


CL5 


10 


0008F 




BWQERR 


DS 


CL6 


10 


00095 




BWQFRM 


DS 


CL6 


10 


0009B 




BWQTPT 


DS 


XL1 






00000001 


BWQAAC 


EQU 


X'Ol' 






00000002 


BWQAAD 


EQU 


X'02 f 






OOOOOOOU 


BWQAAE 


EQU 


x'04' 






00000008 


BWQADE 


EQU 


X f 08' 






00000000 


BWQAEC 

4c 


EQU 


X'OO" 


10 


0009C 




BWQBLK 


DS 


XL44 



10 00055 



10 00055 

10 00078 

10 0007C 

10 00080 

10 00084 
10 00089 
10 0008F 
10 00095 



10 00055 



10 00055 

10 00078 

10 0009B 
10 000A1 
10 000A3 

10 000A7 

10 000AB 

10 000AF 
10 000B0 

10 000B4 
10 000B5 
10 000BA 



10 
10 00055 
10 0005B 
(Listing of 



BWQNME 

BWQBTE 
* 

BWQBBE 

BWQSEL 

BWQRSE 
BWQBIN 
BWQFOR 
BWQBLN 

* 

BWQNAM 

# 

BWQNNM 

BWQVID 
BWQFAC 

BWQBYE 

BWQBBY 

BWQSPA 
* 

BWQHH 
BWQLNE 

* 

BWQPP 

BWQASE 

BWQBNK 



00055 

BWQVOL 
BWQTRK 

CHABWQ continued 



NUMBER OF LINES ON A PAGE 
(BINARY) 

PAGINATION PARAMETER 
(EBCDIC) 

ERASE PARAMETER (EBCDIC) 
ERROR OPTION (EBCDIC) 
PRINTER FORM (EBCDIC) 
TAPE TYPE PRINT OPTION 
ASCII CHARACTOR OPTION 
ASCII DUMP OPTION 
ASCII EDIT OPTION 
EBCDIC DUMP OPTION 
DEFAULT-STANDARD TAPE 
PROCESSING 
RESERVED 
M3431 

THE FOLLOWING ENTRIES ARE INCLUDED ONLY 

FOR A CARD TASK. 
| ORG | BWQPAR 

DSNAME OF DATA SET TO BE 
PUNCHED (EBCDIC) 
STARTING BYTE NUMBER 
(BINARY) 

ENDING BYTE NUMBER 
(BINARY) 

POCKET SELECT PARAMETER 
(EBCDIC) 

ERASE PARAMETER (EBCDIC) 
PUNCH FORMAT (EBCDIC) 
CARD FORM (EBCDIC) 
RESERVED 
M3431 

THE FOLLOWING ENTRIES ARE INCLUDED ONLY 

FOR TAPE TASK. 



DS 

DS 

DS 

DS 

DS 
DS 
DS 
DS 



CL35 

XL4 

XL4 

CL4 

CL5 
CL6 
CL6 
XL51 



1 ORG \ 

DS 



BWQPAR 
CL3 5 



DSNAME OF DATA SET TO BE 

WRITTEN ONTO TAPE (EBCDIC) 
DS CL35 TAPE DATA SET NAME 

(EBCDIC) 
DS CL6 TAPE VOLUME ID (EBCDIC) 
DS XL2 BLOCKING FACTOR (BINARY) 
DS XL4 STARTING BYTE NUMBER 

(BINARY) 
DS XL4 ENDING BYTE NUMBER 

(BINARY) 
DS CL4 SPACING PARAMETER 

(EBCDIC) 
DS CL1 HEADER OPTION (EBCDIC) 
DS XL4 NUMBER OF LINES ON A PAGE 

(BINARY) 
DS CL1 PAGINATION OPTION (EBCDIC) 
DS CL5 ERASE PARAMETER (EBCDIC) 
DS XL14 RESERVED 
M3431 
THE FOLLOWING ENTRIES ARE INCLUDED ONLY 
FOR A RTAPE TASK. 
[ ORG ! BWQPAR 

DS CL6 TAPE VOLUME ID (EBCDIC) 
DS CL3 TRACK PARAMETER 
on page 48) 
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(Listing of CHABWQ continued from page 47) 



LOCATION 


INSTRUCTION SOURCE 

* 


INST 


OPER 


COMMENT 
(EBCDIC) 


10 0005E 


BWQTDS 

* 


DS 


CL35 


TAPE DATA SET NAME 
(EBCDIC) 


10 00081 


BWQRID 


DS 


CL8 


USER I.D. OF OWNER OF 


10 00089 


BWQIDS 

* 


DS 


CL3 5 


NEW DATA SET NAME 
TAPE AND NEW DATA SET 
(EBCDIC) 


10 000AC 


BWQLN 


DS 


CL<* 


LINE NUMBER OPTION 
(EBCDIC) 


10 000B0 


BWQRRR 


DS 


CL6 


ERROR OPTION (EBCDIC) 


10 00OB6 


BWQBLA 

* 


DS 


XL18 


RESERVED 
M3431 



i 



4 8 CHABWQ 



Core Block Table (CHACBT) and Core Block Table Header (CHACBH) 

The Core Block Table (CBT) contains information required for the allocation or 
release of core storage blocks. The CBT contains one entry for each core storage 
block (4 096 bytes) in the system. Each entry describes the current status of the 
core storage block it represents (all entries are contiguous) . 

The Core Block Table Header (CBH) contains the parameters for addressing the Core 
Block Table. The Core Block Table Header entries immediately precede the CBT entries 
in storage. 

The CBT and CBH are resident and are maintained by the User Core Allocation Queue 
Processor and User Core Release. 

The CBT occupies 20 bytes of core storage per entry while the CBH consists of 25 
bytes of core storage, both aligned on word boundaries. 

CHACBT Storage map 



DEC 


8 

16 



HEX 



0| 

1 


CBTFLK 


CBTTPT 


8| 

1 


CBTVMA 


CBTFLG 


|CBTFLG2 |CBTFLG3 |CBTFLG4 
1 1 1 


10 | 

i 


CBTRLK 







Fields in CHACBT — by displacement 



( 



DEC 

0000 

0004 

0008 

0012 

0012 

0012 

0012 

0012 



HEX 

0000 

0004 

0008 

000C 

000C 

OO0C 

oooc 
oooc 



FIELD 

CBTFLK 

CBTTPT 

CBTVMA 

CBTXP3 

CBTXP2 

CBTXP1 

CBTFLG1 

CBTRE 



DEC 

0012 

0012 

0012 

(EQU) 0012 

(EQU) 0012 

(EQU) 0012 

(EQU) 0013 

(EQU) 0013 



HEX 

OOOC 

OOOC 

OOOC 

OOOC 

OOOC 

OOOC 

000D 

000D 



FIELD 

CBTPA 

CBTOP 

CBTRS 

CBTUS 

CBTAV 

CBTFLG 

CBTPST 

CBTAF 



(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 

(EQU) 
(EQU) 



DEC 

0013 

0013 



HEX FIELD 
000D CBTRF 



000D CBTSF 

0013 O00D CBTFLG2 

0014 000E CBTFLG3 

0015 O00F CBTFLG4 

0016 0010 CBTRLK 
0020 0014 CBTEND 



(EQU) 
(EQU) 



Alphabetical list of fields in CHACBT 



FIELD 

CBTAF 

CBTAV 

CBTEND 

CBTFLG 

CBTFLG1 

CBTFLG2 

CBTFLG3 

CBTFLG4 



DEC HEX 
0013 000D 
0012 OOOC 
0020 0014 
0012 OOOC 

0012 OOOC 

0013 000D 

0014 O00E 

0015 000F 



FIELD 
(EQU) CBTFLK 
(EQU) CBTOP 
CBTPA 
CBTPST 
(EQU) CBTRE 
CBTRF 
CBTRLK 
CBTRS 



HEX 

0000 

OOOC 

OOOC 

000D 

OOOC 

000D 

0010 

OOOC 



(EQU) 
(EQU> 
(EQU) 
(EQU) 
(EQU) 

(EQU) 



FIELD DEC HEX 

CBTSF 0013 000D (EQU) 

CBTTPT 0004 0004 

CBTUS 0012 OOOC (EQU) 

CBTVMA 0008 0008 

CBTXP1 0012 OOOC (EQU) 

CBTXP2 0012 OOOC (EQU) 

CBTXP3 0012 OOOC (EQU) 



Assembler listing of CHACBT 



LOCATION INSTRUCTION SOURCE 



12 00000 



12 00000 
12 00000 
12 00004 



12 00008 
12 0000C 



(Listing 



12 0000C 
00000080 

12 0000C 
00000040 
12 0000C 

00000020 

of CHACBT 



CHACBT 

CBTFLK 
CBTTPT 

* 

♦ 

CBTVMA 

CBTFLG 

CBTAV 

CBTAVM 

CBTUS 

CBTUSM 

CBTRS 

CBTRSM 

continued 



INST OPER COMMENT 

DSECT 

DS OF 

DS F ENTRY - FORWARD LINK 

DS A CONTAINS TSI POINTER IF 

PAGE IS PRIVATE 16698 
CONTAINS SPT # AND REL PAGE # 
IF SHARED PAGE 16698 
DS F VIRTUAL MEMORY ADDRESS 

DS XL1 FLAGS 
EQU CBTFLG AVAILABILITY FLAG 
EQU X^O* AVAILABILITY MASK i=NOT 

AVAILABLE 
EQU CBTFLG USER/SUPERVISOR OWNED FLAG 
EQU X f 40 f USER/SUPERVISOR OWNED MASK 
EQU CBTFLG ASSIGNED TO RESIDENT 

SUPERVISOR FLAG 
EQU X^O' ASSIGNED TO RESIDENT 

SUPERVISOR MASK l=NOT ASSIGNE 
on page 50) 
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(Listing of CHACBT continued from page 49) 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 

D 

CBTFLG 


COMMENT 








12 0000C 


CBTOP 


EQU 


OPERATIONAL FLAG 








00000010 


CBTOPM 


EQU 


X'lO - 


OPERATIONAL MASK 


• 






12 0000C 


CBTPA 


EQU 


CBTFLG 


PARTITIONED FLAG 








00000008 


CBTPAM 


EQU 


X'08 f 


PARTITIONED MASK 








12 0000C 


CBTRE 


EQU 


CBTFLG 


RESERVED, DON f T REASSIGN 








* 






FLAG 








00000004 


CBTREM 


EQU 


X'04 f 


RESERVED, DON'T REASSIGN 








♦ 






MASK 








12 0000C 


CBTFLG1 


EQU 


CBTFLG 










12 0000C 


CBTXP1 


EQU 


CBTFLG1 


PAGE IS A PAGE TABLE PAGE 






00000001 


CBTXP1M 


EQU 


X'Ol' 


.MASK (BIT 6 OFF, 


BIT 7 ON) 






12 0000C 


CBTXP2 


EQU 


CBTFLG1 


PAGE IS AN AUX SEGMENT 








* 






TABLE PAGE 








00000002 


CBTXP2M 


EQU 


X f 02" 


.MASK (BIT 6 ON, BIT 7 OFF) 






12 0000C 


CBTXP3 


EQU 


CBTFLG1 


XTSI OR SEG. TABLE PAGE 






00000003 


CBTXP3M 


EQU 


X , 03 f 






12 


0000D 




CBTFLG2 


DS 


XL1 


MT/T FLAG BYTE 








12 0000D 


CBTSF 


EQU 


CBTFLG 2 


STEAL (IN TRANSIT 


OUT) FLAG 






00000080 


CBTSFM 


EQU 


x'sc 


STEAL (IN TRANSIT 


OUT) MASK 






12 0000D 


CBTRF 


EQU 


CBTFLG 2 


RECLAIMING FLAG 








00000040 


CBTRFM 


EQU 


X'40' 


RECLAIMING MASK 








12 O00OD 


CBTAF 


EQU 


CBTFLG 2 


ACTIVATE FLAG 








00000020 


CBTAFM 


EQU 


X^O' 


ACTIVATE MASK 








12 OOOOD 


CBTPST 

* 


EQU 


CBTFLG 2 


PAGE STEALING NOT 
M3655 


DONE FLAG 






00000010 


CBTPSTM 

* 


EQU 


X'10' 


PAGE STEALING NOT 
M3655 


DONE MASK 


12 


0000E 




CBTFLG3 


DS 


XL1 


UNUSED 




12 


OO00F 




CBTFLG4 


DS 


XL1 


UNUSED 




12 


00010 




CBTRLK 


DS 


F 


REVERSE LINK 




12 


00014 




CBTEND 


DS 


OX 


END OF CORE BLOCK 
15943 


TABLE 






00000014 


CBTESZ 


EQU 


CBTEND-CBTFLK CORE BLOCK TABLE SIZE 








* 






15943 
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CHACBH Storage map 



HEX 



0| 

1 


CBHUNA 




CBHPNX | 


8| 
1 


CBHPXP 




CBHAVC | 


10|CBHLOCK 
I 


I RESERVED | 


CBHICBA 


CBHBSE | 


18| 
I 


CBHSZE 




CBHLOCG I 



DEC 


8 

16 

24 



Fields in CHACBH — by displacement 

DEC HEX FIELD 

0000 0000 CBHUNA 

0004 0004 CBHPNX 

0008 0008 CBHPXP 

0012 O00C CBHAVC 

Alphabetical list of fields in CHACBH 



DEC HEX FIELD 
0016 0010 CBHLOCK 
0018 0012 CBHICBA 
0020 0014 CBHBSE 
0024 0018 CBHSZE 



FIELD 

CBHAVC 

CBHBDY 

CBHBEG 

CBHBSE 



DEC HEX 
0012 000C 
0032 0020 
0032 0020 
0020 0014 



FIELD 

CBHICBA 

CBHLOCG 

CBHLOCK 

CBHPNX 



DEC HEX 
0018 0012 
0028 001C 
0016 0010 
0004 0004 



DEC HEX FIELD 
0028 001C CBHLOCG 
0032 0020 CBHBDY 
0032 0020 CBHBEG 



FIELD DEC HEX 

CBHPXP 0008 0008 

CBHSZE 0024 0018 

CBHUNA 0000 0000 



Assembler listing of CHACBH 

LOCATION INSTRUCTION SOURCE 



11 00000 



11 00000 

11 00004 

11 00008 

11 O0O0C 
11 00010 
11 00012 

11 00014 

11 00018 

11 0001C 

11 00020 
11 00020 



00000020 



CHACBH 
CBHUNA 

* 

CBHPNX 
CBHPXP 

* 

CBHAVC 

CBHLOCK 

CBHICBA 

* 

CBHBSE 

CBHSZE 

* 

CBHLOCG 
* 

CBHBEG 
CBHBDY 

CBHDSZ 

* 



INST OPER COMMENT 

DSECT CORE BLOCK TABLE HEADER 

DS F POINTER TO BEGINNING OF 

AVAILABLE LIST 
DS F POINTER TO END OF 

AVAILABLE LIST 
DS F SHARED PAGE CHAIN ANCHOR - 

N476 
DS F COUNT OF AVAILABLE BLOCKS 

DS XL1 LOCK BYTE FOR CBT 
DS H NUMBER OF CORE BLOCKS 

AVAILABLE 
DS F BASE ADDRESS FOR START OF 

MEMORY 
DS F NUMBER OF CORE BLOCKS IN 

MEMORY 
DS F ROUTINE TO LAST ACCESS 

CBHLOCK 
DS OF START OF CORE BLOCK TABLE 
DS OX END OF CORE BLOCK TABLE 

HEADER 15943 
EQU CBHBDY-CBHUNA CORE BLOCK TABLE 

HEADER SIZE 15943 
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Configuration Control Block (CHACCB) 



The Configuration Control Block (CCB) is a distinct data set residing on the IPL 
volume under the name TSS***** .SYSCCB. Created at SYSGEN time, it contains 
configuration-dependent information necessary for STARTUP to perform its functions. 
Within the CCB are the following subtables: CCB header, CPU Status Table, Drum Path 
Table, 27 02 Path Table, Channel Controller Table, Correspondence List, and Printer 
Path Table, 



t 



CHACCB Storage map 



DEC 


8 

16 

24 

32 



HEX 



0| 

I 


CCBNDM 


CCBDPP 


CCBTPP 


CCBNCC 


81 
I 


CCBCPT 


CCBPCL 


CCBNPR 


CCBPPT 


10| 

i 


CCBLSD 


CCBLDA 


CCBCON 


CCBMTT 


181 
i 


CCBBAT 


CCBBAK 


CCBTER 


CCBBUF 


20 J 

1 


CCBVMB | 
1 


UNNAMED 







88 


58 


96 


60 


104 


68 


112 


70 



CCBCST 







CCBNPD 


CCBPTD 


CCBADD 


UNNAMED 


|CCBDTC |CCBDCL 


CCBUNT I CCBOPF 
» 


CCBNCH 


CCBCAD 


CCBNPT 


CCBPCM 


CCBNPP 


CCBPTP 







Fields in CHACCB — by displacement 



DEC 


HEX 


FIELD 


DEC 


BEX 


FIELD 




DEC 


HEX 


FIELD 




0000 


0000 


CCBNDM 


0094 


005E 


CCBPTD 




0102 


0066 


CCBUNT 




0000 


0000 


CCBHDR 


0096 


0060 


CCBADD 




0103 


0067 


CCBOT 


(EQU) 


0002 


0002 


CCBDPP 


0096 


0060 


CCBTPT 




0103 


0067 


CCBOS 


(EQU) 


0004 


0004 


CCBTPP 


0100 


0064 


CCBDW 


(EQU) 


0103 


0067 


CCBOR 


(EQU) 


0006 


0006 


CCBNCC 


0100 


0064 


CCBDV 


(EQU) 


0103 


0067 


CCBOQ 


(EQU) 


0008 


0008 


CCBCPT 


0100 


0064 


CCBDU 


(EQU) 


0103 


0067 


CCBOJ 


(EQU) 


0010 


000A 


CCBPCL 


0100 


0064 


CCBDT 


(EQU) 


0103 


0067 


CCBOI 


(EQU) 


0012 


oooc 


CCBNPR 


0100 


0064 


CCBDTC 




0103 


0067 


CCBOH 


(EQU) 


0014 


000E 


CCBPPT 


0101 


0065 


CCBCN 


(EQU) 


0103 


0067 


CCBOG 


(EQU) 


0016 


0010 


CCBLSD 


0101 


0065 


CCBCM 


(EQU) 


0103 


0067 


CCBOF 


(EQU) 


0018 


0012 


CCBLDA 


0101 


0065 


CCBCL 


(EQU) 


0103 


0067 


CCBOPF 




0020 


0014 


CCBCON 


0101 


0065 


CCBDCL 




0104 


0068 


CCBNCH 




0022 


0016 


CCBMTT 


0102 


0066 


CCBUZ 


(EQU) 


0104 


0068 


CCBCCT 




0024 


0018 


CCBBAT 


0102 


0066 


CCBUY 


(EQU) 


0106 


006A 


CCBCAD 




0026 


001A 


CCBBAK 


0102 


0066 


CCBUX 


(EQU) 


0108 


006C 


CCBNPT 




0028 


001C 


CCBTER 


0102 


0066 


CCBUW 


(EQU) 


0108 


00 6C 


CCBCLT 




0030 


001E 


CCBBUF 


0102 


0066 


CCBUE 


(EQU) 


0110 


006E 


CCBPCM 




0032 


0020 


CCBVMB 


0102 


0066 


CCBUD 


(EQU) 


0112 


0070 


CCBNPP 




0036 


0024 


CCBCST 


0102 


0066 


CCBUC 


(EQU) 


0112 


0070 


CCBPRT 




0092 


00 5C 


CCBNPD 


0102 


0066 


CCBUB 


(EQU) 


0114 


0072 


CCBPTP 




0092 


005C 


CCBDPT 


0102 


0066 


CCBUA 


(EQU) 
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Alphabetical list of fields in CHACCB 



FIELD 

CCBADD 

CCBBAK 

CCBBAT 

CCBBUF 

CCBCAD 

CCBCCT 

CCBCL 

CCBCLT 

CCBCM 

CCBCN 

CCBCON 

CCBCPT 

CCBCST 

CCBDCL 

CCBDPP 

CCBDPT 

CCBDT 

CCBDTC 

CCBDU 

CCBDV 

CCBDW 



Assembler listing of CHACCB 




(EQU) 

(EQU) 
(EQU) 



(EQU) 

(EQU) 
(EQU) 
(EQU) 



FIELD 

CCBHDR 

CCBLDA 

CCBLSD 

CCBMTT 

CCBNCC 

CCBNCH 

CCBNDM 

CCBNPD 

CCBNPP 

CCBNPR 

CCBNPT 

CCBOF 

CCBOG 

CCBOH 

CCBOI 

CCBOJ 

CCBOPF 

CCBOQ 

CCBOR 

CCBOS 

CCBOT 



DEC 

0000 

0018 

0016 

0022 

0006 

0104 

0000 

0092 

0112 

0012 

0108 

0103 

0103 

0103 

0103 

0103 

0103 

0103 

0103 

0103 

0103 



HEX 

0000 

0012 

0010 

0016 

0006 

0068 

0000 

005C 

0070 

OO0C 

006C 

0067 

0067 

0067 

0067 

0067 

0067 

0067 

0067 

0067 

0067 



(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 

(EQU) 
(EQU) 
(EQU) 
(EQU) 



FIELD 

CCBPCL 

CCBPCM 

CCBPPT 

CCBPRT 

CCBPTD 

CCBPTP 

CCBTER 

CCBTPP 

CCBTPT 

CCBUA 

CCBUB 

CCBUC 

CCBUD 

CCBUE 

CCBUNT 

CCBUW 

CCBUX 

CCBUY 

CCBUZ 

CCBVMB 



DEC 

0010 

0110 

0014 

0112 

0094 

0114 

0028 

0004 

0096 

0102 

0102 

0102 

0102 

0102 

0102 

0102 

0102 

0102 

0102 

0032 



HEX 

000 A 

006E 

000E 

0070 

005E 

0072 

001C 

0004 

0060 

0066 

0066 

0066 

0066 

0066 

0066 

0066 

0066 

0066 

0066 

0020 



(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 

(EQU) 
(EQU) 
(EQU) 
(EQU) 



LOCATION INSTRUCTION SOURCE INST OPER 



COMMENT 



13 00000 



CHACCB 

* 

* 
* 



DSECT 



SET 



♦♦♦CONFIGURATION 
CONTROL BLOCKS ♦♦ 
THIS DSECT REPRESENTS THE DATA 
TSS *****.SYSCCB # 
WHICH RESIDES ON THE IPI VOLUME. THIS 
TABLE IS USED TO 

COMMUNICATE CONFIGURATION INFORMATION TO 
THE STARTUP PROGRAM. 



♦ CONFIGURATION CONTROL 



13 00000 
13 00000 
13 00002 
13 00004 

13 00006 
13 00008 
13 OOO0A 
13 0000C 
13 0000E 
13 00010 
13 00012 
13 00014 



CCBHDR 

* 

CCBNDM 
CCBDPP 
CCBTPP 

CCBNCC 

CCBCPT 

* 

CCBPCL 

CCBNPR 

* 

CCBPPT 

CCBLSD 

CCBLDA 

CCBCON 



CCBMTT 



DS 



DS 



DS 



DS 



DS 



DS 



DS 



DS 



DS 



DS 



DS 



DS 



DS 



OF 



BLOCK HEADER 
CCB HEADER 

N349.10 
NUMBER OF DRUMS AT 
INSTALLATION 

RELATIVE POINTER TO DRUM 
PATH TABLE 
RELATIVE POINTER TO 
TRANSMISSION 
CONTROL PATH TABLE 
NUMBER OF CHANNEL 
CONTROLLERS AT INSTALLATION 
RELATIVE POINTER TO CHANNEL 
CONTROLLER TABLE 
RELATIVE POINTER TO 
CORRESPONDENCE LIST 
NUMBER OF PRINTERS AT 
INSTALLATION 

RELATIVE POINTER TO PRINTER 
PATH TABLE 

LENGTH OF SHARED DATA SET 
TABLE 

LOW DRUM AVAILABILITY 
CONSTANT 
MAX NUMBER OF CONV. 



TASKS 
N 



13 00016 
13 00018 
(Listing of CHACCB continued on page 



CCBBAT 



DS 



386^ 
H 

386 + + 

H 

386^ 
54) 



MAX NUMBER 
TASK 



OF MTT ADMIN. 



N 



MAX NUMBER OF 



BATCH TASK 
N 
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(Listing of CHACCB continued from page 53) 



LOCATION 
13 0001A 



13 0001C 
13 0001E 
13 00020 
13 00021 

13 0002*+ 



INSTRUCTION SOURCE 
CCBBAK 

* 



INST OPER 



00000024 



13 0005C 
13 0005C 

13 0005E 



13 00060 
13 00060 

13 00062 
13 00064 



13 00065 



13 00066 



13 00064 
00000001 
13 00064 
00000002 
13 00064 
00000003 
13 00064 
00000004 

13 00065 
00000001 
13 00065 
00000002 
13 00065 
00000004 

13 00066 

00000010 

13 00066 

00000020 

13 00066 

00000030 

13 00066 

00000040 

13 00066 

00000080 



DS 



H 

386** 

fl 



COMMENT 

MAX NUMBER OF 

TASK 



BACKGROUND 



N 



CCBTER DS fl MAXIMUM NUMBER OF TERMINALS 

* N349.10 

CCBBUF DS H MAXIMUM INPUT BUFFER SIZE 

* N349.10 

CCBVMB DS X VARIABLE VMA REQUEST 

* INCREMENT 15257 
DS XL3 RESERVED 

* 15257 

CCBHSZ EQU *-CCBHDR LENGTH OF CCB HEADER 

* CPU STATUS TABLE IS A SEPARATE DSECT. 
14F SPACE FOR CPU STATUS TABLE. 

TABLE **** ONE SET OF ENTRIES FOR 



CCBCST DS 

* DRUM PATH 

* EACH DRUM 
CCBDPT DS 
CCBNPD DS 
* 

CCBPTD DS 
* 

* TRANSMISSION 

* 

* 

CCBTPT 

CCBADD 



CCBDTC 

CCBDT 

CCBDTM 

CCBDU 

CCBDUM 

CCBDV 

CCBDVM 

CCBDW 

CCBDWM 

CCBDCL 

CCBCL 

CCBCLM 

CCBCM 

CCBCMM 

CCBCN 

CCBCNM 

CCBUNT 

CCBUA 

CCBUAM 

CCBUB 

CCBUBM 

CCBUC 

* 

CCBUCM 

CCBUD 

* 

CCBUDM 

CCBUE 

CCBUEM 

CCBUW 



DS 
DS 

DS 

DS 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

DS 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

DS 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 



OH 

H 



THIS 



NUMBER OF PATHS TO 

DRUM 
H PATH TO DRUM **** ONE 

ENTRY FOR EACH PATH 
CONTROL UNIT PATH TABLE 
**** ONE SET OF ENTRIES FOR EACH 
PATH TO A LINE 

**** THE TABLE ENDS WITH A FULL WORD 
OF ZEROS 
OF 
H 



13 00066 
(Listing of CHACCB continued on page 



H 

XL1 

CCBDTC 

X'Ol* 

CCBDTC 

X'02' 

CCBDTC 

X , 03 t 

CCBDTC 

X'04' 

XL1 

CCBDCL 

X'Ol* 

CCBDCL 

X , 02 i 

CCBDCL 

X , 04' 

XL1 

CCBUNT 

X f 10' 

CCBUNT 

X^O' 

CCBUNT 

X^O' 

CCBUNT 

X^O' 

CCBUNT 

X'80' 

CCBUNT 
55) 



PATH TO TRANSMISSION 

CONTROL LINE 

NOT USED 

DEVICE TYPE CODE 

1050 TERMINAL SYSTEM FLAG 

1050 TERMINAL SYSTEM MASK 

2741 TERMINAL FLAG 

2741 TERMINAL MASK 

TTY 35 TERMINAL FLAG 

TTY 35 TERMINAL MASK 

1052-7 TERMINAL FLAG 

1052-7 TERMINAL MASK 

DEVICE CLASS 

DIAL LINE FLAG 

DIAL LINE MASK 

DEDICATED LINE FLAG 

DEDICATED LINE MASK 

AUTOMATIC CALL FEATURE FLAG 

AUTOMATIC CALL FEATURE MASK 

UNIT TYPE 

IBM TERMINAL CONTROL TYPE 1 

FLAG 

IBM TERMINAL CONTROL TYPE 1 

MASK 

IBM TERMINAL CONTROL TYPE 2 

FLAG 

IBM TERMINAL CONTROL TYPE 2 

FLAG 

TELEGRAPH CONTROL TYPE 1 

FLAG 

TELEGRAPH CONTROL TYPE 1 

MASK 

TELEGRAPH CONTROL TYPE 2 

FLAG 

TELEGRAPH CONTROL TYPE 2 

MASK 

WORLD TRADE TERMINAL 

CONTROL FLAG 

WORLD TRADE TERMINAL 

CONTROL MASK 

270 2 TRANSMISSION CONTROL 



54 CHACCB 



(Listing of CHACCB continued from page 54) 



LOCATION INSTRUCTION SOURCE INST OPER 



13 00067 



00000001 

13 00066 
00000002 
13 00066 
00000003 
13 00066 
00000004 

13 00067 

00000010 

13 00067 

00000020 

13 00067 
00000030 
13 00067 
00000040 
13 00067 
00000050 
13 00067 
00000000 
13 00067 
00000001 
13 00067 
00000002 
13 00067 
00000003 
00000008 



13 00068 
13 00068 

13 0006A 



CCBUWM 

CCBUX 

CCBUXM 

CCBUY 

CCBUYM 

CCBUZ 

CCBUZM 

CCBOPF 

CCBOF 

CCBOFM 

CCBOG 

* 

CCBOGM 

CCBOH 

CCBOHM 

CCBOI 

CCBOIM 

CCBOJ 

CCBOJM 

CCBOQ 

CCBOQM 

CCBOR 

CCBORM 

CCBOS 

CCBOSM 

CCBOT 

CCBOTM 

CCBTSZ 

* 



EQU X'01 1 



EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

DS 

EQU 

EQU 

EQU 

EQU 

EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 



CCBUNT 

X , 02 f 

CCBUNT 

X f 03 f 

CCBUNT 

X'04 f 

XL1 

CCBOPF 

X'lO 1 

CCBOPF 

X'20 f 

CCBOPF 

X f 30' 

CCBOPF 

X'40' 

CCBOPF 

X'50 f 

CCBOPF 

X'00' 

CCBOPF 

X'01' 

CCBOPF 

X'02 f 

CCBOPF 

X'OS' 

♦-CCBTPT 



CHANNEL CONTROL UNIT TABLE 
ENTRIES FOR EACH CHANNEL 



COMMENT 
FLAG 

270 2 TRANSMISSION CONTROL 
MASK 

2701 DATA ADAPTER UNIT FLAG 
27 01 DATA ADAPTER UNIT MASK 
MULTIPLEXOR CHANNEL FLAG 
MULTIPLEXOR CHANNEL MASK 
SELECTOR CHANNEL FLAG 
SELECTOR CHANNEL MASK 
OPTIONAL FEATURES 
IBM LINE ADAPTER TYPE 1 
FLAG 

IBM LINE ADAPTER TYPE 1 
MASK 

IBM LINE ADAPTER TYPE 2 
FLAG 

IBM LINE ADAPTER TYPE 2 
MASK 

DATA SET LINE ADAPTER FLAG 
DATA SET LINE ADAPTER MASK 
AUTOMATIC CALL ADAPTER FLAG 
AUTOMATIC CALL ADAPTER MASK 
TELEGRAPH LINE ADAPTER FLAG 
TELEGRAPH LINE ADAPTER MASK 
SAD ZERO FLAG 
SAD ZERO MASK 
SAD ONE FLAG 
SAD ONE MASK 
SAD TWO FLAG 
SAD TWO MASK 
SAD THREE FLAG 
SAD THREE MASK 
LENGTH OF A SINGLE ENTRY 
**** ONE SET OF 



CCBCCT 
CCBNCH 

* 

CCBCAD 

* 



DS 
DS 

DS 



OH 
H 



CONTROL UNIT AT INSTALLATION 

NUMBER OF CHANNELS 
CONNECTED TO CHANNEL CONTROLLER 
CHANNEL ADDRESS **** ONE 
ENTRY FOR EACH CHANNEL 
♦NOTE* THE HIGH ORDER BIT OF 
EACH MUST BE ON. 
**** ONE ENTRY FOR EACH BIT 



13 00O6C 
(Listing 



* 

* CORRESPONDENCE LIST 

* IN EXTENDED CONTROL 

* REGISTERS 12 AND 13 , EACH SET OF TWO CONSECUTIVE 

* BITS CORRESPONDING 

* TO A DISTINCT CONTROL UNIT. THE SETTING OF 

* THESE BITS IS 

* DETERMINED BY THE SETTING OF THE SWITCHES ON THE 

* CONFIGURATION 

* CONSOLE. AN ENTRY CONSISTS OF ONE HALF WORD 

* CONTAINING THE 

* NUMBER OF PATHS TO THE CONTROL UNIT ON THE 

* DESIGNATED CHANNEL 

* CONTROLLER FOLLOWED BY A VARIABLE NUMBER OF HALF 

* WORDS, EACH 

* CONTAINING A PATH TO THE CONTROL UNIT. AN ENTRY 

* OF F'S INDICATES 

* THAT THERE IS NO CONTROL UNIT WHOSE PARTITIONING 

* IS CONTROLLED BY 

* THE CORRESPONDING SWITCH ON THE CONFIGURATION 

* CONSOLE. 

* NOTE THAT THIS LIST DOES NOT EXIST 

* ON A SIMPLEX 

* MACHINE. THE SIMPLEX DOES NOT HAVE 

* PARTITION SENSING. 

CCBCLT DS OH *** NOTE *** SIZE OF 

of CHACCB continued on page 56) 
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(Lasting of CHACCB continued from page 55) 



LOCATION 


INSTRUCTION SOURCE 

* 


INST 


OPER 


13 0006C 


* 
CCBNPT 

* 


DS 


H 


13 0006E 


CCBPCM 

* 

♦ PRIN1 


DS 


H 




, ER PATH 


TABLE 




* EACH 
CCBPRT 


PRINTER 


AT 


13 00070 


DS 


OH 


13 00070 


CCBNPP 


DS 


H 


13 00072 


CCBPTP 

* 


DS 


H 



COMMENT 

CORRESPONDENCE LIST 
IS VARIABLE. 

NUMBER OF PATHS TO CONTROL 
UNIT 

PATH TO CONTROL UNIT 
*** NOTE *** THE 1 BIT IN 
EACH PATH HALFWORD 
(BITS 0-15) MUST BE ON. 
*♦** ONE SET OF ENTRIES FOR 

INSTALLATION 

PATHS TO THIS 



NUMBER OF 

PRINTER 

PATH TO PRINTER **** 

ENTRY FOR EACH PATH 



ONE 



56 CHACCB 



Catalog SBLOCK (CHACCC) 

The Catalog SBLOCK (CCC) is the basic unit of storage within the catalog data set. 

SBLOCKS are chained together to form indexes, generation indexes, data set de- 
scriptors, sharing descriptors, or sharer lists. Data is retrieved from the catalog, 
via catalog services, in the form of SBLOCKS. 

CCC occupies 64 bytes of virtual storage, aligned on word boundaries. 

CHACCC Storage map 



DEC 



8 
16 

24 



HEX 
Of 

L 

81 



10|CCCFL1 



CCCFWD 



_1_ 



18[CCCORG | 
! I 



| CCCCT1 | 



CCCBWD 



| CCCCT2 | 
J i 



CCCNME 



CCCPTL 



|CCCFL2 |CCCFL3 | CCCFL4 (CCCLAB | 
J I I I I 



CCCUSE 



48 



30( 



ORG CCCUSE 



CCCVDA 



25 
32 



19 



UNNAMED 



20 | UNNAMED (UNNAMED | CCCB10 | CCCEAB (CCCTPD | 

I I I I I ! 



ORG CCCTPD 



36 

40 



24 



28| 



CCCDPT 



[CCCDEN (CCCTRT | 
J I L 



CCCBSZ 



ORG CCCDPT 



40 
48 



281 



CCCRVN 



CCCPNO 



30|CCCRFM 



X 



UNNAMED 



CCCLRL 



ORG CCCVDA 



51 
56 



33 
381 



JCCCCT3 | 



CCCVSN 



CCCDVC 



cccFsg 



ORG CCCNME 



8 
16 



8[ 

1 

101 



CCCVL2 



i 



(CHACCC continued on page 58) 
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(CHACCC continued from page 57) 



DEC 


HEX 
























ORG 


CCCFL4 
16 
























22 




CCCCT4 




24 


18| 

I 


CCCCT9 


|CCCFL5 ICCCILK 
i 1 


1 
1 




CCCNM1 






32 


20 | 

1 




CCCNMl 


(CONT) 




4 CCCFL6 
I 


1 
1 




CCCPT1 




ORG 


CCCNME 
























8 


81 

I 

101 

1 










C( 


:cpt2 










i 
I 


16 


I 
1 












ORG 


CCCPTL 
11 
















17 


i 

1 






CCCNMO 










1 
1 




I 

i 

i 




I 
1 
i 


56 


38J 

I 














| UNNAMED 

I 


CCCSBC | UNNAMED [ 
1 1 


ORG 


CCCNME 
























8 


8| 

1 


CCCCT5 


1 

I 






UNNAMED 








1 
1 


16 


10 (UNNAMED 
I 


1 








CCCNM2 










! 
i 


24 


18|CCCNM2 

» 


|CCCFL8 

I 


i 

I 

ement 


















Fields 


in CHACCC 


— by displace 






DEC 


HEX 


FIELD 




DEC 


HEX 


FIELD 




DEC 


HEX 


FIELD 






0000 


0000 


CCCFWD 




0021 


0015 


CCC09 


(EQU) 


0025 


0019 


CCC21 


(EQU) 




0003 


0003 


CCCCT1 




0021 


0015 


CCCFL3 




0025 


0019 


CCCUSE 






0004 


0004 


CCCBWD 




0022 


0016 


CCCCT4 




0026 


001A 


CCCFL5 






0007 


0007 


CCCCT2 




0022 


0016 


CCC65 


(EQU) 


0026 


001A 


CCCED2 


(EQU) 




0008 


0008 


CCCCT5 




0022 


0016 


CCC63 


(EQU) 


0026 


001A 


CCC17 


(EQU) 




0008 


0008 


CCCPT2 




0022 


0016 


CCC62 


(EQU) 


0026 


001A 


CCC16 


(EQU) 




0008 


0008 


CCCVL2 




0022 


0016 


CCC61 


(EQU) 


0026 


001A 


CCC15 


(EQU) 




0008 


0008 


CCCID1 


CEQU) 


0022 


0016 


CCC60 


(EQU) 


0026 


001A 


CCC14 


(EQU) 




0008 


0008 


CCCNME 




0022 


0016 


CCC13 


(EQU) 


0027 


001B 


CCCILK 






0016 


0010 


CCCFL7 


(EQU) 


0022 


0016 


CCC12 


(EQU) 


0028 


001C 


CCCNMl 






0016 


0010 


CCC69 


(EQU) 


0022 


0016 


CCCFL4 




0034 


0022 


CCCB10 






0016 


0010 


CCC05 


(EQU) 


0023 


0017 


CCC68 


(EQU) 


0034 


0022 


CCCBIO 


(EQU) 




0016 


0010 


CCC04 


(EQU) 


0023 


0017 


CCC67 


(EQU) 


0035 


0023 


CCCEAB 






0016 


0010 


CCC03 


(EQU) 


0023 


0017 


CCC66 


(EQU) 


0036 


0024 


CCCFL6 






0016 


0010 


CCC02 


(EQU) 


0023 


0017 


CCCLAB 




0036 


0024 


CCCDEN 






0016 


0010 


CCC01 


(EQU) 


0024 


0018 


CCCCT9 




0036 


0024 


CCCTPD 






0016 


0010 


CCCFL1 




0024 


0018 


CCC85 


(EQU) 


0036 


0024 


CCC70 


(EQU) 




0017 


0011 


CCCNM2 




0024 


0018 


CCC84 


(EQU) 


0036 


0024 


CCC20 


(EQU) 




0017 


0011 


CCCNMO 




0024 


0018 


CCC83 


(EQU) 


0036 


0024 


CCC19 


(EQU) 




0017 


0011 


CCCPTL 




0024 


0018 


CCC82 


(EQU) 


0036 


0024 


CCC18A 


(EQU) 




0020 


0014 


CCC08 


(EQU) 


0024 


0018 


CCC81 


(EQU) 


0036 


0024 


CCC18 


(EQU) 




0020 


0014 


CCC07 


(EQU) 


0024 


0018 


CCC80 


(EQU) 


0037 


0025 


CCCPT1 






0020 


0014 


CCC06 


(EQU) 


0024 


0018 


CCCORG 




0037 


0025 


CCCTRT 






0020 


0014 


CCCFL2 




0025 


0019 


CCCFL8 




0037 


0025 


CCCTPP 


(EQU) 




0021 


0015 


CCC11 


(EQU) 


0025 


0019 


CCC23 


(EQU) 


0038 


0026 


CCCBSZ 






0021 


0015 


CCC10 


(EQU) 


0025 


0019 


CCC22 


(EQU) 


0040 


0028 


CCCRVN 






(Continued on page 


59) 
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(Continued from page 58) 



DEC HEX FIELD 
0040 0028 CCCDPT 
0040 0028 CCCED1 
0042 002A CCCPNO 
0044 002C CCCLRL 



DEC HEX FIELD 

0048 0030 CCCRFM 

CEQU) 0051 0033 CCCCT3 

0051 0033 CCCVDA 

0052 0034 CCCDVC 



DEC HEX FIELD 
0056 0038 CCCVSN 
0062 003E CCCSBC 
0062 003E CCCFSQ 
0064 0040 CCCEND 



(EQU) 



Alphabetical list of fields in CHACCC 



FIELD 

CCCBIO 

CCCBSZ 

CCCBWD 

CCCBIO 

CCCCT1 

CCCCT2 

CCCCT3 

CCCCT4 

CCCCT5 

CCCCT9 

CCCDEN 

CCCDPT 

CCCDVC 

CCCEAB 

CCCED1 

CCCED2 

CCCEND 

CCCFL1 

CCCFL2 

CCCFL3 

CCCFL4 

CCCFL5 

CCCFL6 

CCCFL7 

CCCFL8 

CCCFSQ 

CCCFWD 

CCCID1 

CCCILK 

CCCLAB 



DEC 

0034 

0038 

0004 

0034 

0003 

0007 

0051 

0022 

0008 

0024 

0036 

0040 

0052 

0035 

0040 

0026 

0064 

0016 

0020 

0021 

0022 

0026 

0036 

0016 

0025 

0062 

0000 

0008 

0027 

0023 



HEX 

0022 

0026 

0004 

0022 

0003 

0007 

0033 

0016 

0008 

0018 

0024 

0028 

0034 

0023 

0028 

001A 

0040 

0010 

0014 

0015 

0016 

001A 

0024 

0010 

0019 

003E 

0000 

0008 

001B 

0017 



CEQU) 



(EQU) 
(EQU) 
(EQU) 



(EQU) 



(EQU) 



FIELD 

CCCLRL 

CCCNME 

CCCNMO 

CCCNM1 

CCCNM2 

CCCORG 

CCCPNO 

CCCPTL 

CCCPT1 

CCCPT2 

CCCRFM 

CCCRVN 

CCCSBC 

CCCTPD 

CCCTPP 

CCCTRT 

CCCUSE 

CCCVDA 

CCCVL2 

CCCVSN 

CCC01 

CCC02 

CCC03 

CCC04 

CCC05 

CCC06 

CCC07 

CCC08 

CCC09 

CCC10 



DEC 

0044 

0008 

0017 

0028 

0017 

0024 

0042 

0017 

0037 

0008 

0048 

0040 

0062 

0036 

0037 

0037 

0025 

0051 

0008 

0056 

0016 

0016 

0016 

0016 

0016 

0020 

0020 

0020 

0021 

0021 



HEX 

002C 

0008 

0011 

001C 

0011 

0018 

002A 

0011 

0025 

0008 

0030 

0028 

003E 

0024 

0025 

0025 

0019 

0033 

0008 

0038 

0010 

0010 

0010 

0010 

0010 

0014 

0014 

0014 

0015 

0015 



Assembler listing of CHACCC 



LOCATION 
14 00000 

14 00003 
14 00004 

14 00007 



14 00008 
14 00010 



(Listing 



INSTRUCTION SOURCE 
14 00000 CHACCC 

* 

CCCFWD 

* 

* 

* 
* 

CCCCT1 

* 

CCCBWD 

* 

CCCCT2 

CCCNME 
CCCFL1 
14 00010 CCC01 
14 00010 CCC02 
14 00010 CCC03 

of CHACCC continued 



INST OPER 
DSECT 



DS 



DS 



DS 



DS 



XL3 



XL1 



XL3 



XL1 



DS CL8 

DS XL1 

EQU CCCFL1 

EQU CCCFL1 

EQU CCCFUL 

on page 60) 



(EQU) 



(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 



FIELD 

CCC11 

CCC12 

CCC13 

CCC14 

CCC15 

CCC16 

CCC17 

CCC18 

CCC18A 

CCC19 

CCC20 

CCC21 

CCC22 

CCC23 

CCC60 

CCC61 

CCC62 

CCC63 

CCC65 

CCC66 

CCC67 

CCC68 

CCC69 

CCC70 

CCC80 

CCC81 

CCC82 

CCC83 

CCC84 

CCC85 



DEC 

0021 

0022 

0022 

0026 

0026 

0026 

0026 

0036 

0036 

0036 

0036 

0025 

0025 

0025 

0022 

0022 

0022 

0022 

0022 

0023 

0023 

0023 

0016 

0036 

0024 

0024 

0024 

0024 

0024 

0024 



HEX 

0015 

0016 

0016 

001A 

001A 

001A 

001A 

0024 

0024 

0024 

0024 

0019 

0019 

0019 

0016 

0016 

0016 

0016 

0016 

0017 

0017 

0017 

0010 

0024 

0018 

0018 

0018 

0018 

0018 

0018 



(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 



COMMENT 

CATALOG S BLOCK ENTRIES 

COMMON CONTROL FIELDS 

FORWARD POINTER - IN FORM 

PBB WHERE P IS 

LOGICAL PAGE NUMBER WITHIN 

THE MEMBER AND 

BB IS THE RELATIVE BYTE 

WITHIN THE PAGE 

COUNT OF BLOCKS ALLOCATED 

FROM 

PAGE-USED IN FIRST PAGE ONLY 

BACKWARD POINTER - IN PBB 

FORM 

IF CONTINUATION, TO 

POINTER IN HIGHER 

LEVEL IF DSD f SD f GI f INDEX 

COUNT OF BYTES ALLOCATED 

FIELDS COMMON TO FIRST 

S BLOCK 

OF A DSD, INDEX OR DS 

NAME OF SBLOCK 

IDENTIFICATION FLAGS 

INDEX 

GENERATION INDEX 

DATASET DESCRIPTOR- DATASET 

ON PRIV. PACK 
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(Listing of CHACCC continued from page 59) 



LOCATION INSTRUCTION SOURCE INST OPER 



14 00010 
14 00010 
14 00010 

00000001 
00000002 
00000003 
00000004 
00000005 
00000006 



14 00011 
14 00014 



14 00015 



14 00014 
14 00014 
14 00014 
00000000 
00000001 
00000002 

14 00015 
14 00015 
14 00015 
00000000 
00000001 
00000002 



14 00016 



14 00017 



14 00016 



(Listing 



14 00016 
14 00016 
14 00016 
14 00016 
14 00016 
14 00016 
14 00016 

00000001 
00000002 

00000000 
00000008 
00000004 

00000000 
00000080 

14 00017 
14 00017 
14 00017 

00000001 
00000002 
00000004 

14 00018 
14 00018 
14 00018 
14 00018 
14 00018 
14 00018 
00000001 
00000002 
00000004 
00000005 
Of CHACCC 



CCC04 

CCC05 

CCC69 

* 

CCC01M 

CCC0 2M 

CCC03M 

CCC04M 

CCC05M 

CCC69M 

CCCPTL 

CCCFL2 

CCC06 

CCC07 

CCC08 

CCC06M 

CCC07M 

CCC08M 

CCCFL3 

CCC09 

CCC10 

CCC11 

CCC09M 

CCC10M 

CCC11M 

* 

CCCFL4 

* 

CCC12 

CCC13 

CCC60 

CCC61 

CCC62 

CCC63 

CCC65 

* ** 

CCC12M 
CCC13M 

* ** 

CCC60M 
CCC61M 
CCC62M 

* ♦♦ 
CCC63M 
CCC65M 
CCCLAB 
CCC66 
CCC67 
CCC68 

♦ 

CCC66M 
CCC67M 
CCC68M 
CCCORG 
CCC80 
CCC81 
CCC82 
CCC83 
CCC84 
CCC85 
CCC80M 
CCC81M 
CCC82M 
CCC83M 
continued 



EQU 
EQU 
EQU 

EQU 

EQU 
EQU 
EQU 
EQU 
EQU 



DS 

DS 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

DS 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

DS 

EQU 

EQU 
EQU 
EQU 
EQU 
EQU 
EQU 

♦BITS 
EQU 
EQU 

♦ BITS 
EQU 
EQU 
EQU 

♦BITS 
EQU 
EQU 
DS 
EQU 
EQU 
EQU 



CCCFL1 
CCCFL1 
CCCFL1 

x-oi 1 

X'02 1 
X'OS' 
X , 04' 
X f 05' 
X , 06 i 



XL3 

XL1 

CCCFL2 

CCCFL2 

CCCFL2 

X'OO' 

X'01 - 

X , 02 i 

XL1 

CCCFL3 

CCCFL3 

CCCFL3 

X^O 1 

X f 01 f 

X , 02 i 

CL1 

CCCFL4 

CCCFL4 

CCCFL4 

CCCFL4 

CCCFL4 

CCCFL4 

CCCFL4 
6 AND ?♦♦♦ 

X^Ol 1 

X , 02 i 
2,3,4 AND 

X f 00' 

x'os' 

X , 04 f 
AND !♦♦♦ 
X'OO' 
X'80' 
CL1 

CCCLAB 
CCCLAB 
CCCLAB 



COMMENT 

SHARING DESCRIPTOR (SD) 

SHARER LIST (SL) 

DATASET DESCRIPTOR- DATASET 

ON PUB. PACK 

INDEX MASK 

GENERATION INDEX MASK 

DSD MASK- PRIVATE 

SD MASK 

SL MASK 

DSD MASK-PUBLIC 

FIEIDS COMMON TO FIRST 

S BLOCK 

OF INDEX OR DSD 

POINTER TO SHARER LIST - IN 

PBB FORK 

SHARING FLAG 

PRIVATE (BINARY ZERO) 

SHARED UNIVERSALLY 

SHARED BY LISTED SHARERS 

UNLIMITED MASK 

UNIVERSAL SHARE MASK 

LIST SHARE MASK 

SHARE PRIVILEGES 

UNLIMITED (BINARY ZERO) 

R/W 

R/O 

UNLIMITED MASK 

R/W MASK 

R/O MASK 

FIELDS UNIQUE TO DSD 

DS RET AND ACCESS 

PRIVILEGES 

R/W 

R/O 

NO DATASET DELETION 

DS DELETION AT CLOSE 

DS DELETION AT LOGOFF 

PERMANENT DS 



i 



EQU 
EQU 
EQU 
DS 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
on page 



X'01 i 
X'02 1 
X f 04 f 
CL1 

CCCORG 
CCCORG 
CCCORG 
CCCORG 
CCCORG 
CCCORG 
X^Ol 1 
X , 02 t 
X f 04' 
X f 05 f 
61) 



R/W MASK 
R/O MASK 
5*** ♦ 
NO DELETION MASK 
CLOSE DELETION MASK 
LOGOFF DELETION MASK 
* 

PERMANENT MASK 

TEMPORARY MASK 

LABEL DATA 

NO TAPE LABELS (NL) 

STANDARD LABELS (SL) 

STANDARD AND USER 

LABELS (SUL) 

NL MASK 

SL MASK 

SUL MASK 

DATA SET ORGANIZATION 

SAM ORGANIZATION 

TAM ORGANIZATION 

VAM INDEX SEQUENTIAL 

VAM SEQUENTIAL 

VAM PARTITIONED 

IOREQ 

SAM MASK 

TAM MASK 

VI SAM MASK 

VSAM MASK 
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(Listing of CHACCC continued from page 60) 



LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 


COMMENT 






00000006 


CCC84M 


EQU 


X , 06« 


VPAM MASK 






00000007 


CCC85M 


EQU 


X^?* 


RX(IOREQE) MASK 


1** 


00019 






CCCUSE 


DS 


CL26 


USER FIELD 






14 


00019 




|ORG| 


CCCUSE 




14 


00019 








DS 


CL8 


UNUSED 


14 


00021 








DS 


XL1 


UNUSED 


14 


00022 






CCCB10 

* 


DS 


XL1 


COUNT OF BULKIO TASKS 
PENDING - BINARY 






14 


00022 


CCCBIO 


EQU 


CCCBIO 


VAM 2 COMPATIBILITY 


14 


00023 






CCCEAB 


DS 


XL1 


ERASE AFTER BULKIO FLAG 1 
= YES 


14 


00024 






CCCTPD 


DS 


CL1 


TAPE DENSITY INDICATOR 






14 


00024 




|ORG| 


CCCTPD 




14 


00024 






CCCDEN 


DS 


XL1 


TAPE DENSITY 






00000003 


CCCPDO 


EQU 


X f 03« 


200 BPI 






00000043 


CCCPD1 


EQU 


X'tl3* 


556 BPI 






00000083 


CCCPD2 


EQU 


X'83' 


800 BPI 


14 


00025 






CCCTRT 

* 


DS 


XL1 


TAPE RECORDING TECHNIQUE 
TRTCH 






00000028 


CCCTEM 


EQU 


x*2B 9 


TRTCH TRANS EVEN PARITY 






00000033 


CCCODM 


EQU 


X'33 f 


ODD PARITY NO TRANSLATE 






00000013 


CCCTM 


EQU 


X , 13 i 


TRANSLATE 






00000038 


CCCEVN 


EQU 


X f 38' 


EVEN PARITY NO TRANSLATE 






00000023 


CCCEVM 


EQU 


X'23' 


CONVERTER AVAILABLE 






14 


00025 


CCCTPP 


EQU 


CCCTRT 




14 


00026 






CCCBSZ 


DS 


XL2 


NL/TAPE BLOCK SIZE 


14 


00028 






CCCDPT 


DS 


CL4 


TYPE E DSCB POINTER 






14 


00028 




|ORG| 


CCCDPT 




14 


00028 






CCCRVN 


DS 


CL2 


RELATIVE VOLUME 


14 


0002A 






CCCPNO 


DS 


CL2 


EXTERNAL PAGE NUMBER 


14 


0002C 






CCCLRL 


DS 


XL4 


NL/TAPE LRECL 


14 


00030 






CCCRFM 


DS 


XL1 


NL/TAPE RECFM 


14 


00031 








DS 


CL2 


SPARE 


14 


00033 






CCCVDA 


DS 


CL13 


VOLUME DATA 






14 


00033 




IORG| 


CCCVDA 




14 


00033 






CCCCT3 


DS 


XL1 


BINARY COUNT OF VOLUMES-SAM 
ONLY 


14 


00034 






CCCDVC 


DS 


XL4 


DEVICE CODE 


14 


00038 






CCCVSN 


DS 


XL6 


VOLUME SERIAL 
NUMBERS-VAM-SAM-PRIV. ONLY 


14 


0003E 






CCCFSQ 


DS 


XL2 


FILE SEQUENCE NUMBER-SAM 
ONLY 






14 


00040 


CCCEND 


EQU 


* 


END OF SBLOCK 






0000000C 


CCCSZ1 


EQU 


CCCEND-CCCDVC SIZE OF VOLUME FIELD 










* 


THE 


FOLLOWING 


FIELDS ARE UNIQUE TO 










# 


CONTINUATION 












♦ 


DATASET DESCRIPTORS-SAM DATASETS ONLY 






14 


00008 




(ORG| 


CCCNME 




14 


00008 






CCCVL2 


DS 


CL12 


FIRST VOL FIELD IN CHAINED 
SBLOCK 










♦ 


THE 


FOLLOWING 


FIELDS ARE UNIQUE TO INDEXES 










* 






AND GENERATION INDEXES 






14 


00016 




|ORG| 


CCCFL4 




14 


00016 






CCCCT4 

* 
* 

* 


DS 


HL2 


COUNT OF POINTERS IN A 

N466 
GENERATION INDEX 
N466 


14 


00018 






CCCCT9 

* 


DS 


XL2 


BINARY COUNT OF MAXIMUM 
GENERATIONS 


14 


0001A 






CCCFL5 


DS 


XL1 


GENERATION FLAGS 






14 


0001A 


CCC14 


EQU 


CCCFL5 


DELETE OLDEST AT LIMIT 






14 


0001A 


CCC15 

* 


EQU 


CCCFL5 


DELETE ALL GENERATION AT 
LIMIT 






00000001 


CCC14M 


EQU 


X'Ol 1 


DELETE OLDEST MASK 






00000002 


CCC15M 


EQU 


X , 02« 


DELETE ALL MASK 






14 


0001A 


CCC16 


EQU 


CCCFL5 


SAVE DELETED GENERATIONS 






14 


0001A 


CCC17 


EQU 


CCCFL5 


SCRATCH DELETED GENERATIONS 






00000010 


CCC16M 


EQU 


X'lO 1 


SAVE MASK 


(Listing 


Of 


CHACCC 


continued 


on page 62) 
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(Listing of CHACCC continued from page 61) 



LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 


COMMENT 






00000020 


CCC17M 


EQU 


X^O' 


SCRATCH MASK 


14 


0001B 






CCCILK 

* 


DS 


XL1 


INTERLOCK BYTE 
POINTER ENTRIES FOLLOW 


14 


0001C 






CCCNM1 


DS 


CL8 


NAME OF ENTITY POINTED AT 


14 


00024 






CCCFL6 


DS 


XL1 


IDENTIFICATION FLAG 






14 


00024 


CCC18 


EQU 


CCCFL6 


LOWER INDEX 






14 


00024 


CCC18A 


EQU 


CCCFL6 


GENERATION INDEX 






14 


00024 


CCC19 


EQU 


CCCFL6 


DSD 






14 


00024 


CCC20 


EQU 


CCCFL6 


SD 






14 


00024 


CCC70 


EQU 


CCCFL6 


PUBLIC (VAM) DSD 






00000001 


CCC18M 


EQU 


X^Ol' 


LOWER INDEX MASK 






00000002 


CCC18N 


EQU 


X , 02' 


GENERATION INDEX MASK 






00000003 


CCC19M 


EQU 


X f 03' 


DSD MASK 






00000004 


CCC20M 


EQU 


X'04' 


SD MASK 






00000006 


CCC70M 


EQU 


X , 06 i 


PUBLIC (VAM) MASK 


14 


00025 






CCCPT1 


DS 


XL3 


POINT ADDRESS 






14 


00028 


CCCED1 


EQU 


* 








oooooooc 


CCCSZ2 


EQU 


CCCED1-CCCNM1 SIZE OF POINTER ENTRY 










* 


THE 


FOLLOWING 


FIELDS ARE UNIQUE TO 










* 


CONTINUATION : 


INDEXES AND GI'S 






14 


00008 




IORG| 


CCCNME 




14 


00008 






CCCPT2 


DS 


XL12 


FIRST POINTER FIELD IN 
CHAINED SBLOCK 










* 


THE 


FOLLOWING 


FIELDS ARE UNIQUE TO SD 






14 


00011 


* 


|ORGl 


CCCPTL 


FORMAT OF SHARING 
DESCRIPTOR 


14 


00011 






CCCNMO 

* 


DS 


CL44 


OWNER'S NAME FOR SHARED 
LEVEL 


14 


0003D 






* 


DS 


X 


RESERVED 
N466 


14 


0003E 






CCCSBC 

* 

* 
* 
* 


DS 


HL1 


COUNT OF NUMBER OF PENDING 

N466 
BULKIO JOBS ON DATA SET IN 
AN N466 

OWNERS CATALOG POINTED TO 
BY N466 

THIS SHARING DISCRIPTOR 
N466 


14 


0003F 






♦ 


DS 


X 


RESERVED 
N466 










* 


THE 


FOLLOWING 


FIELDS ARE UNIQUE TO FIRST 










* 


SHARER LIST 








14 


00008 




|ORGJ 


CCCNME 


FORMAT OF SHARERS LIST 


14 


00008 






CCCCT5 

* 


DS 


2X 


RESERVED 
N466 


14 


0000A 








DS 


CL6 


UNUSED 






14 


00010 


CCCFL7 


EQU 


CCCFL1 




14 


00010 






* 
* 
* 


DS 


CL1 


SERIES OF ENTRIES FOLLOW 

WHICH 

INCLUDE SHARER ID AND 

PRIVILEGES 


14 


00011 






CCCNM2 


DS 


CL8 


SHARER ID 


14 


00019 






CCCFL8 


DS 


XL1 


SHARE PRIVILEGES 






14 


00019 


CCC21 


EQU 


CCCFL8 


UNLIMITED 






14 


00019 


CCC22 


EQU 


CCCFL8 


R/W 






14 


00019 


CCC23 

* 

* 


EQU 


CCCFL8 


R/O 

USE SAME MASKS GIVEN 

PREVIOUSLY FOR CCCFL3 


(Listing 


Of 


CHACCC 


continued 


on page 63) 





4 



62 CHACCC 



C Listing of CHACCC continued from page 6 2) 

OPER COMMENT 



LOCATION INSTRUCTION 
14 0001A 
00000009 


SOURCE 
CCCED2 
CCCSZ3 

♦ 


INST 

EQU 

EQU 




* 


THE i 


14 00008 


CCCID1 

* 


EQU 


00000040 
00000038 


* 

CCCSZ4 

CCCSZ5 

* 


EQU 
EQU 



CCCED2-CCCNM2 SIZE OF ID AND PRIVATE 

ENTRY 
THE FOLLOWING FIELDS ARE UNIQUE TO 

CONTINUATION SHARER LIST 
CCCNME FIRST ID AND PRIVATE ENTRY 

IN 

CHAINED BLOCKS 
CCCEND-CCCFWD SIZE OF SBLOCK 
CCCEND-CCCNME SIZE OF ALLOCATABLE 

AREA 



CHACCC 63 



Catalog Common DSECT CCHACDS) 

The Catalog Common DSECT (CDS) contains various parameters which are used, in com- 
mon, by all catalog service routines. This area resides in the Locate routine's 
PSECT. 
The CDS occupies 104 bytes of virtual storage, aligned on word boundaries. 

CHACDS Storage map 



DEC 


8 

16 

24 

32 

40 



HEX 



0| 

1 


CDSLBD 


1 

1 


CDSCLS | 


8| 

1 


CDSCLC 


1 

1 


CDSNPT | 


10| 

1 


CDSCLB 


1 

1 


CDSLCP | 


18|CDSLOC 

1 


| CDSUNC | CDSFLG 
1 1 


| CDSFLD | 
1 1 


CDSPTR | 


20| 

1 




CDS U ID 




28 | 

1 


CDSBUF 


|CDSBSZ 

1 


|CDSMSZ | | 
1 1 1 


| UNNAMED | 
1 1 



Fields in CHACDS 



by displacement 



DEC HEX FIELD 
0000 0000 CDSLBD 
0004 0004 CDSCLS 
0008 0008 CDSCLC 
0012 000C CDSNPT 
0016 0010 CDSCLB 
0020 0014 CDSLCP 
0024 0018 CDSLOC 



DEC HEX FIELD 

0025 0019 CDSUNC 

0026 001A CDSRBD 
0026 001A CDSPUTX 

0026 001A CDSPUT 
00 26 001A CDSFLG 

0027 001B CDSFLD 
00 28 001C CDSPTR 



DEC HEX FIELD 

0032 0020 CDSUID 

(EQU) 0040 0028 CDSBUF 

(EQU) 0044 002C CDSBSZ 

(EQU) 0045 002D CDSMSZ 

0056 0038 CDSEND 



(EQU) 



Alphabetical list of fields in CHACDS 



FIELD 

CDSBSZ 

CDSBUF 

CDSCLB 

CDSCLC 

CDSCLS 

CDSEND 

CDSFLD 



DEC HEX 
0044 002C 
0040 0028 
0016 0010 
0008 0008 
0004 0004 
0056 0038 
0027 001B 



FIELD 
CDSFLG 
CDSLBD 
CDSLCP 
CDSLOC 
CDSMSZ 
(EQU) CDSNPT 
CDSPTR 



DEC HEX 
0026 001A 
0000 0000 
0020 0014 
0024 0018 
0045 002D 
0012 000C 
0028 001C 



FIELD 

CDSPUT 

CDSPUTX 

CDSRBD 

CDSUID 

CDSUNC 



DEC HEX 
0026 001A (EQU) 
0026 001A (EQU) 
0026 001A (EQU) 
0032 0020 
0025 0019 



Assembler listing of CHACDS 



LOCATION INSTRUCTION SOURCE 
15 00000 CHACDS 



INST OPER 



COMMENT 



DSECT CATALOG COMMON 

********************************************************************** 

* THIS DSECT WAS REWRITTEN FOR NSRB 437 

* THIS DSECT IS USED FOR THE INTERCHANGE OF INFORMATION ABOUT THE 

* CURRENT CATALOG MEMBER AMOUNG CATALOG SERVICE ROUTINES. THE BASE 

* FOR CHACDS IS AN IVM PSECT REPRESENTED BY THE VCON OF CHBCDS. 
********************************************************************** 



15 00000 
15 00004 
15 00008 
15 0000C 



15 00010 
15 00014 

15 00018 



CDSLBD 


DS 


A 


CDSCLS 


DS 


A 


CDSCLC 


DS 


F 


CDSNPT 


DS 


A 


* 






* 






* 






* 






CDSCLB 


DS 


A 


CDSLCP 


DS 


A 


* 






CDSLOC 


DS 


X 



RELATIVE PAGE ADDR (0P00) 

RELATIVE SBLOCK ADDR (0PBB) 

COUNT OF QUALIFIERS LOCATED 

ADDR OF NEXT FQN 

QUALIFIER. (IF 

OWNER-ENTERED IS 

INDICATED, ADDR 

RELATES TO OWNER FQN) 

VMA OF CURRENT BUFFER PAGE 

PSECT ADDR OF SETTER OF 

CDSLOC 

SET TO X 1 01* IF MODULE HAS 



(Listing of CHACDS continued on page 65) 
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(Listing of CHACDS continued from page 64) 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 


COMMENT 








* 






LOCKED A 








♦ 






MEMBER AND WILL NOT WANT 








* 






SUBSEQUENTLY CALLED 








♦ 






MODULES (LOCATE 








* 






INCLUDED) TO UNLOCK BEFORE 








* 






END OF 








* 






UPDATE. NOTE THAT (1) FLAG 








* 






IS TO BE 








♦ 






RESET BY SETTER, (2) OWNER 








# 






FQN MUST 








* 






BE USED FOR ALL LOCATES 








♦ 






AND (3) 








* 






MULTIPLE SETTING/RESETTING 








♦ 






MUST BE 








♦ 






AVOIDED. 






00000001 


CDSLOCM 


EQU 


X'01 - 


CDSLOC MASK 


15 


00019 




CDSUNC 

* 
* 


DS 


X 


SET IF MODULE DOES NOT WANT 

LOCATE 

TO CROSS CATALOGS. 






00000001 


CDSUNCM 


EQU 


X f 01' 


CDSUNC MASK 


15 


0001A 




CDSFLG 


DS 


X 


FLAG BYTE 






15 0001A 


CDSPUT 


EQU 


CDSFLG 


PUT FLAG 






00000080 


CDSPUTM 


EQU 


X^O" 


PUT MASK 






15 0001A 


CDSPUTX 


EQU 


CDSFLG 


PUTX FLAG 






00000040 


CDSPUTXM 


EQU 


X , 40 f 


PUTX MASK 






15 0001A 


CDSRBD 


EQU 


CDSFLG 


CATALOG BEING REBUILT FLAG 






00000020 


CDSRBDM 


EQU 


X^O* 


CATALOG BEING REBUILT MASK 


15 


0001B 




CDSFLD 


DS 


X 


RESERVED 


15 


0001C 




CDSPTR 


DS 


A 


ADDR OF CURRENT CATALOG DCB 


15 


00020 




CDSUID 


DS 


CL8 


USERID OF CURRENT MEMBER 


15 


00028 




CDSBUF 


DS 


A 


CURRENT CATALOG BUFFER 
ORIGIN ADDR 


15 


0002C 




CDSBSZ 


DS 


HL1 


CURRENT CATALOG BUFFER SIZE 
IN PAGES 


15 


0002D 




CDSMSZ 

* 


DS 


HL1 


CURRENT CATALOG MEMBER SIZE 
IN PAGES 


15 


0002E 






DS 


10X 


RESERVED 






15 00038 


CDSEND 


EQU 


* 


END OF CDS 






00000038 


CDSSZ1 


EQU 


CDSEND-CDSLBD SIZE OF CDS 
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Catalog Error Processor Parameter List (CHACEP) 



CHACEP contains parameters used by Catalog Service Routines when calling 
CZCFE (Catalog Error Processor). 

CHACEP occupies 40 bytes and is located in IVM. 

CHACEP Storage map 



t 



HEX 



DEC 


8 

16 

24 

32 



Fields in CHACEP — by displacement 



01 

1 




CEPMOD 








8 | CEPERR 

1 


| CEPOPT | CEPFLG 
i 1 


| CEPFLD I 
t 1 




CEPFQN 




10| 

I 


CEPQFR 






CEPSYR 




18! 

1 


CEPABN 






CEPVMA1 




20 | 

i 


CEPVMA2 




CEPCNT 


1 
I 


UNNAMED 



DEC HEX 
0000 0000 

0008 0008 

0009 0009 

0010 000A 

0011 000B 



FIELD 

CEPMOD 

CEPERR 

CEPOPT 

CEPFLG 

CEPFLD 



DEC HEX 
0012 000C 
0016 0010 
0020 0014 
0024 0018 
0028 001C 



FIELD 

CEPFQN 

CEPQFR 

CEPSYR 

CEPABN 

CEPVMA1 



DEC HEX FIELD 

0032 0020 CEPVMA2 

0036 0024 CEPCNT 

0040 0028 CEPEND (EQU) 



Alphabetical list of fields in CHACEP 



FIELD 

CEPABN 

CEPCNT 

CEPEND 

CEPERR 

CEPFLD 



DEC HEX 
0024 0018 
0036 0024 



FIELD 



CEPFLG 
CEPFQN 
0040 0028 CEQU) CEPMOD 
0008 0008 CEPOPT 
0011 000B CEPQFR 



DEC HEX 
0010 000A 
0012 000C 
0000 0000 
0009 0009 
0016 0010 



FIELD DEC HEX 

CEPSYR 0020 0014 

CEPVMA1 0028 001C 

CEPVMA2 0032 0020 



Assembler listing of CHACEP 



INST OPER 
DSECT 



COMMENT 

CATALOG ERROR PROCESSOR 

PLIST 



LOCATION INSTRUCTION SOURCE 
16 00000 CHACEP 
* 
*********************************************************************** 

* NSRB 437 * 

* THIS DSECT DEFINES THE PARAMETER LIST OF THE CATALOG ERROR PROCESSOR* 

* (CZCFE) AND IS USED BY ALL CALLERS WHICH ARE CATALOG SERVICES * 

* ROUTINES. UPON DETECTION OF AN ERROR CONDITION, THE CALLER WILL USE * 

* THIS DSECT TO SET UP THE DIAGNOSTIC INFORMATION, BEFORE CALLING * 

* CZCPE. THE BASE FOR THIS DSECT IS THE VCON OF CHBCEP, AN IVM PSECT. * 
*********************************************************************** 

* THE FOLLOWING FIELDS ARE TO BE SET UP BY CZCFE' S 

* CALLER 



16 


00000 




CEPMOD 


DS 


CL8 


MODULE NAME OF CALLER 


16 


00008 




CEPERR 


DS 


X 


ERROR CODE 


16 


00009 




CEPOPT 


DS 


X 


EXIT OPTION CODE 






00000001 


CEPOPT1 


EQU 


X'Ol' 


COMP CODE 1 ABEND EXIT 
REQUESTED 






00000002 


CEPOPT 2 


EQU 


X'02 1 


RETURN REQUESTED 






00000003 


CEPOPT3 


EQU 


X'03' 


CATALOG UNUSABLE - 

RECONSTRUCT 

CATALOG THEN CC 1 ABEND 


16 


0000A 




CEPFLG 


DS 


X 


RESERVED 


16 


0000B 




CEPFLD 


DS 


X 


RESERVED 


16 


ooooc 




CEPFQN 


DS 


A 


ADDR OF 44 BYTE FQN DSNAME 


16 


00010 




CEPQFR 


DS 


A 


ADDR OF QUALIFIER AT WHICH 
LEVEL 


(Listing 


Of CHACEP 


continued 


on page 67) 
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(Listing of CHACEP continued from page 66) 

LOCATION INSTRUCTION SOURCE INST OPER COMMENT 

* ERROR OCCURS 

* THE FOLLOWING ARE SET UP BY CALLER WHO CLAIMS HIS 

* OWN SYSER/ABEND 

16 00014 CEPSYR DS A ADDR OF CALLER'S MINOR 

* SYSER 

16 00018 CEPABN DS A ADDR OF CALLER 1 S ABEND 

* MESSAGE 

* THE FOLLOWING ARE VARIABLE INPUT SET UP BY CALLER 

* DEPENDING ON THE 

ERROR CODE. 
PRIMARY ADDR OF ERROR 
SECONDARY ADDR OF ERROR 
ACTUAL COUNT OF MEMBER 
ENTRIES 
RESERVED 

END OF ERROR PROCESSOR 
PLIST 

CEPEND-CEPMOD SIZE OF ERROR 
PROCESSOR PLIST 



16 


0001C 






CEPVMA1 


DS 


A 


16 


00020 






CEPVMA2 


DS 


A 


16 


00024 






CEPCNT 


DS 


H 


16 


00026 








DS 


2X 






16 


00028 


CEP END 


EQU 


* 






00000028 


CEPSZ1 


EQU 


CE 










* 
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Channel Table (CHACHL) 



The Channel Table (CHACHL) f contains status flags on all channels and specifies 
whether or not a particular channel can be used in the path to a device. CHACHL 
occupies 456 bytes of core storage, aligned on a doubleword boundary. 



p 



CHACHL Storage map 



DEC 




HEX 



136 



200 
208 



0| CHLLOCK 

1 


1 

1 


UNNAMED 


1 

1 


CHLCUT | 


8| 
\_ 

1 

1 

1 






CHLPTR 


= 


88 I CHLCS 

1 


ICHLFLG 

1 


1 
1 


CHLRST 




1 

1 

1 






C8 | CHLDIG1 

1 


(CHLDIG2 

1 


|CHLDIG3 

1 


| CHLDIG4 | CHLDIG5 
1 1 


|CHLDIG6 |CHLDIG7 | CHLDIG8 | 
1 1 1 1 


D0| 
\_ 

1 

1 

1 






CHLDIGS 





Fields in CHACHL — by displacement 



DEC 

0000 

0000 

0004 

0008 

0136 

0137 

0137 

0137 

0137 



HEX 

0000 

0000 

0004 

0008 

0088 

0089 

0089 

0089 

0089 



FIELD 
CHLLOCK 

CHLBEG 

CHLCUT 

CHLPTR 

CHLCS 

CHLT 

CHLE 

CHLSB 

CHLR 



DEC 

0137 

0137 

0137 

0137 

0137 

(EQU) 0138 

(EQU) 0200 

(EQU) 0201 

CEQU) 0202 



HEX 

0089 

0089 

0089 

0089 

0089 

008A 

00C8 

00C9 

00CA 



FIELD 

CHLS 

CHLM 

CHLP 

CHLA 

CHLFLG 

CHLRST 

CHLDIG1 

CHLDIG2 

CHLDIG3 



DEC 

(EQU) 0203 

(EQU) 0204 

(EQU) 0205 

(EQU) 0206 

0207 

0208 

0456 



HEX 

00 CB 

00CC 

00CD 

00CE 

00CF 

00D0 

01C8 



FIELD 

CHLDIG4 

CHLDIG5 

CHLDIG6 

CHLDIG7 

CHLDIG8 

CHLDIGS 

CHLBDY 



Alphabetical list of fields in CHACHL 



FIELD 

CHLA 

CHLBDY 

CHLBEG 

CHLCS 

CHLCUT 

CHLDIGS 

CHLDIG1 

CHLDIG2 

CHLDIG3 



DEC HEX 
0137 0089 (EQU) 
0456 01C8 
0000 0000 
0136 0088 
0004 0004 
0208 00D0 

0200 00C8 

0201 00C9 

0202 00CA 



FIELD 

CHLDIG4 

CHLDIG5 

CHLDIG6 

CHLDIG7 

CHLDIG8 

CHLE 

CHLFLG 

CHLLOCK 

CHLM 



DEC HEX 

0203 00CB 

0204 00CC 

0205 00CD 

0206 00CE 

0207 00CF 

0137 0089 (EQU) 
0137 0089 
0000 0000 
0137 0089 (EQU) 



FIELD 


DEC 


HEX 




CHLP 


0137 


0089 


(EQU) 


CHLPTR 


0008 


0008 




CHLR 


0137 


0089 


(EQU) 


CHLRST 


0138 


008A 




CHLS 


0137 


0089 


(EQU) 


CHLSB 


0137 


0089 


(EQU) 


CHLT 


0137 


0089 


(EQU) 



Assembler listing of CHACHL 



LOCATION INSTRUCTION SOURCE 



17 00000 



17 00000 

17 00000 
17 00001 
17 00004 
17 00008 



CHACHL 
CHLBEG 

CHLLOCK 

CHLCUT 

CHLPTR 



INST OPER 
DSECT 



DS 

DS 
DS 
DS 
DS 



0D 

XL1 
3C 
F 
32F 



COMMENT 

CHANNEL TABLE 

ALIGN TABLE ON DOUBLE WORD 

BOUNDARY 

LOCK BYTE 

NOT USED 

CONTROL UNIT TABLE POINTER 

MULTIPLEXOR/SELECTOR 

CHANNEL TBL POINTERS 
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(Listing of CHACHL continued from page 68) 



LOCATION INSTRUCTION SOURCE 



17 00088 



0000000F 



17 00089 



17 00089 
00000080 
17 00089 
00000040 
17 00089 
00000020 
17 00089 
00000010 
17 00089 
00000008 
00000078 

17 00089 
00000004 
17 00089 
00000002 
17 00089 
00000001 



17 0008A 



17 000C8 



17 000C9 
17 00 OCA 
17 000CB 
17 OO0CC 
17 000CD 
17 000CE 
17 0O0CF 
17 000D0 
17 001C8 



000001C8 



CHLCS 

CHLCSM 

CHLFLG 

CHLA 

CHLAMK 

CHLP 

CHLPMK 

CHLM 

CHLMM 

CHLS 

CHLSM 

CHLR 

CHLRM 

CHLAM 

CHLSB 

CHLSBM 

CHLE 

CHLEM 

CHLT 

CHLTM 

CHLRST 

* 

CHLDIG1 

* 

CHLDIG2 
CHLDIG3 
CHLDIG4 
CHLDIG5 
CHLDIG6 
CHLDIG7 
CHLDIG8 
CHLDIGS 
CHLBDY 

CHLSZE 



INST 
DS 

EQU 

DS 

EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 

EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
DS 

DS 



DS 

DS 
DS 
DS 
DS 
DS 
DS 
DS 
DS 

EQU 



OPER 
XL1 

XL1 

CHLFLG 

X^O" 

CHLFLG 

X'40' 

CHLFLG 

X^O* 

CHLFLG 

X^O' 

CHLFLG 

X'OS' 

X f 78 f 

CHLFLG 

x , 04 f 

CHLFLG 

X'02 1 

CHLFLG 

X^l' 

31H 

XL1 



XL1 
XL1 
XL1 
XL1 
XL1 
XL1 
XL1 
31D 
OX 



COMMENT 

CONTROL UNITS ASSIGNED 

TABLE SIZE 

CONTROL UNITS ASSIGNED 

TABLE SIZE MASK 

FLAGS FOR EACH CHANNEL 

AVAILABILITY FLAG 

AVAILABILITY FLAG MASK 

PARTITIONED FLAG 

PARTITIONED FLAG MASK 

UNIT DOWN FLAG 

UNIT DOWN FLAG MASK 

SENSE HOLD FLAG 

SENSE HOLD MASK 

RESERVED FLAG 

RESERVED MASK 

INDS RSTRICTING AVAIL OF 

CHANNEL 

SUBCHANNEL BUSY FLAG 

SUBCHANNEL BUSY MASK 

NONEXISTENT FLAG 

NON-EXISTENT MASK 

CHANNEL TYPE FLAG 

CHANNEL TYPE FLAG MASK 

REMAINING CHANNEL TABLE 

SIZES AND FLAGS 

FIRST DEVICE INTERACTION 

GROUP ASSOCIATED 
WITH THE CHANNEL. ZERO IS AN ILLEGAL 
DIG NO. 

SECOND DIG 

THIRD DIG 

FOURTH DIG 

FIFTH DIG 

SIXTH DIG 

SEVENTH DIG 

EIGHTH DIG 

DIGS FOR REMAINING CHANNELS 

END OF CHANNEL TABLE 
15943 
CHLBDY-CHLBEG CHANNEL TABLE SIZE 
15943 



CHACHL 69 



Task or Real Clock Table (CHACLK) and Clock List Header (CHACLH) 



The Task Monitor PSECT maintains 16 real-time clocks and 16 task-time clocks in 
timer tables. Each timer table is headed by a CHACLH header pointing to the active 
clock C CHACLK) having the least amount of time requested. 



I 



Real Clock Header 



I 






Real Clock 



Real Timer Table 



Real Clock 15 
Task Clock Header 
Task Clock 

Task Clock 15 



Task Timer Table 



The Timer Tables 

CHACLH occupies 16 bytes of virtual storage aligned on word boundaries * 
occupies 24 bytes of virtual storage aligned on word boundaries. 

CHACLK Storage map 



CHACLK 



HEX 



DEC 



8 
16 



Fields in CHACLK — by displacement 

DEC HEX FIELD 

0000 0000 CLKNO 

0002 0002 CLKAC 

0008 0008 CLKTT 



0| 

I 


CLKNO 


| CLKAC 


| UNNAMED 
1 


UNNAMED 


8| 
i 




CLKTT 




| CLKTA 


01 
I 




CLKBP 




CLKFP 



DEC HEX FIELD 
0008 0008 CLKRT 
0012 000C CLKTA 
0016 0010 CLKBP 



DEC HEX FIELD 
0020 0014 CLKFP 



Alphabetical list of fields in CHACLK 



FIELD 


DEC 


HEX 


FIELD 


DEC 


HEX 


FIELD 


DEC HEX 


CLKAC 


0002 


0002 


CLKNO 


0000 


0000 


CLKTT 


0008 0008 


CLKBP 


0016 


0010 


CLKRT 


0008 


0008 






CLKFP 


0020 


0014 


CLKTA 


0012 


oooc 







Assembler listing of CHACLK 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 


COMMENT 




19 


00000 


CHACLK 


DSECT 




TASK OR REAL CLOCK 


19 00000 








DS 


OF 




19 00000 






CLKNO 


DS 


H 


CLOCK NUMBER 


19 00002 






CLKAC 


DS 


CL1 


ACTIVITY INDICATOR 




OO00O0FF 


CLKACM 


EQU 


X . FF . 


ACTIVE CLOCK INDICATOR 




00000000 


CLKACC 


EQU 


X'00' 


INACTIVE CLOCK INDICATOR 


19 00003 








DS 


CL1 


NOT USED 


19 00004 








DS 


F 


NOT USED 


19 00008 






CLKRT 

* 


DS 


0CL8 


REAL TIME VALUE IN 
MICROS ECS. 


19 00008 






CLKTT 

* 


DS 


F 


ACCUM.TASK TIME PLUS VALUE 
BELOW 


19 O0OOC 






CLKTA 


DS 


F 


ACTUAL TIME ASKED FOR 


19 00010 






CLKBP 


DS 


F 


BACKWARD POINTER 


19 00014 






CLKFP 

* 


DS 


F 


FORWARD POINTER TO NEXT 
CLOCK 
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CHACLH Storage irap 



DEC 




HEX 
0| 



CLHTT 



CLHTA 



8| 
L 



CLHFP 



CLHII 



Fields in CHACLH — by displacement 

DEC HEX FIELD 
0000 0000 CLHTT 
0000 0000 CLHRT 

Alphabetical list of fields in CHACLH 



DEC HEX FIELD 
0004 0004 CLHTA 
0008 0008 CLHFP 



DEC HEX FIELD 
0012 000C CLHII 



FIELD 
CLHFP 


DEC HEX 
0008 0008 


CLHII 


0012 000C 



FIELD 
CLHRT 
CLHTA 



DEC HEX 
0000 0000 
0004 0004 



FIELD 
CLHTT 



DEC HEX 
0000 0000 



Assembler listing of CHACLH 

LOCATION INSTRUCTION SOURCE 



INST OPER 





18 


00000 


CHACLH 


DSECT 




18 00000 








DS 


OF 


18 00000 






CLHRT 


DS 


0CL8 


18 00000 






CLHTT 


DS 


F 


18 00004 






CLHTA 


DS 


F 


18 00008 






CLHFP 


DS 


F 


18 0000C 






CLHII 


DS 


F 



COMMENT 

CLOCK LIST HEADER 

TIME VALUE SET VIA SETTR 
ACCUM.TIME REQUESTED TIME 
VALUE USED IN SETTU REQUEST 
PTR TO FIRST CLOCK IN CHAIN 
IGNORE INDICATOR 
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STARTUP Communications Region (CHACMR) 



CHACMR is a copy of the communications region of STARTUP, including the link- 
edited lVM f RESSUP, and RSS to be used for restarts. CHACMR is used by the 
QUICK START dataset creator in STARTUP. 

CHACMR Storage map 



i 



DEC 



HEX 



8 


8 


16 


10 


24 


18 


32 


20 


40 


28 


48 


30 


56 


38 


64 


40 


72 


48 


80 


50 


88 


58 


96 


60 


104 


68 


112 


70 


128 


80 


136 


88 


144 


90 


152 


98 



168 

184 
192 
200 
208 
216 
224 



A8 

B8 
CO 
C8 
DO 
D8 
E0 



| CMREIAA 




1 
1 




RESERVED | 


| CMRESTR | 


| CMRDAM | 


I CMRCRG8 




1 




CMRCRG9 | 


| CMRCRG10 




1 

1 




CMRCRG11 | 


| CMRCRG12 




I 




CMRCRG13 | 


| CMRCRG14 




I 
I 




CMRIDS | 


| CMRIDS (CONT) 


[CMRSETO [CMRSENM | CMRCPUS I 
111 1 


| CMROTHC 


(CMRIPLC | 
1 1 




CMRCCUS | 


| C MRP ART 




1 

1 


CMRCCBLN 


| CMRSULN I 
» 1 


| CMRTERM | 
1 I 


RESERVED 


i 
1 




CMRVOLIP | 


| CMRPRTAD I 
i I 






CMRIPLID 




| CMRDSCBI 




1 
1 




CMRPATI | 


| CMRSPLOC 




i 
1 




CMRCCBLC | 


| CMRPFX 




[ 

1 










UNNAMED 




| CMRMCH | CMR3 2MSK ( 
I 1 1 


RESERVED 


1 
1 




CMRTERSY | 


| CMRIPLSY 




1 
1 




CMRPGUSE | 


I UNNAMED 




I 

I 




CMRSPDSY I 


1 CMRPPDSY 




1 

I 










CMRDMLST 






1 

1 










CMRSERR 






1 

1 




CMRPAGAD | 


| CMRSPGAD 




i 
1 




CMRPMDOR 1 


| CMRDRUMS | RESERVED 
I i 


1 

I 




CMRASD | 


| CMRASDDR 




I 

1 


CMRDEV 


| CMRIMC01 | CMRWRDCT | 
I * ! 


| CMRPAT | RESERVED I 
1 1 1 


CMRTMTCT 


1 
1 


CMRTMBFP 


| CMRTMTTP | 


| CMRTMBSL | 
1 I 


CMRTMBUF 


1 
1 


CMRTMTER 


| RESERVED | 
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CCHACMR continued from page 72) 



DEC 
232 

240 

248 

256 

264 

272 

280 

288 

296 

304 

312 

320 

328 

336 

344 

352 

360 

368 

376 

384 

392 

400 

408 

416 

424 

432 

440 

448 

456 

464 

472 

480 

488 



HEX 
E8 

F0 

F8 

100 

108 

110 

118 

120 

128 

130 

138 

140 

148 

150 

158 

160 

168 

170 

178 

180 

188 

190 

198 

1A0 

1A8 

1B0 

1B8 

ICO 

1C8 

1D0 

1D8 

1E0 

1E8 



| CMRTCTVM | 


CMRBFPVM | 


| CMRMEMAD | 


CMRSPTAD | 


| CMRXTSI | 


CMROUP | 


| CMRINP | 


CMRPSABF | 


| CMRWORK | 


CMREXTAB | 


1 CMRNPAT | 


CMRLDTBL | 


| CMRLDRSS | 


CMRTDYAD ) 


I CMRTDYLN | CMRTDYOV I 
I 1 1 


CMRLDTLN | CMRRSSLN | 
1 I 


| CMRMAPAD | 


CMROPOD | 


I CMRLLAD | 


CMRTAD I 


| CMRTAD2 | 


CMRSYMAD I 


| CMRSSCOM | 


CMRSSPT2 | 


| CMRSSPT3 | 


CMRSSXP4 | 


| CMRSSPGS | CMRSYMPG | 
1 1 1 


CMRECAD | 


| CMRSERAD | 


CMRSSRO | 


| CMRSSADD | 


CMRADEND | 


| CMRSYMVM | 


CMRTDYVM | 


| CMRSDSVM | 


CMRVMAOR | 


| CMRSDAVM | 


CMRVSSVM | 


1 CMRPVTVM I 


CMRISAVM | 


1 CMRTDTVM I 


CMRSCMVM | 


| CMRVMDYL | 


CMRDLEP | 


| CMRVMTCM | 


CMRSARVM I 


| CMRSDALC | 


CMRSDAPG | 


| CMRVSSLC | 


CMRVSSPG | 


| CMRPVTLC | 


CMRPVTPG | 


| CMRISALC | 


CMRISAPG | 


1 CMRTDTLC | 


CMRTDTPG | 


| CMRSCMLC | 


CMRSCMPG | 


| CMRVMDLL | 


CMRVMDLP | 


1 UNNAMED | 


| CMRTCML | 


CMRTCMP | 


| CMRSARLC | 


CMRSARPG | 
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DEC 
496 

504 

512 

520 

528 

536 

544 

552 

560 

568 

576 

584 

592 

600 

608 

616 

624 

632 

640 

648 

656 



704 
712 
720 
728 
736 
744 
752 
760 
768 
776 



HEX 
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1F0| 


CMRSSDAL 


CMRSSDAP [ 


1F8 


CMRSCBT | 


CMRNMDEV | 


200| 


CMRINMTS 


CMRNMTDE | 


208 


CMRSSYS | 


CMRSASAT | 


210| 


CMRSSCN 


CMRSPATH | 


218 


CMRSPATP 


CMRSPATR | 


220| 


CMRINTCM 


CMRSTSKI | 


228 


CMRSQGQE 


CMRSSTE [ 


230 


CMRSDISP 


CMRSQSCN | 


238 


CMRSSCA 


CMRSSCR | 


240| 


CMRSRSV 


CMRSSTA | 


248 


CMRSPSA 


CMRNSVC | 


250| 


CMRSVCTB 


CMRRSDAT I 


258 


CMRSSDAT | 


CMRSIPE | 


260| 


CMRAEBRS 


CMRASY | 


268 


CMRPAPTR | 


CMRCOMAD | 


270| 


CMRLOWAD 


CMRCATCT | 


278 


CMRCABFP | 


CMRINAD | 


280] 


CMROUTAD 


CMRSTART | 


288 


CMRSXPT 


CMRP1002 | 


290j 


CMRUSER 1 RESERVED 

i I 






CMRHSHDL 


2C0 


CMRCXDCN 


CMRLLAST | 


2C8 


CMRLLEND 


CMRSG0LN | 


2D0 


CMRSG1LN 


CMRSG2LN ) 


2D8 


CMRSG3LN 


CMRSG4LN | 


2E0 


CMRSG5LN 


, CMRSG6LN | 


2E8 


| CMRSG7LN 


CMRSG8LN | 


2F0 


CMRSG9LN 


[ CMRSGALN | 


2F8 


1 CMRSGBLN 


CMRSGCLN | 


300 


CMRSGDLN 


| CMRSGELN | 


308 


| CMRSGFLN 


CMRSG0AD | 
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DEC 
784 

792 

800 
808 
816 
824 
832 
840 
848 
856 
864 
872 
880 
888 
896 
904 
912 
920 
928 
936 
944 
952 
960 
968 
976 



HEX 



CCHACMR continued from page 74) 



1008 



1040 



310| 


CMRSG1AD 




CMRSG2AD | 


318| 


CMRSG3AD 




CMRSG4AD | 


320 


CMRSG5AD 




CMRSG6AD | 


328| 


CMRSG7AD 




CMRSG8AD | 


330 


CMRSG9AD 




CMRSGAAD | 


3381 


CMRSGBAD 




CMRSGCAD | 


340 


CMRSGDAD 




CMRSGEAD | 


348 


CMRSGFAD 




CMRSGMTO | 


350 


CMRSGMT1 




CMRSGMT2 | 


358 


CMRSGMT3 




CMRSGMT4 | 


360 


CMRSGMT5 




CMRSGMT6 | 


368 


CMRSGMT7 




CMRSGMT8 | 


370 


CMRSGMT9 




CMRSGMTA | 


378 


CMRSGMTB 




CMRSGMTC | 


380 


CMRSGMTD 




CMRSGMTE | 


388 


CMRSGMTF 




CMRPAGO | 


390 


CMRPAG1 




CMRPAG2 | 


398 


CMRPAG3 




CMRPAG4 | 


3A0 


C MRP AG 5 




CMRPAG6 | 


3A8 


CMRPAG7 




CMRPAG8 | 


3B0 


C MRP AG 9 




CMRPAGA | 


3B8 


CMRPAGB 




CMRPAGC | 


3 CO 


CMRPAGD 




CMRPAGE | 


3C8 


CMRPAGF 




CMRNASVM | 


3 DO 


I CMRNASNM | 
I 1 


CMRPVSEG 










3F0 


i i 

1 1 


CMRPBSEG 










410 


1 I 

1 i 


RESERVED I 
1 


CMRCRGO | 
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DEC 


HEX 


1048 


418 


1056 


420 


106*4 


428 


1072 


430 


1080 


438 


1088 


440 



1152 



1408 



1608 



1728 



480 



580 



648 



6C0 



1808 


710 


1816 


718 


1824 


720 


1832 


728 


1840 


730 


1848 


738 


1856 


740 


1864 


748 


1872 


750 


1880 


758 



| CMRCRG1 


| CMRCRG2 | 


| CMRCRG3 


| CMRCRG4 | 


| CMRCRG5 


| CMRCRG6 | 


| CMRCRG7 


(CMRGTDR (CMRGTFL |CMRGTNC | RESERVED! 
1 1 I 1 1 


1 CfcRGTNUM J RESERVED 
1 I 


| CMRRETAD | 


(CMRSSFL | RESERVED | | 
II f i 


CMRSAVE 


CMRDSCB 


CMRDSTBL 


CMRPCU 


CMRDSTR 


| CMRDSNAD 


| CMRHRCHY | CMRDSCNT | 
1 I I 


| CMRDDSCO | CMRCSNTR 


| CMRPDCNT | RESERVED | 
I I 1 


I CMRDSINP 


| CMRDSLST | 


| CMRDVOL 


| CMREXDIS | CMRDSDIS | 
1 I 1 


| CMRNMFCT | 


| CMRNMBFP | 


| CMRCRVOL 


I CMRQUAL I 


| CMRQUAL1 


| CMRQUALS | 


| CMRQUALR 


| CMRALLDS | 


= CMRTDYTB = 
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DEC HEX 

2136 858 



2216 8A8 
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2256 


8D0 


2264 


8D8 


2272 


8E0 


2280 


8E8 


2288 


8F0 



2304 

2320 
2328 
2336 
2344 
2352 
2360 
2368 
2376 
2384 
2392 
2400 
2408 
2416 
2424 
2432 
2440 
2448 



900 

910 
918 
920 
928 
930 
938 
940 
948 
950 
958 
960 
968 
970 
978 
980 
988 
990 



= 


CMR INPUT 






= 


I CMRPATCH | 


| CMRSOAI 






CMRSOAN 




| CMRPGSVE 






CMRMPBG 




| CMRYMCUR 






RESERVED 




| CMRTRMNT | 


1 I 
| CMRTRTB | 


| CMRCEND 


(RESERVED I 
1 1 










CMRENDMK 




J CMRZEROS | 


| CMRSEGMK 


1 
1 




CMRONE 




| CMR256 


1 

1 




CMRLIDMS 




| CMRLIDMP 


1 

» 




CMRMMSK 




| UNNAMED | 
1 1 


CMRPGLTH | 
t 


CMRDEFCT 


1 
» 


CMRLXPT I 


| CMRLXPST | 
t 1 


CMRTWO | 
i 


CMRFOUR 


i 

1 




1 


CMRDSNAM 






|CMRDSQAL| 
I 1 


| CMRDSQAL(CONT) 


1 

i 


RESERVED | 


I CMRNAME | 


| UNNAMED 1 
1 i 


CMRCZ | 

1 


CMRCHB 


|CMRTDYNM| 
1 » 


| 


CMRTDYNMCCONT) 






|CMRMAPNM| 
I i 


| 


CMRMAPNM(CONT) 






[CMREXTNMI 
1 1 


| 


CMREXTNMCCONT) 






|CMRPGWRT| 
1 i 


\ | CMRMAP | CMRVAM2 
i 1 


|RESERVED| 
1 1 




UNNAMED 




I CMRTRANV 






CMRRDPDV 




| CMRSRCHV 






CMRLOCXV 




| CMRHASHV 






CMRSAVEV 
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DEC 
2456 

2464 

2472 

2480 

2488 

2496 

2504 

2512 

2520 

2528 

2536 

2544 

2552 

2560 

2568 

2576 

2584 

2592 

2600 

2616 

2632 
2640 
2648 
2656 
2664 
2672 



2744 
2752 
2760 



HEX 
998 

9A0 

9A8 

9B0 

9B8 

9C0 

9C8 

9D0 

9D8 

9E0 

9E8 

9F0 

9F8 

A00 

A08 

A10 

A18 

A20 

A28 

A38 

A48 
A50 
A58 
A60 
A68 
A70 



AB8 



ACO 



AC8 



| CMRGTXSV | 


CMRBS13 | 


| CMRHSHSV | 


CMRMODSV | 


| CMRRDNSV | CMRSTLEN 


| RESERVED | 


| CMRSARSV | CMREADER 


I CMRMODNM | 


| CMRMODNM(CONT) 


| CMREXTNO | 


| CMRPARTM |CMRTEMP | CMROVFG (CMRCSW1 (CMRCSW2 (CMRDLBT | RESERVED) 
1 1 1 1 1 1 1 I 


| CMRIOAD | CMRIOLEN 


(CMRIOFG (RESERVED) 
1 I 1 


| CMRGRP1 | 


CMRGRP2 | 


| CMRGRPS1 | 


CMRGRPS2 | 


| CMREQAD1 | 


CMREQAD2 | 


I CMRETAD1 | 


CMRETAD2 | 


| CMRBUFF1 | 


CMRBUFF2 | 


[ CMRBLDF | 


CMRBLDX | 


| CMRMAXTD ] CMRBFLN 


| RESERVED | 
i 1 


| CMRSCED | 


RESERVED | 


| CMRCCW05 I 


I CMRCCW06 I 


| CMRIVM 






1 1 

I i 


| CMRSUP 






i ! 

I ( 


I CMRRSS | 


1 | RESERVED ( 
1 1 I 


| CMRFSTSU | 


CMRSPSV | 


I CMRQKTYP | CMRQKVOL | CMRQKPAT 


| CMRQKCPU ] 
i I 


| CMRQKPVT | CMRRPNE | CMRSLTE 


| CMRSRQKF | 
i \ 


| CMRSRQKL | CMRSRCNT (CMRQKFG ( 
I I 11 


CMRQKID | 


| CMRQKID (CONT) (RESERVED) 
I I I 




CMRQKMAP 




| I UNNAMED | 
1 1 1 


| CMRVMLL | 


(UNNAMED | CMRRCLL | 
1 1 I 
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DEC 
2768 

2776 

2784 
2792 
2800 
2808 
2816 
2824 
2832 
28 40 
2848 
2856 
2864 
2872 
2880 
2888 
2896 
2904 
2912 
2920 
2928 
2936 
2944 
2952 
2960 
2968 
2976 
2984 
2992 
3000 
3008 
3016 
3024 



HEX 
ADO 

AD8 

AEO 

AE8 

AFO 

AF8 

BOO 

B08 

BIO 

B18 

B20 

B28 

B30 

B38 

B40 

B48 

B50 

B58 

B60 

B68 

B70 

B78 

B80 

B88 

B90 

B98 

BAO 

BA8 

BBO 

BB8 

BCO 

BC8 

BDO 



[CMRRCLL [UNNAMED | CMRRSLL | 
III I 


| CMRRSLL tCONT) | UNNAMED |CMRPGIND| CMRMSK1B | 
1 1 I 1 t 


| CMRMSK2 | CMRMSK3 | 


| CMRMSKE | CMRMSK7 | 


| CMRMSK8 | CMRMSK9 ( 


I CMRMSK11 | CMRMUTCT | CMRSPTNO [ 
I 1 f 1 


| CMRLSPT | CMRSSVE | CMRBLANK | 
III I 


| CMRBLANK (CONT) | CMRMXHDI | 


| CMRMXHDR | CMRAEAR | 


| CMRPAGEV | CMRFXBTL | 


| CMRFXBS | CMRPGTAD | 


| CMRINADV | CMRVIRT | 


I CMRTEXTN | CMRNOBT | 


| CMRERLD | CMRERND | 


I CMRIRLD | CMRIRND | 


| CMRVMPT I CMRSEPCS | 


I CMRMODCO I CMRINPSZ | CMROUTSZ | CMRSEGSW | 
1 II 1 1 


| CMRSSSW |CMRMVESW|CMRNLLSW|CMRCDFSW|CMRSERSW| CMRUTI 1 
\ 1 1 1 I 1 1 


| CMRUTI (CONT) [CMRIPLY | CMRSLSW ] CMRNMPTH | 
till 1 


| CMRSDAC | CMRCORE | 


| CMRPTMP I CMTRTPG | 


| CMRBFGT | CMRTDE | 


| CMRMODFY | CMREIAA2 | 


| CMROPER | CMRPRINT | 


I CMRMSGTB | CMRPPCCW | 


| CMRADTRN | CMRATRAN | 


| CMRBTRAN ( CMRCTRAN | 


| CMRLOCX | CMREXTNT [ 


| CMRHASH | CMRORGIN | 


\\ CMRWRTDY | CMRXTSRT | 


| CMRSHPT | CMRRSPI | 


l| CMRFORM | CMRSETPT | 


I CMRNAMLC [ CMRRDPOD | 
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DEC 
3032 

30**0 

304*8 

3056 

3064 

3072 

3080 

3088 

3096 

3104 

3112 

3120 

3128 

3136 

3144 

3152 

3160 

3168 

3176 

3184 

3192 

3200 

3208 

3216 

3224 

3232 

3240 

3248 

3256 



HEX 
BD8 

BEO 

BE8 

BFO 

BF8 

COO 

C08 

CIO 

CI 8 

C20 

C28 

C30 

C38 

C40 

C4 8 

C50 

C58 

C60 

C68 

C70 

C78 

C80 

C88 

C90 

C98 

CAO 

CA8 

CBO 

CB8 



(CHACMR continued from page 79) 



| CMRMAPGN | CMRCOMTB | 


| CMRWRSYM J CMRADDPG | 


| CMRBSDST | CMRESRVP ) 


| CMRGTFLD ( CMRWTMD ) 


| CMRWRXTS | CMRSOAPG | 


| CMRHOLTB ( CMRENDTB | 


I CMRHOLVL | CMRQRDR I 


| CMRBGNTD | CMRLLLNK | 


| CMRLLSCN | CMRSRCN | 


| CMRLDPMD | CMRSDAT | 


| CMRDATA | CMRCYLHD | 


| CMRSMFSA | CMRSORD | 


| CMROTHER | CMRGTPAT | 


| CMRRDSCB | CMRTDTCT | 


1 CMRREAD | CMROPRT | 


| CMRDELDS | CMRDLTBL | 


| CMRDLBTB | CMRELTDY I 


| CMRALLER | CMRSLOAD I 


| CMRSRCH I CMRNMTAB | 


| CMRSERR1 | CMRSTERM | 


| CMRLOADL I CMRHSHSR | 


I CMREADIN | CMRSEEK | 


| CMREROUT | CMRBLDTB | 


| CMRPGTDY | CMRJSHB2 | 


| CMRJSHBA I CMRADTIT | 


[ CMRSTRAN | CMRRTRAN | 


| CMRPGXTS | CMRASAT | 


| CMRDIRSZ | CMRQKRD | 


| CMRQKSTA I CMRENAB | 



ORG CMRESTR 



8 | UNNAMED | UNNAMED [ 
I I L 



CMRIXPG 



UNNAMED 



8 CHACMR 



Fields in CHACMR — by displacement 



DEC HEX FIELD 
0000 0000 CMREIAA 
000 8 0008 CMRESTR 
0008 0008 CMRPREL 
0010 000A CMRIXPG 
0016 0010 CMRDAM 
0024 0018 CMRCRG8 
0028 001C CMRCRG9 
0032 0020 CMRCRG10 
0036 0024 CMRCRG11 
0040 0028 CMRCRG12 
0044 002C CMRCRG13 
0048 0030 CMRCRG14 
0052 0034 CMRIDS 

0060 003C CMRSETO 

0061 003D CMRSENM 

0062 003E CMRCPUS 
0064 0040 CMROTHC 

0067 0043 CMRIPLC 

0068 0044 CMRSIMP (EQU) 
0068 0044 CMRCCUS 

0072 0048 CMRPART 

0076 004C CMRCCBLN 

0078 004E CMRSULN 

0080 0050 CMRTERM 

0084 0054 CMRVOLTC (EQU) 

0084 0054 CMRVOLIP 

0086 0056 CMRVOLAD CEQU) 

0088 0058 CMRPRTAD 

0090 005A CMRIPLID 

0096 0060 CMRDSCBI 

0100 0064 CMRPATI 

0104 0068 CMRSPLOC 

0108 006C CMRCCBAD (EQU) 

0108 006C CMRCCBLC 

0112 0070 CMRPSAS (EQU) 

0112 0070 CMRPFX 

0128 0080 CMRMCH 

0129 0081 CMR32MSK 
0132 0084 CMRTERSY 
0136 0088 CMRIPLSY 
0140 00 8 C CMRPGUSE 
0148 0094 CMRSPDSY 
0152 0098 CMRPPDSY 
0156 009C CMRDMLST 
0172 00AC CMRSERR 
0188 OOBC CMRPAGAD 
0192 00 CO CMRSPGAD 
0196 00C4 CMRPMDOR 
0200 00C8 CMRDRUMS 
0204 OOCC CMRASD 
0208 00D0 CMRASDDR 
0212 00D4 CMRDEV 
0214 00D6 CMRIMC01 

0214 00D6 CMRINT 

0215 O0D7 CMRWRDCT 

0216 00D8 CMRPAT 
0218 OODA CMRTMTCT 
0220 OODC CMRTMBFP 
0222 00 DE CMRTMTTP 
0224 00E0 CMRTMBSL 
0226 00 E2 CMRTMBUF 
0228 00E4 CMRTMTER 
0232 00 E8 CMRTCTVM 
0236 OOEC CMRBFPVM 
0240 00 FO CMRMEMAD 
0244 00F4 CMRSPTAD 
0244 00F4 CMRBUFFS 
(Continued on page 82) 



DEC 


HEX 


FIELD 


DEC 


HEX 


FIELD 


0248 


00F8 


CMRXTSI 


0488 


01E8 


CMRSARLC 


0252 


OOFC 


CMROUP 


0492 


01EC 


CMRSARPG 


0252 


OOFC 


CMRBUFFA 


0496 


01F0 


CMRSSDAL 


0256 


0100 


CMRINP 


0496 


01F0 


CMRSSCSL 


0260 


0104 


CMRPSABF 


0500 


01F4 


CMRSSDAP 


0264 


0108 


CMRWORK 


0504 


01F8 


CMRSCBT 


0268 


010C 


CMREXTAB 


0508 


01FC 


CMRNMDEV 


0268 


010C 


CMRRDWR 


0512 


0200 


CMRINMTS 


0272 


0110 


CMRNPAT 


0516 


0204 


CMRNMTDE 


0276 


0114 


CMRLDTBL 


0520 


0208 


CMRSSYS 


0276 


0114 


CMRQKDS 


0524 


020C 


CMRSASAT 


0280 


0118 


CMRLDRSS 


0528 


0210 


CMRSSCN 


0280 


0118 


CMRQKREC 


0532 


0214 


CMRSPATH 


0284 


one 


CMRTDYAD 


0536 


0218 


CMRSPATP 


0288 


0120 


CMRTDYLN 


0540 


021C 


CMRSPATR 


0290 


0122 


CMRTDYOV 


0544 


0220 


CMRINTCM 


0292 


0124 


CMRLDTLN 


0548 


0224 


CMRSTSKI 


0294 


0126 


CMRRSSLN 


0552 


0228 


CMRSQGQE 


0296 


0128 


CMRMAPAD 


0556 


022C 


CMRSSTE 


0300 


012C 


CMROPOD 


0560 


0230 


CMRSDISP 


0304 


0130 


CMRLLAD 


0564 


0234 


CMRSQSCN 


0308 


0134 


CMRTAD 


0568 


0238 


CMRSSCA 


0312 


0138 


CMRTAD2 


0572 


023C 


CMRSSCR 


0316 


013C 


CMRSYMAD 


0576 


0240 


CMRSRSV 


0320 


0140 


CMRSSCOM 


0580 


0244 


CMRSSTA 


0324 


0144 


CMRSSPT2 


0584 


0248 


CMRSPSA 


0328 


0148 


CMRSSPT3 


0588 


024C 


CMRNSVC 


0332 


014C 


CMRSSXP4 


0592 


0250 


CMRSVCTB 


0336 


0150 


CMRSSPGS 


0596 


0254 


CMRRSDAT 


0338 


0152 


CMRSYMPG 


0600 


0258 


CMRSSDAT 


0340 


0154 


CMRECAD 


0600 


0258 


CMRSSCSN 


0344 


0158 


CMRSERAD 


0604 


025C 


CMRSIPE 


0348 


015C 


CMRSSRO 


0608 


0260 


CMRAEBRS 


0352 


0160 


CMRSSADD 


0612 


0264 


CMRASY 


0356 


0164 


CMRADEND 


0616 


0268 


CMRPAPTR 


0360 


0168 


CMRSYMVM 


0620 


026C 


CMRCOMAD 


0364 


016C 


CMRTDYVM 


0624 


0270 


CMRLOWAD 


0368 


0170 


CMRSDSVM 


0628 


0274 


CMRCATCT 


0372 


0174 


CMRVMAOR 


0632 


0278 


CMRCABFP 


0376 


0178 


CMRSDAVM 


0636 


027C 


CMRINAD 


0376 


0178 


CMRIVMCN 


0640 


0280 


CMROUTAD 


0380 


017C 


CMRVSSVM 


0644 


0284 


CMRSTART 


0384 


0180 


CMRPVTVM 


0648 


0288 


CMRSXPT 


0388 


0184 


CMRISAVM 


0652 


028C 


CMRP1002 


0392 


0188 


CMRTDTVM 


0656 


0290 


CMRUSER 


0396 


018C 


CMRSCMVM 


0660 


0294 


CMRHSHDL 


0400 


0190 


CMRVMDYL 


0704 


02C0 


CMRCXDCN 


0404 


0194 


CMRDLEP 


0708 


02C4 


CMRLLAST 


0408 


0198 


CMRVMTCM 


0712 


02C8 


CMRLLEND 


0412 


019C 


CMRSARVM 


0716 


02CC 


CMRSGOLN 


0416 


01A0 


CMRSDALC 


0716 


02CC 


CMRSGLN 


0416 


01A0 


CMRIVMCS 


0720 


02D0 


CMRSG1LN 


0420 


01A4 


CMRSDAPG 


0724 


02D4 


CMRSG2LN 


0424 


01A8 


CMRVSSLC 


0728 


02D8 


CMRSG3LN 


0428 


01 AC 


CMRVSSPG 


0732 


02DC 


CMRSG4LN 


0432 


01B0 


CMRPVTLC 


0736 


02E0 


CMRSG5LN 


0436 


01B4 


CMRPVTPG 


0740 


02E4 


CMRSG6LN 


0440 


01B8 


CMRISALC 


0744 


02E8 


CMRSG7LN 


0444 


01BC 


CMRISAPG 


0748 


02EC 


CMRSG8LN 


0448 


01C0 


CMRTDTLC 


0752 


2FO 


CMRSG9LN 


0452 


01C4 


CMRTDTPG 


0756 


02F4 


CMRSGALN 


0456 


01C8 


CMRSCMLC 


0760 


02F8 


CMRSGBLN 


0460 


01CC 


CMRSCMPG 


0764 


02FC 


CMRSGCLN 


0464 


01D0 


CMRVMDLL 


0768 


0300 


CMRSGDLN 


0468 


01D4 


CMRVMDLP 


0772 


0304 


CMRSGELN 


0480 


O1E0 


CMRTCML 


0776 


0308 


CMRSGFLN 


0484 


01E4 


CMRTCMP 


0780 


030C 


CMRSGOAD 

CHACMR 81 



(Continued from page 81) 



DEC HEX FIELD 
078 03 0C CMRSGAD 
0784 0310 CMRSG1AD 
0788 0314 CMRSG2AD 
0792 0318 CMRSG3AD 
0796 031C CMRSG4AD 
0800 0320 CMRSG5AD 
0804 0324 CMRSG6AD 
0808 0328 CMRSG7AD 
0812 032C CMRSG8AD 
0816 0330 CMRSG9AD 
0820 0334 CMRSGAAD 
0824 0338 CMRSGBAD 
0828 033C CMRSGCAD 
0832 0340 CMRSGDAD 
0836 0344 CMRSGEAD 
0840 0348 CMRSGFAD 
0844 034C CMRS0PG1 CEQU) 
0844 034C CMRSGMTO 
0844 034C CMRSGMT 
0848 0350 CMRSGKF1 
0852 0354 CMRSSOR (EQU) 
0852 0354 CMRSGMT2 
0856 0358 CMRSGMT3 
0860 035C CMRSGMT4 
0864 0360 CMRSGMT5 
0868 0364 CMRSGMT6 
0872 0368 CMRSGMT7 
0876 036C CMRSGMT8 
0880 0370 CMRSGMT9 
0884 0374 CMRSGMTA 
0888 0378 CMRSGMTB 
0892 037C CMRSGMTC 
0896 0380 CMRSGMTD 
0900 0384 CMRSGtaTE 
0904 0388 CMRSGMTF 
0908 038C CMRPAG0 
0908 038C CMRPAG 
0912 0390 CMRPAG1 
0916 0394 CMRPAG2 
0920 0398 CMRPAG3 
0924 039C CMRPAG4 
0928 03A0 CMRPAG5 
0932 03A4 CMRPAG6 
0936 03A8 CMRPAG7 
0940 03AC CMRPAG8 
0944 03B0 CMRPAG9 
0948 03 B4 CMRPAGA 
0952 03B8 CMRPAGB 
0956 03 BC CMRPAGC 
0960 03C0 CMRPAGD 
0964 03C4 CMRPAGE 
0968 03C8 CMRPAGF 
0972 03CC CMRNASVM 
0976 03D0 CMRNASNM 
0978 03D2 CMRPVSEG 
1010 03F2 CMRPBSEG 
1044 0414 CMRCRGO 
1048 0418 CMRCRG1 
1052 04 1C CMRCRG2 
1056 0420 CMRCRG3 
1060 0424 CMRCRG4 
1064 0428 CMRCRG5 
1068 042C CMRCRG6 
1072 0430 CMRCRG7 

1076 0434 CMRGTDR 

1077 0435 CMRGTFL 

1078 0436 CMRGTNC 
1080 0438 CMRGTNUM 
(Continued on page 83) 



DEC 


HEX 


FIELD 


DEC 


HEX 


FIELD 


1084 


043C 


CMRRETAD 


2436 


0984 


CMRRDPDV 


1088 


0440 


CMRSSFL 


2440 


0988 


CMRSRCHV 


1092 


0444 


CMRSAVE 


2444 


098C 


CMRLOCXV 


1152 


0480 


CMRDSCB 


2448 


0990 


CMRHASHV 


1408 


0580 


CMRSDTB (EQU) 


2452 


0994 


CWRSAVEV 


1408 


0580 


CMRDSTBL 


2456 


0998 


CMRGTXSV 


1608 


0648 


CMRPCU 


2460 


099C 


CMRBS13 


1728 


06C0 


CMRDSTR 


2464 


09AO 


CMRHSHSV 


1808 


0710 


CMRDSNAD 


2468 


09A4 


CMRMODSV 


1812 


0714 


CMRHRCHY 


2472 


09A8 


CMRRDNSV 


1814 


0716 


CMRDSCNT 


2476 


09 AC 


CMRSTLEN 


1816 


0718 


CMRDDSCO 


2480 


09B0 


CMRSARSV 


1818 


071A 


CMRCSNTR 


2484 


09B4 


CMREADER 


1820 


071C 


CMRPDCNT 


2486 


09B6 


CMRMODNM 


1824 


0720 


CMRDSINP 


2494 


09BE 


CMREXTNO 


1828 


0724 


CMRDSLST 


2496 


09C0 


CMRPARTM 


1832 


0728 


CMRDVOLT (EQU) 


2498 


09C2 


CMRTEMP 


1832 


0728 


CMRDVOL 


2499 


09C3 


CMROVFG 


1834 


072A 


CMRDVOLA (EQU) 


2500 


09C4 


CMRCSW1 


1836 


072C 


CMREXDIS 


2501 


09C5 


CMRCSW2 


1838 


072E 


CMRDSDIS 


2502 


09C6 


CMRDLBT 


1840 


0730 


CMRNMTCT 


2504 


09C8 


CMRIOAD 


1848 


0738 


CMRNMBFP 


2508 


09CC 


CMRIOLEN 


1856 


0740 


CMRCRVOL 


2510 


09CE 


CMRIOFG 


1860 


0744 


CMRQUAL 


2512 


09D0 


CMRGRP1 


1864 


0748 


CMRQUAL1 


2516 


09D4 


CMRGRP2 


1868 


074C 


CMRQUALS 


2520 


09D8 


CMRGRPS1 


1872 


0750 


CMRQUALR 


2524 


09DC 


CMRGRPS2 


1876 


0754 


CMRALLDS 


2528 


09E0 


CMREQADl 


1880 


0758 


CMRTDYTB 


2532 


09E4 


CMREQAD2 


2136 


0858 


CMRINPUT 


2536 


09E8 


CMRETAD1 


2216 


08A8 


CMRPATCH 


2540 


09EC 


CMRETAD2 


2256 


08D0 


CMRSOAI 


2544 


09FO 


CMRBUFF1 


2260 


08D4 


CMRSOAN 


2548 


09F4 


CMRBUFF2 


2264 


08D8 


CMRPGSVE 


2552 


09F8 


CMRBLDF 


2268 


08DC 


CMRMPBG 


2556 


09FC 


CMRBLDX 


2272 


08E0 


CMRYMCUR 


2560 


0A00 


CKRMAXTD 


2280 


08E8 


CMRTRMNT 


2564 


0A04 


CMRBFLN 


2288 


08F0 


CMRTRTB 


2568 


0A08 


CMRSCED 


2304 


0900 


CMRCEND 


2576 


0A10 


CMRCCW05 


2308 


0904 


CMRENDMK 


2584 


0A18 


CMRCCW06 


2320 


0910 


CMRZEROS 


2590 


0A1E 


CMRCCW6B (EQU) 


2328 


0918 


CMRSEGMK 


2592 


0A20 


CMRIVM 


2332 


091C 


CMRONE 


2607 


0A2F 


CKRSUP 


2334 


091E 


CMRONE1 (EQU) 


2622 


0A3E 


CMRRSS 


2336 


0920 


CMR256 


2640 


0A50 


CMRFSTSU 


2340 


0924 


CMRLIDMS 


2644 


0A54 


CMRSPSV 


2344 


0928 


CMRLIDMP 


2648 


0A58 


CMRQKTYP 


2348 


092C 


CMRMMSK 


2650 


0A5A 


CMRQKVOL 


2354 


0932 


CMRPGLTH 


2652 


0A5C 


CMRQKPAT 


2356 


0934 


CMRDEFCT 


2654 


0A5E 


CMRQKCPU 


2358 


0936 


CMRLXPT 


2656 


0A60 


CMRQKPVT 


2360 


0938 


CMRLXPST 


2658 


0A62 


CMRRPNE 


2362 


093A 


CMRTWO 


2660 


0A64 


CMRSLTE 


2364 


093C 


CMRFOUR 


2662 


0A66 


CMRSRQKF 


2366 


093E 


CMRDSNAM 


2664 


0A68 


CMRSRQKL 


2375 


0947 


CMRDSQAL 


2666 


0A6A 


CMRSRCNT 


2384 


0950 


CMRNAME 


2668 


0A6C 


CMRQKFG 


2394 


095A 


CMRC2 


2669 


0A6D 


CMRQKID 


2396 


095C 


CMRCHB 


2676 


0A74 


CMRQKMAP 


2399 


095F 


CMRTDYNM 


2752 


0AC0 


CMRVMLL 


2407 


0967 


CMRMAPNM 


2761 


0AC9 


CMRRCLL 


2415 


096F 


CMREXTNM 


2770 


0AD2 


CMRRSLL 


2423 


0977 


CMRPGWRT 


2779 


OADB 


CMRPGIND 


2424 


0978 


CMRMAP 


2780 


OADC 


CMRMSK1B 


2425 


0979 


CMRVAM2 


2784 


OAEO 


CMRMSK2 


2428 


097C 


CMRMINUS 


2788 


0AE4 


CMRMSK3 


2432 


0980 


CMRTRANV 


2792 


0AE8 


CMRMSKE 



8 2 CHACMR 



(Continued from page 82) 



DEC 
2796 

2800 
2800 
2802 
2804 
2808 
2812 
2814 
2816 
2818 
2820 
2828 
2832 
2836 
2840 
2844 
2848 
2852 
2856 
2860 
2864 
2868 
2872 
2876 
2880 
2884 
2888 
2892 
2896 
2898 
2900 
2902 
2904 
2906 
2907 
2908 
2909 
2910 
2914 
2915 
2916 
2920 
2920 
2924 



HEX 

OAEC 

0AF0 

0AF0 

0AF2 

0AF4 

0AF8 

OAFC 

OAFE 

0B00 

OB 02 

OB04 

OBOC 

0B10 

0B14 

0B18 

0B1C 

0B20 

0B24 

0B28 

0B2C 

0B30 

0B34 

0B38 

0B3C 

0B40 

0B44 

0B48 

0B4C 

0B50 

0B52 

0B54 

0B56 

0B58 

OB 5 A 

0B5B 

0B5C 

0B5D 

0B5E 

0B62 

0B63 

0B64 

0B68 

0B68 

0B6C 



FIELD 

CMRMSK7 

CMRMFFF 

CMRMSK8 

CMRUSECT 

CMRMSK9 

CMRMSK11 

CMRMUTCT 

CMRSPTNO 

CMRLSPT 

CMRSSVE 

CMRBLANK 

CMRMXHDI 

CMRMXHDR 

CMRAEAR 

CMRPAGEV 

CMRFXBTL 

CMRFXBS 

CMRPGTAD 

CMRINADV 

CMRVIRT 

CMRTEXTN 

CMRNOBT 

CMRERLD 

CMRERND 

CMRIRLD 

CMRIRND 

CMRVMPT 

CMRSEPCS 

CMRMODCO 

CMRINPSZ 

CMROUTSZ 

CMRSEGSW 

CMRSSSW 

CMRMVESW 

CMRNLLSW 

CMRCDFSW 

CMRSERSW 

CMRUTI 

CMRIPLY 

CMRSLSW 

CMRNMPTH 

CMRSDAC 

CMRFSTAC 

CMRCORE 



(EQU) 
CEQU) 



DEC 

2928 

2932 

2936 

2940 

2944 

2948 

2952 

2956 

2956 

2960 

2964 

2968 

2972 

2976 

2980 

2984 

2988 

2992 

2996 

3000 

3004 

3008 

3012 

3016 

3020 

3024 

3028 

3032 

3036 

3040 

3044 

3048 

3052 

3056 

3060 

3064 

3068 

3072 

3076 

3080 

3084 

3088 

3092 

3096 



HEX 

0B70 

0B74 

0B78 

0B7C 

0B80 

0B84 

0B88 

0B8C 

0B8C 

0B90 

0B94 

0B98 

0B9C 

OBAO 

0BA4 

0BA8 

OBAC 

OBBO 

0BB4 

0BB8 

OBBC 

OBCO 

0BC4 

0BC8 

OBCC 

OBDO 

0BD4 

0BD8 

OBDC 

OBEO 

0BE4 

0BE8 

OBEC 

OBFO 

0BF4 

0BF8 

OBFC 

0C00 

0C04 

0C08 

OCOC 

0C10 

0C14 

0C18 



FIELD 

CMRPTMP 

CMTRTPG 

CMRBFGT 

CMRTDE 

CMRMODFY 

CMREIAA2 

CMROPER 

CMRWT 

CMRPRINT 

CMRMSGTB 

CMRPPCCW 

CMRADTRN 

CMRATRAN 

CMRBTRAN 

CMRCTRAN 

CMRLOCX 

CMREXTNT 

CMRHASH 

CMRORGIN 

CMRWRTDY 

CMRXTSRT 

CMRSHPT 

CMRRSPI 

CMRFORM 

CMRSETPT 

CMRNAMLC 

CMRRDPOD 

CMRMAPGN 

CMRCOMTB 

CMRWRSYM 

CMRADDPG 

CJMRBSDST 

CMRESRVP 

CMRGTFLD 

CMRWTMD 

CMRWRXTS 

CMRSOAPG 

CMRHOLTB 

CMRENDTB 

CMRHOLVL 

CMRQRDR 

CMRBGNTD 

CMRLLLNK 

CMRLLSCN 



(EQU) 



DEC 


HEX 


FIELD 


3100 


0C1C 


CMRSRCN 


3104 


0C20 


CMRLDPMD 


3108 


0C24 


CMRSDAT 


3112 


0C28 


CMRDATA 


3116 


0C2C 


CMRCYLHD 


3120 


OC30 


CMRSMFSA 


3124 


0C34 


CMRSORD 


3128 


0C38 


CMROTHER 


3132 


0C3C 


CMRGTPAT 


3136 


0C40 


CMRRDSCB 


3140 


0C44 


CMRTDTCT 


3144 


0C48 


CMRREAD 


3148 


0C4C 


CMROPRT 


3152 


0C50 


CMRDELDS 


3156 


0C54 


CMRDLTBL 


3160 


0C58 


CMRDLBTB 


3164 


0C5C 


CMRELTDY 


3168 


0C60 


CMRALLER 


3172 


0C64 


CMRSLOAD 


3176 


0C68 


CMRSRCH 


3180 


0C6C 


CMRNMTAB 


3184 


OC70 


CMRSERR1 


3188 


0C74 


CMRSTERM 


3192 


0C78 


CMRLOADL 


3196 


0C7C 


CMRHSHSR 


3200 


0C80 


CMREADIN 


3204 


0C84 


CMRSEEK 


3208 


0C88 


CMREROUT 


3212 


0C8C 


CMRBLDTB 


3216 


0C90 


CMRPGTDY 


3220 


0C94 


CMRJSHB2 


3224 


0C98 


CMRJSHBA 


3228 


0C9C 


CMRADTIT 


3232 


OCAO 


CMRSTRAN 


3236 


0CA4 


CMRRTRAN 


3240 


0CA8 


CMRPGXTS 


3244 


OCAC 


CMRASAT " 


3248 


OCBO 


CMRDIRSZ 


3252 


0CB4 


CMRQKRD 


3256 


0CB8 


CMRQKSTA 


3260 


OCBC 


CMRENAB 


3264 


OCCO 


CMRLSTAD 



Alphabetical list of fields in CHACMR 



FIELD 



DEC 



CMRADDPG 3044 
CMRADEND 0356 
CMRADTIT 3228 
CMRADTRN 2968 
CMRAEAR 2836 
CMRAEBRS 0608 
CMRALLDS 1876 
CMRALLER 3168 
CMRASAT 3244 
CMRASD 0204 
CMRASDDR 0208 
CMRASY 0612 
CMRATRAN 2972 
CMRBFGT 2936 
CMRBFLN 2564 
CMRBFPVM 0236 
CMRBGNTD 3088 
CMRBLANK 2820 
CMRBLDF 2552 
CMRBLDTB 3212 
CMRBLDX 2556 
(Continued on 



HEX 

0BE4 

0164 

0C9C 

0B98 

0B14 

0260 

0754 

0C60 

OCAC 

OOCC 

O0D0 

0264 

0B9C 

0B78 

0A04 

OOEC 

0C10 

0B04 

09F8 

0C8C 

09FC 

page 



84) 



FIELD 


DEC 


HEX 


FIELD 


DEC 


HEX 


CMRBSDST 


3048 


0BE8 


CMRCORE 


2924 


0B6C 


CMRBS13 


2460 


099C 


CMRCPUS 


0062 


003E 


CMRBTRAN 


2976 


OBAO 


CMRCRGO 


1044 


0414 


CMRBUFFA 


0252 


OOFC 


CMRCRG1 


1048 


0418 


CMRBUFFS 


0244 


00F4 


CMRCRG10 


0032 


0020 


CMRBUFF1 


2544 


O9F0 


CMRCRG11 


0036 


0024 


CMRBUFF2 


2548 


09F4 


CMRCRG12 


0040 


0028 


CMRCABFP 


0632 


0278 


CMRCRG13 


0044 


002C 


CMRCATCT 


0628 


0274 


CMRCRG14 


0048 


0030 


CMRCCBAD 


0108 


006C 


(EQU) CMRCRG2 


1052 


041C 


CMRCCBLC 


0108 


006C 


CMRCRG3 


1056 


0420 


CMRCCBLN 


0076 


004C 


CMRCRG4 


1060 


0424 


CMRCCUS 


0068 


0044 


CMRCRG5 


1064 


0428 


CMRCCW05 


2576 


0A10 


CMRCRG6 


1068 


042C 


CMRCCW06 


2584 


0A18 


CMRCRG7 


1072 


0430 


CMRCCW6B 


2590 


0A1E 


(EQU) CMRCRG8 


0024 


0018 


CMRCDFSW 


2908 


0B5C 


CMRCRG9 


0028 


001C 


CMRCEND 


2304 


0900 


CMRCRVOL 


1856 


0740 


CMRCHB 


2396 


095C 


CMRCSNTR 


1818 


071A 


CMRCOMAD 


0620 


026C 


CMRCSW1 


2500 


09C4 


CMRCOMTB 


3036 


OBDC 


CMRCSW2 


2501 


09C5 










CHACMR 83 
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FIELD 


DEC 


HEX 


FIELD 


DEC 


HEX 


FIELD 


DEC 


HEX 


CMRCTRAN 


2980 


0BA4 


CMRGTNUM 


1080 


0438 


CMRMODCO 


2896 


0B50 


CMRCXDCN 


0704 


02C0 


CMRGTPAT 


3132 


0C3C 


CMRMODFY 


2944 


0B80 


CMRCYLHD 


3116 


0C2C 


CMRGTXSV 


2456 


0998 


CMRMODNM 


2486 


09B6 


CMRCZ 


2394 


095A 


CMRHASH 


2992 


0BB0 


CMRMODSV 


2468 


09A4 


CMRDAM 


0016 


0010 


CMRHASHV 


2448 


0990 


CMRMPBG 


2268 


08DC 


CMRDATA 


3112 


0C28 


CMRHOLTB 


3072 


ocoo 


CMRMSGTB 


2960 


OB90 


CMRDDSCO 


1816 


0718 


CMRHOLVL 


3080 


OC08 


CMRMSKE 


2792 


0AE8 


CMRDEFCT 


2356 


0934 


CMRHRCHY 


1812 


0714 


CMRMSK1B 


2780 


0ADC 


CMRDELDS 


3152 


OC50 


CMRHSHDL 


0660 


0294 


CMRMSKll 


2808 


0AF8 


CMRDEV 


0212 


00D4 


CMRHSHSR 


3196 


0C7C 


CMRMSK2 


2784 


0AE0 


CMRDIRSZ 


3248 


0CB0 


CMRHSHSV 


2464 


09A0 


CMRMSK3 


2788 


0AE4 


CMRDLBT 


2502 


09C6 


CMRIDS 


0052 


0034 


CMRMSK7 


2796 


0AEC 


CMRDLBTB 


3160 


0C58 


CMRIMC01 


0214 


00D6 


CMRMSK8 


2800 


OAFO 


CMRDLEP 


0404 


0194 


CMRINAD 


0636 


027C 


CMRMSK9 


2804 


0AF4 


CMRDLTBL 


3156 


0C54 


CMRINADV 


2856 


0B28 


CMRMUTCT 


2812 


0AFC 


CMRDMLST 


0156 


009C 


CMRINMTS 


0512 


0200 


CMRMVESW 


2906 


0B5A 


CMRDRUMS 


0200 


00C8 


CMRINP 


0256 


0100 


CMRMXHDI 


2828 


OBOC 


CMRDSCB 


1152 


0480 


CMRINPSZ 


2898 


0B52 


CMRMXHDR 


2832 


0B10 


CMRDSCBI 


0096 


0060 


CMR INPUT 


2136 


0858 


CMRNAME 


2384 


0950 


CMRDSCNT 


1814 


0716 


CMRINT 


0214 


00D6 


CMRNAMLC 


3024 


OBDO 


CMRDSDIS 


1838 


072E 


CMRINTCM 


0544 


0220 


CMRNASNM 


0976 


03D0 


CMRDSINP 


1824 


0720 


CMRIOAD 


2504 


09C8 


CMRNASVM 


0972 


03CC 


CMRDSLST 


1828 


0724 


CMRIOFG 


2510 


09CE 


CMRNLLSW 


2907 


0B5B 


CMRDSNAD 


1808 


0710 


CMRIOLEN 


2508 


09CC 


CMRNMBFP 


1848 


0738 


CMRDSNAM 


2366 


093E 


CMRIPLC 


0067 


0043 


CMRNMDEV 


0508 


01FC 


CMRDSQAL 


2375 


0947 


CMRIPLID 


0090 


005A 


CMRNMPTH 


2916 


0B64 


CMRDSTBL 


1408 


0580 


CMRIPLSY 


0136 


0088 


CMRNMTAB 


3180 


0C6C 


CMRDSTR 


1728 


06CO 


CMRIPLY 


2914 


0B62 


CMRNMTCT 


1840 


0730 


CMRDVOL 


1832 


0728 


CMRIRLD 


2880 


0B40 


CMRNMTDE 


0516 


0204 


CMRDVOLA 


1834 


072A 


(EQU) CMRIRND 


2884 


0B44 


CMRNOBT 


2868 


0B34 


CMRDVOLT 


1832 


0728 


(EQU) CMRISALC 


0440 


01B8 


CMRNPAT 


0272 


0110 


CMREADER 


2484 


09B4 


CMRISAPG 


0444 


01BC 


CMRNSVC 


0588 


024C 


CMREADIN 


3200 


0C80 


CMRISAVM 


0388 


0184 


CMRONE 


2332 


091C 


CMRECAD 


0340 


0154 


CMRIVM 


2592 


0A20 


CMRONE1 


2334 


091E (EQU) 


CMREIAA 


0000 


0000 


CMRIVMCN 


0376 


017 8 


CMROPER 


2952 


0B88 


CMREIAA2 


2948 


0B84 


CMRIVMCS 


0416 


01A0 


CMROPOD 


0300 


012C 


CMRELTDY 


3164 


0C5C 


CMRIXPG 


0010 


000A 


CMROPRT 


3148 


0C4C 


CMRENAB 


3260 


0CBC 


CMRJSHBA 


3224 


0C98 


CMRORGIN 


2996 


0BB4 


CMRENDMK 


2308 


0904 


CMRJSHB2 


3220 


0C94 


CMROTHC 


0064 


0040 


CMRENDTB 


3076 


0C04 


CMRLDPMD 


3104 


0C20 


CMROTHER 


3128 


0C38 


CMREQAD1 


2528 


09E0 


CMRLDRSS 


0280 


0,118 


CMROUP 


0252 


OOFC 


CMREQAD2 


2532 


09E4 


CMRLDTBL 


0276 


0114 


CMROUTAD 


0640 


0280 


CMRERLD 


2872 


0B38 


CMRLDTLN 


0292 


0124 


CMROUTSZ 


2900 


0B54 


CMRERND 


2876 


0B3C 


CMRLIDMP 


2344 


0928 


CMROVFG 


2499 


09C3 


CMREROUT 


3208 


0C88 


CMRLIDMS 


2340 


0924 


CMRPAG 


0908 


038C 


CMRESRVP 


3052 


0BEC 


CMRLLAD 


0304 


0130 


CMRPAGA 


0948 


03B4 


CMRESTR 


0008 


0008 


CMRLLAST 


0708 


02C4 


CMRPAGAD 


0188 


OOBC 


CMRETAD1 


2536 


09E8 


CMRLLEND 


0712 


02C8 


CMRPAGB 


0952 


03B8 


CMRETAD2 


2540 


09EC 


CMRLLLNK 


3092 


0C14 


CMRPAGC 


0956 


03BC 


CMREXDIS 


1836 


072C 


CMRLLSCN 


3096 


0C18 


CMRPAGD 


0960 


03C0 


CMREXTAB 


0268 


010C 


CMRLOADL 


3192 


0C78 


CMRPAGE 


0964 


03C4 


CMREXTNM 


2415 


096F 


CMRLOCX 


2984 


0BA8 


CMRPAGEV 


2840 


0B18 


CMREXTNO 


2494 


09BE 


CMRLOCXV 


2444 


098C 


CMRPAGF 


0968 


03C8 


CMREXTNT 


2988 


0BAC 


CMRLOWAD 


0624 


0270 


CMRPAG0 


0908 


038C 


CMRFORM 


3016 


0BC8 


CMRLSPT 


2816 


0B00 


CMRPAG1 


0912 


0390 


CMRFOUR 


2364 


093C 


CMRLSTAD 


3264 


occo 


CMRPAG2 


0916 


0394 


CMRFSTAC 


2920 


0B68 


CMRLXPST 


2360 


0938 


CMRPAG 3 


0920 


0398 


CMRFSTSU 


2640 


0A50 


CMRLXPT 


2358 


0936 


CMRPAG4 


0924 


039C 


CMRFXBS 


2848 


0B20 


CMRMAP 


2424 


0978 


CMRPAG 5 


0928 


03A0 


CMRFXBTL 


2844 


0B1C 


CMRMAPAD 


0296 


0128 


CMRPAG6 


0932 


3A4 


CMRGRPS1 


2520 


09D8 


CMRMAPGN 


3032 


0BD8 


CMRPAG7 


0936 


03A8 


CMRGRPS2 


2524 


09DC 


CMRMAPNM 


2407 


0967 


CMRPAG8 


0940 


03 AC 


CMRGRP1 


2512 


09D0 


CMRMAXTD 


2560 


0A00 


CMRPAG 9 


0944 


03B0 


CMRGRP2 


2516 


09D4 


CMRMCH 


0128 


0080 


CMRPAPTR 


0616 


0268 


CMRGTDR 


1076 


0434 


CMRMEMAD 


0240 


00F0 


CMRPART 


0072 


0048 


CMRGTFL 


1077 


0435 


CMRMFFF 


2800 


OAFO 


(EQU) CMRPARTM 


2496 


09C0 


CMRGTFLD 


3056 


0BF0 


CMRMINUS 


2428 


097C 


CMRPAT 


0216 


00D8 


CMRGTNC 


1078 


0436 


CMRMMSK 


2348 


092C 


CMRPATCH 


2216 


08A8 
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FIELD 


DEC 


HEX 


FIELD 


DEC 


HEX 


FIELD 


DEC 


HEX 


CMRPATI 


0100 


0064 


CMRSCMLC 


0456 


01C8 


CMRSG7LN 


0744 


02E8 


CMRPBSEG 


1010 


03F2 


CMRSCMPG 


0460 


01CC 


CMRSG8AD 


0812 


032C 


CMRPCU 


1608 


0648 


CMRSCMVM 


0396 


018C 


CMRSG8LN 


0748 


02EC 


CMRPDCNT 


1820 


071C 


CMRSDAC 


2920 


0B68 


CMRSG9AD 


0816 


0330 


CMRPFX 


0112 


0070 


CMRSDALC 


0416 


01A0 


CMRSG9LN 


0752 


02F0 


CMRPGIND 


2779 


0ADB 


CMRSDAPG 


0420 


01A4 


CMRSHPT 


3008 


OBCO 


CMRPGLTH 


2354 


0932 


CMRSDAT 


3108 


0C24 


CMRSIMP 


0068 


0044 (EQU) 


CMRPGSVE 


2264 


08D8 


CMRSDAVM 


0376 


0178 


CMRSIPE 


0604 


025C 


CMRPGTAD 


2852 


0B24 


CMRSDISP 


0560 


0230 


CMRSLOAD 


3172 


0C64 


CMRPGTDY 


3216 


0C90 


CMRSDSVM 


0368 


0170 


CMRSLSW 


2915 


0B63 


CMRPGUSL 


0140 


008C 


CMRSDTB 


1408 


0580 (EQU) 


CMRSLTE 


2660 


0A64 


CMRPGWRT 


2423 


0977 


CMRSEEK 


3204 


0C84 


CMRSMFSA 


3120 


0C30 


CMRPGXTS 


3240 


0CA8 


CMRSEGMK 


2328 


0918 


CMRSOAI 


2256 


08D0 


CMRPMDOR 


0196 


O0C4 


CMRSEGSW 


2902 


0B56 


CMRSOAN 


2260 


08D4 


CMRPPCCW 


2964 


0B94 


CMRSENM 


0061 


003D 


CMRSOAPG 


3068 


OBFC 


CMRPPDSY 


0152 


0098 


CMRSEPCS 


2892 


0B4C 


CMRSORD 


3124 


0C34 


CMRPREL 


0008 


0008 


CMRSERAD 


0344 


0158 


CMRSPATH 


0532 


0214 


CMRPRINT 


2956 


0B8C 


CMRSERR 


0172 


OOAC 


CMRSPATP 


0536 


0218 


CMRPRTAD 


0088 


0058 


CMRSERR1 


3184 


OC70 


CMRSPATR 


0540 


021C 


CMRPSABF 


0260 


0104 


CMRSERSW 


2909 


0B5D 


CMRSPDSY 


0148 


0094 


CMRPSAS 


0112 


0070 


(EQU) CMRSETO 


0060 


003C 


CMRSPGAD 


0192 


OOCO 


CMRPTMP 


2928 


0B70 


CMRSETPT 


3020 


OBCC 


CMRSPLOC 


0104 


0068 


CMRPVSEG 


0978 


03D2 


CMRSGAAD 


0820 


0334 


CMRSPSA 


0584 


0248 


CMRPVTLC 


0432 


01B0 


CMRSGAD 


0780 


030C 


CMRSPSV 


2644 


0A54 


CMRPVTPG 


0436 


01B4 


CMRSGALN 


0756 


02F4 


CMRSPTAD 


0244 


00F4 


CMRPVTVM 


0384 


0180 


CMRSGBAD 


0824 


0338 


CMRSPTNO 


2814 


OAFE 


CMRP1002 


0652 


028C 


CMRSGBLN 


0760 


02F8 


CMRSQGQE 


0552 


0228 


CMRQKCPU 


2654 


0A5E 


CMRSGCAD 


0828 


033C 


CMRSQSCN 


0564 


0234 


CMRQKDS 


0276 


0114 


CMRSGCLN 


0764 


02FC 


CMRSRCH 


3176 


0C68 


CMRQKFG 


2668 


0A6C 


CMRSGDAD 


0832 


0340 


CMRSRCHV 


2440 


0988 


CMRQKID 


2669 


0A6D 


CMRSGDLN 


0768 


0300 


CMRSRCN 


3100 


0C1C 


CMRQKMAP 


2676 


0A74 


CMRSGEAD 


0836 


0344 


CMRSRCNT 


2666 


0A6A 


CMRQKPAT 


2652 


0A5C 


CMRSGELN 


0772 


0304 


CMRSRQKF 


2662 


0A66 


CMRQKPVT 


2656 


0A6O 


CMRSGFAD 


0840 


0348 


CMRSRQKL 


2664 


0A68 


CMRQKRD 


3252 


0CB4 


CMRSGFLN 


0776 


0308 


CMRSRSV 


0576 


0240 


CMRQKREC 


0280 


0118 


CMRSGLN 


0716 


02CC 


CMRSSADD 


0352 


0160 


CMRQKSTA 


3256 


0CB8 


CMRSGMT 


0844 


034C 


CMRSSCA 


0568 


0238 


CMRQKTYP 


2648 


0A58 


CMRSGMTA 


0884 


0374 


CMRSSCN 


0528 


0210 


CMRQKVOL 


2650 


0A5A 


.CMRSGMTB 


0888 


0378 


CMRSSCOM 


0320 


0140 


CMRQRDR 


3084 


ococ 


CMRSGMTC 


0892 


037C 


CMRSSCR 


0572 


023C 


CMRQUAL 


1860 


0744 


CMRSGMTD 


0896 


0380 


CMRSSCSL 


0496 


01F0 


CMRQUALR 


1872 


0750 


CMRSGMTE 


0900 


0384 


CMRSSCSN 


0600 


0258 


CMRQUALS 


1868 


074C 


CMRSGMTF 


0904 


0388 


CMRSSDAL 


0496 


01F0 


CMRQUALl 


1864 


0748 


CMRSGWT0 


0844 


034C 


CMRSSDAP 


0500 


01F4 


CMRRCLL 


2761 


0AC9 


CMRSGMT 1 


0848 


0350 


CMRSSDAT 


0600 


0258 


CMRRDNSV 


2472 


09A8 


CMRSGMT2 


0852 


0354 


CMRSSFL 


1088 


0440 


CMRRDPDV 


2436 


0984 


CMRSGMT3 


0856 


0358 


CMRSSOR 


0852 


0354 (EQU) 


CMRRDPOD 


3028 


0BD4 


CMRSGMT4 


0860 


035C 


CMRSSPGS 


0336 


0150 


CMRRDS CB 


3136 


0C40 


CMRSGMT5 


0864 


0360 


CMRSSPT2 


0324 


0144 


CMRRDWR 


0268 


01 OC 


CMRSGMT6 


0868 


0364 


CMRSSPT3 


0328 


0148 


CMRREAD 


3144 


0C48 


CMRSGMT7 


0872 


0368 


CMRSSRO 


0348 


015C 


CMRRETAD 


1084 


043C 


CMRSGMT8 


0876 


036C 


CMRSSSW 


2904 


0B58 


CMRRPNE 


2658 


0A6 2 


CMRSGMT9 


0880 


0370 


CMRSSTA 


0580 


0244 


CMRRSDAT 


0596 


0254 


CMRSGOAD 


0780 


030C 


CMRSSTE 


0556 


022C 


CMRRSLL 


2770 


0AD2 


CMRSGOLN 


0716 


02CC 


CMRSSVE 


2818 


0B02 


CMRRSPI 


3012 


0BC4 


CMRSG1AD 


0784 


0310 


CMRSSXP4 


0332 


014C 


CMRRSS 


2622 


0A3E 


CMRSG1LN 


0720 


02D0 


CMRSSYS 


0520 


0208 


CMRRSSLN 


0294 


0126 


CMRSG2AD 


0788 


0314 


CMRSTART 


0644 


0284 


CMRRTRAN 


3236 


0CA4 


CMRSG2LN 


0724 


02D4 


CMRSTERM 


3188 


0C74 


CMRSARLC 


0488 


01E8 


CMRSG3AD 


0792 


0318 


CMRSTLEN 


2476 


09 AC 


CMRSARPG 


0492 


01EC 


CMRSG3LN 


0728 


02D8 


CMRSTRAN 


3232 


OCAO 


CMRSARSV 


2480 


09B0 


CMRSG4AD 


0796 


031C 


CMRSTSKI 


0548 


0224 


CMRSARVM 


0412 


019C 


CMRSG4LN 


0732 


02DC 


CMRSULN 


0078 


004E 


CMRSASAT 


0524 


02 0C 


CMRSG5AD 


0800 


0320 


CMRSUP 


2607 


0A2F 


CMRSAVE 


1092 


0444 


CMRSG5LN 


0736 


02E0 


CMRSVCTB 


0592 


0250 


CMRSAVEV 


2452 


0994 


CMRSG6AD 


0804 


0324 


CMRSXPT 


0648 


0288 


CMRSCBT 


0504 


01F8 


CMRSG6LN 


0740 


02E4 


CMRSYMAD 


0316 


013C 


CMRSCED 


2568 


0A08 


CMRSG7AD 


0808 


0328 


CMRSYMPG 


0338 


0152 
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FIELD 


DEC 


HEX 


FIELD 


DEC 


HEX 


FIELD 


DEC 


HEX 




CMRSYMVM 


0360 


0168 


CMRTMBFP 


0220 


00 DC 


CMRVOLAD 


0086 


0056 


(EQU) 


CMRS0PG1 


0844 


034C (EQU> 


CMRTMBSL 


0224 


00E0 


CMRVOLIP 


0084 


0054 




CMRTAD 


0308 


0134 


CMRTMBUF 


0226 


00 E2 


CMRVOLTC 


0084 


0054 


CEQU) 


CMRTAD2 


0312 


0138 


CMRTMTCT 


0218 


OODA 


CMRVSSLC 


0424 


01A8 




CMRTCML 


0480 


01EO 


CMRTMTER 


0228 


00 E4 


CMRVSSPG 


0428 


01AC 




CMRTCMP 


0484 


01E4 


CMRTMTTP 


0222 


OODE 


CMRVSSVM 


0380 


017C 




CMRTCTVM 


0232 


00E8 


CMRTRANV 


2432 


0980 


CMRWORK 


0264 


0108 




CMRTDE 


2940 


0B7C 


CMRTRMNT 


2280 


08E8 


CMRWRDCT 


0215 


00D7 




CMRTDTCT 


3140 


0C44 


CMRTRTB 


2288 


08F0 


CMRWRSYM 


3040 


OBEO 




CMRTDTLC 


0448 


01C0 


CMRTWO 


2362 


093A 


CMRWRTDY 


3000 


0BB8 




CMRTDTPG 


0452 


01C4 


CMRUSECT 


2802 


0AF2 


(EQU) CMRWRXTS 


3064 


0BF8 




CMRTDTVM 


0392 


0188 


CMRUSER 


0656 


0290 


CMRWT 


2956 


0B8C 


(EQU) 


CMRTDYAD 


0284 


one 


CMRUTI 


2910 


0B5E 


CMRWTMD 


3060 


0BF4 




CMRTDYLN 


0288 


0120 


CMRVAM2 


2425 


0979 


CMRXTSI 


0248 


00F8 




CMRTDYNM 


2399 


095F 


CMRVIRT 


2860 


0B2C 


CMRXTSRT 


3004 


OBBC 




CMRTDYOV 


0290 


0122 


CMRVMAOR 


0372 


0174 


CMRYMCUR 


2272 


08E0 




CMRTDYTB 


1880 


0758 


CMRVMDLL 


0464 


01D0 


CMRZEROS 


2320 


0910 




CMRTDYVM 


0364 


016C 


CMRVMDLP 


0468 


01D4 


CMR256 


2336 


0920 




CMRTEMP 


2498 


09C2 


CMRVMDYL 


0400 


0190 


CMR32MSK 


0129 


0081 




CMRTERM 


0080 


0050 


CMRVMLL 


2752 


OACO 


CMTRTPG 


2932 


0B74 




CMRTERSY 


0132 


0084 


CMRVMPT 


2888 


0B48 










CMRTEXTN 


2864 


0B30 


CMRVMTCM 


0408 


0198 











Assembler listing of CHACMR 



LOCATION INSTRUCTION SOURCE INST OPER 
IB 00000 CHACMR DSECT 



COMMENT 



IB 00000 



IB 00008 
IB 00008 

IB 00008 

IB 00008 
IB 00009 
IB 0000A 
IB 0000C 
IB 00010 
IB 00018 
IB 0001C 
IB 00020 
IB 00024 
IB 00028 
IB 0002C 
IB 00030 
IB 00034 
IB 0003C 
IB 0003D 
IB 0003E 
IB 00040 



IB 00043 
IB 00044 
(Listing of 



IB 00008 



* THIS DSECT IS A COPY OF THE COMMUNICATION REGION 

* OF 

* STARTUP PROPER 

* THIS DSECT WAS CREATED FOR NSRB #316 

* QUICKSTART 

CMREIAA DS F BR INSTRUC USED BY STARTUP 

* COMMUNICATION AREA - REFERENCED BY MAIN SECTION 

* OF STARTUP PROPER 

* AND QUICK START DATA SET 

* CREATOR 

DS 0D ALIGIN TO A DOUBLE WORD 

* BOUNDARY 
CMRPREL DS CLIO 8 PRELUDE DATA 

* THE FOLLOWING IS DATA LEFT IN A DROP AREA BY 

* PRELUDE 

* STARTUP MOVES INFORMATION INTO HERE BEFORE 

* ACCESSING 



CMRESTR 



CMRIXPG 

CMRDAM 
CMRCRG8 
CMRCRG9 
CMRCRG10 
CMRCRG11 
CMRCRG12 
CMRCRG13 
CMRCRG14 
CMRIDS 
CMRSETO 
CMRSENM 
CMRCPUS 
CMROTHC 
# 

CMRIPLC 

CMRCCUS 

CHACMR continued 




RESTART INDICATOR 

BLANK FOR IPL 

UNUSED 

XPGNO OF IPL DSCB 

UNUSED 



PAGE 



CONTROL REGISTER 8 

CONTROL REGISTER 9 

CONTROL REGISTER 10 

CONTROL REGISTER 11 

CONTROL REGISTER 12 

CONTROL REGISTER 13 

CONTROL REGISTER 14 

ID'S OF BYTE MAP 

NUM OF SE'S AT INSTALLATION 

NUM OF SE'S IN TSS 

NUM OF CPU'S IN TSS 

ID'S OF NON-IPL'D CPUS IN 

TSS 

ID OF IPLED CPU 

BYTE MAP OF CCU'S IN TSS 



86 CHACMR 



(Listing of CHACMR continued from page 86) 



LOCATION INSTRUCTION 
IB 00048 

IB 0004C 

IB 0004E 
IB 00050 
IB 00054 

IB 00054 

IB 00056 

IB 00044 



IB 00058 

IB 0005A 
IB 00060 

IB 00064 
IB 00068 

IB 0006C 

IB 00070 



IB 00070 



SOURCE 
CMRPART 

CMRCCBLN 

CMRSULN 

CMRTERM 

CMRVOLIP 

CMRVOLTC 

CMRVOLAD 

CMRPRTAD 

CMRSIMP 

CMRIPLID 

CMRDSCBI 

* 

CMRPATI 

CMRSPLOC 

* 

CMRCCBLC 

CMRPFX 

* 



INST OPER COMMENT 

DS F BYTE MAP OF PARTITIONED 

ecu's 

DS H LEN OF CCB 

DS H LEN OF STARTUP PROPER 

DS H ID OF OPERATORS TERMINAL 

DS F DEVICE TYPE/ADDR IPL VOL 

EQU CMRVOLIP FIRST BYTE = DEVICE CODE 
00=2301, 01=2311, 04=2314 
CMRVOLIP* 2 2ND HLFWD = PHYSICAL ADDR 



EQU 

DS 

EQU 

DS 

DS 



DS 
DS 

DS 

DS 



H 

CMRCCUS 

XL6 



F 
F 



F 



* 
* 
* 
* 
* 
* 
* 
* 
* 



ADDR OF PRINTER 

SIMPLEX = 55 r ELSE DUPLEX 

VOL SERIAL NUM OF IPL PACK 

ADDR OF PRESENT IPL 

DSCB PAGE 

ADDR OF IPL PAT PAGES 

STARTING ADDR OF STARTUP 

PROPER 

LOCATION OF CCB FROM 

PRELUDE 

ACTIVE PSA OF IPL'D CPU 

THE FOLLOWING IS A ALIST OF ACTIVE PSA'S IN TSS 

THE FIRST ENTRY IS THE PSA OF THE IPL'D CPU 

THE NEXT 3 ENTRIES CONTAIN THE PSA'S OF THE 

OTHER CPU'S IN TSS 

THE ENTRIES ARE ARRANGED IN ASCENDING ORDER 

ACCORDING TO THE CPU IDS 

A ZERO ENTRY INDICATES THE CORRESPONDING CPU IS 

PARTITIONED OR IN 

A SPECIAL CASE THE SE'S CONTAINING A CPU'S 

PREFIXES ARE PARTITIONED 



CMRPSAS 



IB 00074 



EQU 
DS 



CMRPFX 

3F 



END OF DATA FROM PRELUDE 



****** 



IB 00080 
IB 00081 
IB 00084 
IB 00088 
IB 0008C 
IB 00090 

IB 00094 

IB 00098 
IB 0009C 

IB 000AC 
(Listing 



******** 

THE FOLLOWING 
FILLED IN BY 



DS 



DS 



DS 



DS 



DS 



DS 



* 

* 
* 
CMRMCH 

CMR32MSK 

CMRTERSY 

CMRIPLSY 

CMRPGUSE 

* 
* 
* 
CMRSPDSY DS F 

CMRPPDSY DS F 

CMRDMLST DS 4F 

* ACTUAL PATH OF 

* SPECIAL ROUT 
CMRSERR DS 4F 
********* 



******** 
IS DATA THAT IS 



* * ** 

EITHER CONSTANT OR 



STARTUP PROPER 
SWITCH FOR 24 OR 32 BIT 
ADDRESS 

32 BIT SYSTEM MASK = X'08' 
I/O TABLES 
SYM DEV ADDR/DEV 
TYPE CODE OF OP'S TERM 
SYM DEV ADDR AND DEV 
TYPE CODE OF IPL VOLUME 
BEG AND END ADDR OF IVM ON 
PRI PAGING DEV BY EXTN 
PGS - EXTENT IN EXT PG 
NUMBERS OF PRIVATE IVM 
CSECTS 

ON PAGING DISK 
DEVICE TYPE CODE AND 
SYMBOLIC 

DEV IDE ADDR OF AUX PAGING 
DISK 

SYMBOLIC DEV ADDR AND 
DEVICE 

TYPE CODE OF PRIMARY PG DEV 
DRUM LIST AND SDA'S 
OF DRUMS IN TSS 
DRUM IS CHANGED TO SDA OF DRUM IN 



SERR/RECONFIG . 
* * * * * 



EXTENTS 



* ** 

* CMRSERR TABLE MUST FOLLOW CMRDMLST TABLE FOR USE 
of CHACMR continued on page 88 > 



CHACMR 87 



(Listing of CHACMR continued from page 87) 



LOCATION INSTRUCTION SOURCE 



INST OPER 



IB 000BC 
IB 000C0 
IB OO0C4 
IB 000C8 
IB OOOCC 

IB 000D0 



IB O00D4 

IB 000D6 

IB 000D6 
IB 000D7 
IB 000D8 



00000080 



IB 0006C 



IB 000DA 
IB 000DC 
IB 00 ODE 
IB 000E0 
IB O0OE2 
IB O0OE4 
IB 000E8 
IB 000EC 
IB 000F0 



IB 000F4 
IB 000F4 

IB 000F8 

IB 000FC 
IB 000FC 

IB 00100 
IB 00104 
IB 00108 

IB 0010C 
IB 0010C 
IB 00110 
IB 00114 
IB 00114 
IB 00118 
IB 00118 

IB 0011C 
IB 00120 
IB 00122 
IB 00124 
IB 00126 
IB 00128 
IB 0012C 
( Listing 



00000002 



00000004 



* BY SDAT 
* 

CMRPAGAD DS 
CMRSPGAD DS 
CMRPMDOR DS 
CMRDRUMS DS 
CMRASD DS 

4c 

CMRASDDR DS 

CMRDEV DS 

CMRINT DS 

CMRIMC01 DS 
CMRWRDCT DS 
CMRPAT DS 
CMRPATM EQU 
******* 

* 

CMRCCBAD EQU 

CMRTMTCT DS 

CMRTMBFP DS 

4c 

CMRTMTTP DS 

* 

CMRTMBSL DS 

4c 

CMRTMBUF DS 
CMRTMTER DS 

4c 

CMRTCTVM DS 

CMRBFPVM DS 

4c 

CMRMEMAD DS 

4c 
4c 

CMRBUFFS DS 
CMRSPTAD DS 

4c 

CMRXTSI DS 
CMRBFCNT EQU 
CMRBUFFA DS 
DS 



DS 

DS 

DS 

EQU 

DS 



DS 
DS 
DS 
DS 

DS 
DS 
DS 
DS 

DS 



F 
F 
F 
X 

F 



OH 

X 
X 
X 
X f 80' 

► 4c * 



4c ** 



CMRCCBLC 
H 



COMMENT 

PROCESSING ROUTINE 

HARDWARE ADDR OF PPV 

HARDWARE ADDR OF SPV 

PMD ORIGIN 

NUMBER OF DRUMS IN SYSTEM 

PTR TO AUX STORAGE DEVICE 

LIST 

PTR TO AUX STORAGE DEVICE 

LIST 

ENTRY FOR PAGING DRUM 

TOTAL NUM OF AUX DEVS IN 

SYS 

* INPUT FOR INTER-COM * 
N349.10 

* EXTERNAL START — INTER-COM 

* OTHER CPU ID - INTER-COM 
PAT SWITH FOR SDAT ROUTINE 
PAT PAGE MASK 

4c *♦* 

STARTUP BUFFERS 

ADDR OF CCB BUFFER 

NO OF VM SYSTEM TCT PAGES 

N349.10 
NO OF VM SYS BUFF PAGES 

N349.10 
TOT PGS TCT AND BUFF 

N349.10 
NO OF BUFF SLOTS/BUFF PG 

N349.10 
MAXIMUM NO OF BUFFERS 

N349.10 
MAXIMUM NO OF TERMINALS 

N349.10 
VMA OF CFBTCT 

N349.10 
VMA OF CFBBFP 

N349.10 
ADDR OF MEMORY BYTE MAP 
X'400" INITIALLY 
REALLOCATED AT STARTUP TIME 



9 



OF 
F 



Of CHACMR 



CMROUP 

CMRINP 
CMRPSABF 
CMRWORK 
CMRBFCTA 
CMRRDWR 
CMREXTAB DS 
CMRNPAT DS 
CMRQKDS 
CMRLDTBL 
CMRQKREC 
CMRLDRSS 
* 

CMRTDYAD 
CMRTDYLN 
CMRTDYOV 
CMRLDTLN 
CMRRSSLN 
CMRMAPAD DS 
CMROPOD DS 
continued on page 



ADDR OF SHARED PAGE TBL 

BUFF 
F ADDR 

(*-CMRBUFFS)/4 
OF 
F ADDR OF OUTPUT 

FOR MVTEXT 
F ADDR OF INPUT BUFFER 

F ADDR OF PSA BUFFER 

F ADDR OF WORK BUFFER 

(♦^CMRBUFFA) /4 NUM OF BUFFS 



OF XTSI BUFFER 
NUM OF BUFFS 



BUFFER 



OF 

F 

F 

OF 

F 

OF 

F 

F 
H 
H 
H 
H 
F 
F 



QK START READ/WRITE BUFFER 
ADDR OF EXTENT TABLE 
NON-IPL PAT BUFFER 
QUCK START DSCB BUFFER 
ADDR OF LOAD LIST BUFF 
QUICK START RECORDING BUFF 
ORIGIN OF RSSSUP LOADIST 
TDY INFORMATION 
ADDRESS OF TDY 
NUM OF TDY BUFFER PAGES 
NUM OF TDY OVERFLOW PGS 
NUM OF IOAD LIST BUFF PGS 
NUM OF RSSSUP LL BUFF PGS 
ADDR OF IVM MEM MAP TABLE 
ADDR OF OLD POD BUFFER 



89> 



88 CHACMR 



(Listing of CHACMR continued from page 88 > 



LOCATION 
IB 00130 
IB 00134 

IB 00138 

IB 0013C 



IB 00140 
IB 00144 
IB 00148 
IB 0014C 
IB 00150 
IB 00152 
IB 00154 
IB 00158 
IB 0015C 

IB 00160 
IB 00164 



IB 00168 
IB 0016C 
IB 00170 

IB 00174 

IB 00178 
IB 00178 
IB 0017C 
IB 00180 
IB 00184 
IB 00188 

IB 0018C 
IB 00190 

IB 00194 

IB 00198 

IB 0019C 



INSTRUCTION SOURCE 



CMRLLAD DS F 
CMRTAD DS F 

CMRTAD2 

CMRSYMAD 

♦ . 

* RSS COMMUNICATION 



DS 
DS 

DS 

DS 



CMRSSCOM 

CMRSSPT2 

CMRSSPT3 

CMRSSXP4 

CMRSSPGS 

CMRSYMPG 

CMRECAD 

CMRSERAD 

CMRSSRO 

* 

CMRSSADD 

CMRADEND 

* * ♦ ♦ i 

* 

CMRSYMVM 

CMRTDYVM 

CMRSDSVM 

CMRVMAOR 



INST OPER COMMENT 

ADDR OF LOAD LIST ENTRY 

ADDR OF NEXT AVAIL LOC IN 

TDYTAB 

ADDR OF ENTRY REQ 

RELOCATION 

LOWEST ASSIGNABLE SYMB TBL 

ADDR 
TABLE INFORMATION 
F ADDR OF RSS COMMUN TABLE 

F ADDR OF RSS SEG 2 PG TBL 

F ADDR OF RSS SEG 3 PG TBL 

F ADDR OF XPT4 IN RSS COM TBL 

H NUMBER OF RSSSUP PAGES 

H NUM OF SYMBOL TBL PAGES 

XL4 DUMMY ADDR FOR RECON 
XL4 FIGURATION AND SERR CSECTS 
F START ADDR OF READ 

ONLY PAGE 
F RSS ACCUMULATIVE LENGTH 

F RESSUP ACCUM LENGTH 



DS 
DS 
DS 
DS 
DS 
DS 
DS 
DS 
DS 

DS 
DS 

DS 
DS 
DS 

DS 



******* 

F 
F 
F 



VIRTUAL MEMORY ADDRESSES 

VMA RES SUP- RSS SYM TBL 

VMA OF TDY (PRIVATE SEG) 

VMA OF SDST (PUBLIC 

SEGMENT) 

VMA PACKING ORIGIN 

(PRIVATE) 



************************************************** 

* VMA'S, XPT OR OSPT ENTRY LOCATIONS, AND NUM OF 

* PAGES IN CSECT 



0000000A 



CMRIVMCN DS OF 

CMRSDAVM DS F 

CMRVSSVM DS F 

CMRPVTVM DS F 

CMRISAVM DS F 

CMRTDTVM DS A 
* 

CMRSCMVM DS F 

CMRVMDYL DS F 

* 

CMRDLEP DS F 

CMRVMTCM DS F 

CMRSARVM DS A 
CMRIVMCO EQU 



BEGINNING OF LIST 
VMA OF SDAT 
VMA OF SSDAT 
VMA OF PVT 
VMA OF ISA 
VMA OF TDT 

N349.10 
VMA OF SYSTEM COMMON 
VMA OF DYNAMIC LDR 



LIST 



IB 001A0 CMRIVMCS DS 

IB 001A0 CMRSDALC DS 

IB 001A4 CMRSDAPG DS 

IB 001A8 CMRVSSLC DS 

IB 001 AC CMRVSSPG DS 

IB 001B0 CMRPVTLC DS 

* 

IB 001B4 CMRPVTPG DS 

IB 00 IB 8 CMRISALC DS 

* 

(Listing of CHACMR continued on page 



N483 
F VMA OF DY LDR EP 

N483 
F VMA OF TASK COMMON 

N483 
A VMA OF SAR 

N386** 
(*- CMRIVMCN) /4 NUM OF CSECTS IN 
THE FOLLOWONG LIST CONSISTS OF 2 FULL WORD 

* ENTRIES PER CSECT 

* THE FIRST CONTAINS THE LOCATION OF THE XPT(XSPT) 

* FOR THE CSECT 

* THE SECOND CONTAINS THE NUMBER OF PAGES IN THE 

* CSECT 

* THERE IS ONE ENTRY FOR EACH CSECT NAMED IN THE 

* ABOVE LIST 

* THE RELEATIVE POSITIONS WITHIN THE LIST ARE THE 

* SAME 

BEGINNING OF LIST 
LOC OF XSPT ENTRY FOR SDAT 
NO- OF EXTERNAL SDAT PAGES 
LOC OF XSPT ENTRY FOR SSDAT 
NUM OF EXTERNAL SSDAT PGS 
LOCATION OF XPT ENTRY FOR 
PVT 

NUM OF EXTERNAL PVT PAGES 
LOCATION OF XPT ENTRY FOR 
ISA 



OF 

F 

F 

F 

F 

F 

F 

F 



90) 



CHACMR 89 



(Listing of CHACMR continued from page 89) 



LOCATION INSTRUCTION 


SOURCE 


INST 


OPER 


COMMENT 


IB 001BC 


CMRISAPG 


DS 


F 


NUM OF EXTERNAL ISA PAGES 


IB 001C0 


CMRTDTLC 


DS 


A 


LOC OF XPT FOR TDT 
N423** 


IB 001C4 


CMRTDTPG 


DS 


F 


NUM OF TDT PAGES 
N423** 


IB 001C8 


CMRSCMLC 

* 


DS 


F 


LOC OF XPT ENTRY FOR SYS 
COM 


IB 00 ICC 


CMRSCMPG 

* 


DS 


F 


NUM OF EXTERNAL SYS COMM 
PGS 


IB 001D0 


CMRVMDLL 

* 


DS 


F 


LOC OF XPT FOR DYNAM LDR 
N483 


IB 001D4 


CMRVMDLP 

* 


DS 


F 


NUM OF DY LDR PGS 
N483 


IB 001D8 


* 


DS 


2F 


DUMMY ENTRY FOR DY LDR 
EPN48 3 


IB 001E0 


CMRTCML 

* 


DS 


F 


LOC OF TASK COMMON 
N483 


IB 001E4 


CMRTCMP 


DS 


F 


NUM OF TCM PAGES 


IB 001E8 


CMRSARLC 

* 


DS 


A 


LOC OF XPT FOR SAR 
N386** 


IB 001EC 


CMRSARPG 


DS 


F 


NUM OF SAR PAGES 
N386** 


IB 001F0 


CMRSSCSL 


DS 


OF 


RSS LIST 


IB 001F0 


CMRSSDAL 


DS 


F 


LOCATION OF SSDAT ENTRY IN 
XPT2 


IB 001F4 


CMRSSDAP 

* 


DS 


F 


NUM OF EXT SSDAT PAGES IN 
RSS 




* REAL CORE t 


ADDRESSES 


- - FILLED IN BY NAMLOC 




* ROUTINE 








* 






DURING RESSUP PROCESSING 


IB 001F8 


CMRSCBT 


DS 


F 


CORE BLOCK TABLE 


IB 001FC 


CMRNMDEV 


DS 


A 


RC ADDR OF CHBDEV 
N349.10 


IB 00200 


CMRINMTS 


DS 


A 


RC ADDR OF CHBMTS 
N349.10 


IB 00204 


CMRNMTDE 

* 


DS 


A 


RC ADDR OF CHBTDE 
N349.10 


IB 00208 


CMRSSYS 


DS 


F 


SYSTEM TABLE 


IB 0020C 


CMRSASAT 


DS 


F 


AUX STOR ALLOC TABLE 


IB 00210 


CMRSSCN 


DS 


F 


SCAN TABLE MASTER CONTROL 


IB 00214 


CMRSPATH 


DS 


F 


SET PATH 


IB 00218 


CMRSPATP 


DS 


F 


PATHFINDING 


IB 0021C 


CMRSPATR 


DS 


F 


REVERSE PATHFINDING 


IB 00220 


CMRINTCM 


DS 


F 


INTER-COM 


IB 00224 


CMRSTSKI 


DS 


F 


TASK INITIATION 


IB 00228 


CMRSQGQE 


DS 


F 


QUEUE GQE ON TSI 


IB 0022C 


CMRSSTE 


DS 


F 


SCHEDULE TABLE 


IB 00230 


CMRSDISP 


DS 


F 


DISPATCHER 


IB 00234 


CMRSQSCN 


DS 


F 


QUEUE SCANNER 


IB 00238 


CMRSSCA 

* 


DS 


F 


PTR TO SUPERVISOR CORE 
ALLOC 


IB 0023C 


CMRSSCR 


DS 


F 


SUPERVISOR CORE RELEASE 


IB 00240 


CMRSRSV 

* 


DS 


F 


RESERVE PAGE LIST IN SUP 
CORE 


IB 00244 


CMRSSTA 


DS 


F 


SYMBOLIC TO ACTUAL TABLE 


IB 00248 


CMRSPSA 


DS 


F 


PSA 


IB 0024C 


CMRNSVC 


DS 


F 


INVALID SVE PROCESSOR 


IB 00250 


CMRSVCTB 


DS 


F 


POINTER TO SVC TABLE 


IB 00254 


CMRRSDAT 


DS 


F 


SSDAT HEADER (IN RESSUP) 


IB 00258 


CMRSSCSN 


DS 


OF 


BEGINNING OF TABLE 


IB 00258 


CMRSSDAT 


DS 


F 


SSDAT BODY ( IN RESSUP) 


IB 0025C 


CMRSIPE 


DS 


F 


SIPE 


IB 00260 


CMRAEBRS 


DS 


F 


RSS TABLE FOR R/O 


OOOOOOOC 


CMRSSCNT 


EQU 


(♦-CMRSSCSN) COUNT OF RESSUP CSECTS 


IB 00264 


CMRASY 


DS 


F 


PTR TO ASYNCH LIST ENTRY 



* 
(Listing of CHACMR continued on page 91) 



FOR 



9 CHACMR 



(Listing of CHACMR continued from page 90) 



LOCATION 


INSTRUCTION 


SOURCE 

* 


INST 


OPER 


IB 00268 




* 
CMRPAPTR 

CMRLOWAD 


DS 


F 


IB 00270 




DS 


F 


IB 00274 




CMRCATCT 

* 


DS 


A 


IB 00278 




CMRCABFP 

* 
CMRINAD 


DS 


A 


IB 0027C 




DS 


F 


IB 00280 




CMROUTAD 


DS 


F 


IB 00284 




CMRSTART 


DS 


F 


IB 00288 




CMRSXPT 


DS 


F 


IB 0028C 




CMRP1002 


DS 


F 






* CONSTANTS 


IN COMM 






* 




N483 






* FLAGS NEEDED FOR 






* 




N483 


IB 00290 




CMRUSER 


DS 


X 




00000080 


CMRUSER0 

* 


EQU 


X f 80 f 




00000040 


CMRUSERD 

* 


EQU 


X f 40 f 


IB 00294 




CMRHSHDL 

♦ 


DS 


11F 


IB 002C0 




CMRCXDCN 

* 


DS 


F 


IB 002C4 




* 
CMRLLAST 

* 
CMRLLEND 

* 


DS 


F 


IB 002C8 




DS 


F 



COMMENT 

OPERATORS TERMINAL IN DEV 

GRP TBL 

NEXT AVAILABLE READ CORE 

ADDR 

LOWEST RESSUP LOCATION 

RC ADDRESS OF CHBTCT 

N349.10 
RC ADDRESS OF CHBBFP 

N349.10 
LOCATION OF OUTPUT BUFFER 
LOCATION OF OUTPUT BUFFER 
CURRENT VMA 

LOC OF LST XPT/XSPT ENTRY 
SAVE AREA FOR P100X 



USER FLAG 

USER MODULES EXIST FLAG 

N483 

PROC USER MOD FLAG 

N483 

DYN LDR QREF CHAIN 

N483 

CURRENT CXD VALUE 

N483 

N483 

LOC OF END OF LL ENTRIES 

N483 

ADDR OF END OF LL PAGE 

N483 



*********************************************************** 

* THE FOLLOWING TABLES ARE INDEXED INTO DURING 

* STARTUP 

* TO CONTROL INFORMATION FOR THE BUILDING OF THE 

* XTSI 



IB 002CC 
IB 002CC 

IB 002D0 

IB 002D4 

IB 002D8 

IB 002DC 

IB 002E0 

IB 002E4 

IB 002E8 

IB 002EC 

IB 002FO 

IB 002F4 

IB 002F8 

IB 002FC 

IB 00300 

(Listing of CHACMR continued on page 92) 



* 






AND PAGE TABLE PAGES 


* 






TABLE OF SEGMENT I 


jENGTHi 


CMRSGLN 


DS 


OF 










CMRSG0LN 


DS 


F 


LENGTH 


OF 


SEGMENT 


IN 


* 






PAGES 








CMRSG1LN 


DS 


F 


LENGTH 


OF 


SEGMENT 


1 IN 


* 






PAGES 








CMRSG2LN 


DS 


F 


LENGTH 


OF 


SEGMENT 


2 IN 


* 






PAGES 








CMRSG3LN 


DS 


F 


LENGTH 


OF 


SEGMENT 


3 IN 


* 






PAGES 








CMRSG4LN 


DS 


F 


LENGTH 


OF 


SEGMENT 


4 IN 


* 






PAGES 








CMRSG5LN 


DS 


F 


LENGTH 


OF 


SEGMENT 


5 IN 


* 






PAGES 








CMRSG6LN 


DS 


F 


LENGTH 


OF 


SEGMENT 


6 IN 


* 






PAGES 








CMRSG7LN 


DS 


F 


LENGTH 


OF 


SEGMENT 


7 IN 


* 






PAGES 








CMRSG8LN 


DS 


F 


LENGTH 


OF 


SEGMENT 


8 IN 


* 






PAGES 








CMRSG9LN 


DS 


F 


LENGTH 


OF 


SEGMENT 


9 IN 


* 






PAGES 








CMRSGALN 


DS 


F 


LENGTH 


OF 


SEGMENT 


10 IN 


♦ 






PAGES 








CMRSGBLN 


DS 


F 


LENGTH 


OF 


SEGMENT 


11 IN 


* 






PAGES 








CMRSGCLN 


DS 


F 


LENGTH 


OF 


SEGMENT 


12 IN 


* 






PAGES 








CMRSGDLN 


DS 


F 


LENGTH 


OF 


SEGMENT 


13 IN 



CHACMR 91 



(Listing of CHACMR continued from page 91) 
LOCATION INSTRUCTION SOURCE INST OPER 
IB 00304 
IB 00308 



IB 0030C 
IB 0030C 
IB 00310 
IB 00314 
IB 00318 
IB 0031C 
IB 00320 
IB 00324 
IB 00328 
IB 0032C 
IB 00330 
IB 00334 
IB 00338 
IB 0033C 
IB 00340 
IB 00344 
IB 00348 



IB 0034C 
IB 0034C 
IB 00350 
IB 00354 
IB 00358 
IB 0035C 
IB 00360 
IB 00364 
IB 00368 
IB 0036C 
IB 00370 
IB 00374 
IB 00378 
IB 0037C 
IB 00380 
IB 00384 
IB 00388 



IB 0038C 
IB 0038C 
IB 00390 
IB 00394 
IB 00 398 
IB 0039C 
IB 003AO 
IB 003A4 
IB 003A8 
IB 003AC 
IB 003B0 
IB 003B4 
IB 003B8 
IB 003BC 
IB 003C0 
IB 003C4 
IB 003C8 



IB 003CC 

IB 003D0 

(Listing of CHACMR continued on page 93) 



COMMENT 



* 






PAGES 






CMRSGELN 


DS 


F 


LENGTH OF SEGMENT 14 IN 


* 






PAGES 






CMRSGFLN 


DS 


F 


LENGTH OF SEGMENT 15 IN 


* 






PAGES 






* 






TABLE OF SEGMENT ADDENDS 


CMRSGAD 


DS 


OF 








CMRSG0AD 


DS 


F 


SEGMENT 


ADDEND 


CMRSG1AD 


DS 


F 


SEGMENT 


1 ADDEND 


CHRSG2AD 


DS 


F 


SEGMENT 


2 ADDEND 


CMRSG3AD 


DS 


F 


SEGMENT 


3 ADDEND 


CMRSG4AD 


DS 


F 


SEGMENT 


4 ADDEND 


CMRSG5AD 


DS 


F 


SEGMENT 


5 ADDEND 


CMRSG6AD 


DS 


F 


SEGMENT 


6 ADDEND 


CMRSG7AD 


DS 


F 


SEGMENT 


7 ADDEND 


CMRSG8AD 


DS 


F 


SEGMENT 


8 ADDEND 


CMRSG9AD 


DS 


F 


SEGMENT 


9 ADDEND 


CMRSGAAD 


DS 


F 


SEGMENT 


10 


ADDEND 


CMRSGBAD 


DS 


F 


SEGMENT 


11 


ADDEND 


CMRSGCAD 


DS 


F 


SEGMENT 


12 


ADDEND 


CMRSGDAD 


DS 


F 


SEGMENT 


13 


ADDEND 


CMRSGEAD 


DS 


F 


SEGMENT 


14 


ADDEND 


CMRSGFAD 


DS 


F 


SEGMENT 


15 


ADDEND 


* TABLE 


OF 


BEGINNING 


ADDRESSES OF EACH SEGMENT 


CMRSGMT 


DS 


OF 








CMRSGMT0 


DS 


F 


ADDRESS 


OF 


SEG 0, PG 1 


CMRSGMT1 


DS 


F 


ADDRESS 


OF 


SEG1, PG 


CMRSGMT2 


DS 


F 


ADDRESS 


OF 


SEG 2, PG 


CMRSGMT3 


DS 


F 


ADDRESS 


OF 


SEG 3, PG 


CMRSGMT4 


DS 


F 


ADDRESS 


OF 


SEG 4, PG 


CMRSGMT 5 


DS 


F 


ADDRESS 


OF 


SEG 5, PG 


CMRSGMT6 


DS 


F 


ADDRESS 


OF 


SEG 6, PG 


CMRSGMT7 


DS 


F 


ADDRESS 


OF 


SEG 7, PG 


CMRSGMT8 


DS 


F 


ADDRESS 


OF 


SEG8, PG 


CMRSGMT9 


DS 


F 


ADDRESS 


OF 


SEG 9, PG 


CMRSGMTA 


DS 


F 


ADDRESS 


OF 


SEG 10, PG 


CMRSGMTB 


DS 


F 


ADDRESS 


OF 


SEG 11, PG 


CMRSGMTC 


DS 


F 


ADDRESS 


OF 


SEG 12 f PG 


CMRSGMTD 


DS 


F 


ADDRESS 


OF 


SEG13, PG 


CMRSGMTE 


DS 


F 


ADDRESS 


OF 


SEG 14 r PG 


CMRSGMTF 


DS 


F 


ADDRESS 


OF 


SEG 15, PG 


* TABLE OF PAGE TABLE 


PAGE POINTERS 




CMRPAG 


DS 


OF 








CMRPAG0 


DS 


F 


PAGE TABLE 


- SEGMENT 


CMRPAG1 


DS 


F 


PAGE TABLE 


- SEGMENT 1 


CMRPAG 2 


DS 


F 


PAGE TABLE 


- SEGMENT 2 


CMRPAG3 


DS 


F 


PAGE TABLE 


- SEGMENT 3 


CMRPAG4 


DS 


F 


PAGE TABLE 


- SEGMENT 4 


CMRPAG5 


DS 


F 


PAGE TABLE 


- SEGMENT 5 


CMRPAG6 


DS 


F 


PAGE TABLE 


- SEGMENT 6 


CMRPAG7 


DS 


F 


PAGE TABLE 


- SEGMENT 7 


CMRPAG8 


DS 


F 


PAGE TABLE 


- SEGMENT 8 


CMRPAG9 


DS 


F 


PAGE TABLE 


- SEGEMNT 9 


CMRPAGA 


DS 


F 


PAGE TABLE 


- SEGMENT 10 


CMRPAGB 


DS 


F 


PAGE TABLE 


- SEGMENT 11 


CMRPAGC 


DS 


F 


PAGE TABLE 


- SEGMENT 12 


CMRPAGD 


DS 


F 


PAGE TABLE 


- SEGMENT 13 


CMRPAGE 


DS 


F 


PAGE TABLE 


- SEGMENT 14 


CMRPAGF 


DS 


F 


PAGE TABLE 


- SEGMENT 15 


CMRNASVM 


DS 


F 


VMA OF NEXT AVAILABLE 


♦ 






SEGMENT 






* 






INITIALLY SET TO X 1 200000 


CMRNASNM 


DS 


H 


NEXT AVAILABLE SEGMENT 


* 






NUMBER 







92 CHACMR 



(Listing of CHACMR continued from page 92) 



LOCATION INSTRUCTION 
IB 003D2 

IB 003F2 

0000000F 

IB 0035** 

00000002 
00000008 
00000010 
00000010 
00000010 

IB 00414 



IB 00418 
IB 0041C 
IB 00420 
IB 00424 
IB 00428 
IB 0042C 

IB 00430 



IB 00434 
IB 00435 

IB 00436 

IB 00438 
IB 0043C 

IB 00440 



SOURCE 

CMRPVSEG DS 

CMRPBSEG DS 

CMRSEGMX EQU 

CMRSSOR 

CMRPGTSZ EQU 
CMRASTSZ EQU 
CMRPPHSZ EQU 
CMRPTHSZ EQU 
CMRRSPSZ EQU 
* 

CMRCRG0 
* 

* 

CMRCRG1 

CMRCRG2 

CMRCRG3 

CMRCRG4 

CMRCRG5 

CMRCRG6 

CMRCRG7 



INST OPER 



16XL2 



16XL2 



15 



EQU CMRSGMT2 



DS 



2 

8 

16 

16 

16 



DS 
DS 
DS 
DS 
DS 
DS 

DS 



F 
F 
F 
F 
F 
F 



* PARAMETERS FOR GETMEM 



0000003C 
00000000 



00000000 
000000FF 
00000001 



00000000 



000000FF 



CMRGTDR 

* 

CMRGTFL 

CMRGTFLN 

CMRGTFLY 

CMRGTNC 

CMRGTNCT 

CMRGTNCR 

CMRGTNCF 

* 

CMRGTNUM 

* 

CMRRETAD 
CMRGTNCY 

CMRSSFL 
CMRSSFLM 



DS X 

DS CL1 

EQU X'3C 

EQU X^O* 



DS 
EQU 

EQU 
EQU 

DS 



X 

X'00 f 
X^F* 
X^l 

H 



DS F 
EQU X'OO' 



DS 

EQU 



X 
X'FF* 



00000000 CMRGTDRU EQU X'OO 1 

00000001 CMRGTDRD EQU X'Ol' 



IB 00444 
IB 00480 



CMRSAVE DS 
CMRDSCB DS 



15F 
64F 



COMMENT 

INITIALLY SET TO 2 
TABLE OF PRIVATE SEGMENT 
NUMS 

HLFWDS-INIT SET TO X'FFFF' 
TABLE OF PUBLIC SEGMENT 
NUMS 

HLFWDS-INIT SET TO X'FFFF" 
HIGHEST USABLE SEG NUM 
ALLOWED BY STARTUP 
BASE ADDRESS FOR RSSSUP 
INITIALLY AT SEGMENT 2 
PAGE TABLE ENTRY SIZE 
AUX SEG TBL ENTRY SIZE 
PAGE TABLE PAGE HEADER SIZE 
PTP ENTRY HEADER SIZE 
RSPI ENTRY SIZE 
CONTROL REGISTERS ^THRU 7 
CONTROL REGISTER 
INITIALLY PTR TO SEG TBL 
ORIGIN 
IN XTSI 

CONTROL REGISTER 1 
CONTROL REGISTER 2 
CONTROL REGISTER 3 
CONTROL REGISTER 4 
CONTROL REGISTER 5 
CONTROL REGISTER 6 
INITIALLY = X f 008000FE f 
CONTROL REGISTER 7 
ROUTINE 

INPUT PARAMETERS 

DIRECTION TO ASSIGN NEXT 

PAGE 

CORE BLOCK TABLE FLAG 

SET NO FLAG IN PAGE MAP 

STARTUP OR STARTUP BUFFER 

PAGE 

TEST BYTE FOR NO CORE 

TERMINATE IF NO CORE AVAIL 

RETURN IF NO CORE AVAIL 

RETURN IF FIRST BLOCK 

UNAVAIL 

NUM OF CONTIGUOUS PGS 

REQUIRED 

OUTPUT PARAMETERS 

ADDR OF ALLOCATED BLOCK 

RETURNED 

INDICATES BLOCK HAS BEEN 

ALLOCAT 

ED 

IN CMRGTNC 

RSS SYMBOL TABLE FLAG 

RSS SYMBOL TABLE MASK 

STORAGE AREAS PRE- ASSEMBLED 
ASSIGN UPWARD 
ASSIGN DOWNWARD 

SAVE AREA FOR LINK LOADER 
DSCB READ IN AREA 



* EACH ENTRY IN THE DATA SET TABLE IS COMPRISED 

* OF 1 HLFWD CONTAINING 

* AN EXTAB DISPLACEMENT AND 1 HLFWD CONTAINING 

* THE NUM OF POD PAGES 



IB 00580 CMRDSTBL DS 5 OF 

IB 00648 CMRPCU DS 3 OF 

(Listing of CHACMR continued on page 94) 



DELTA DATA SET TABLE 
PCU TABLE 



CHACMR 93 



(Listing of CHACMR continued from page 93) 



LOCATION INSTRUCTION SOURCE 



INST OPER 



COMMENT 



IB 00580 



IB 006CO 
IB 00710 
IB 00714 
IB 00716 
IB 00718 
IB 0071A 

IB 0071C 
IB 00720 



IB 00724 
IB 00728 

IB 0072C 

IB 0072E 

IB 00730 

IB 00738 

IB 00740 

IB 00744 

IB 00748 
IB 0074C 
IB 00750 
IB 00754 



IB 00728 
IB 0072A 



CMRSDTB EQU 
CMRDSTR DS 
CMRDSNAD DS 
CMRHRCHY DS 
CMRDSCNT DS 
CMRDDSC0 DS 
CMRCSNTR DS 

CMRPDCNT DS 
CMRDSINP DS 

* 
* 

CMRDSLST DS 

* 

CMRDVOL DS 
CMRDVOLT EQU 
CMRDVOLA EQU 
CMREXDIS DS 

* 
* 

CMRDSDIS DS 

* 

CMRNMTCT DS 

CMRNMBFP DS 

* 

CMRCRVOL DS 

* DELTA DATA 

CMRQUAL DS 

CMRQUAL1 DS 
CMRQUALS DS 
CMRQUALR DS 
CMRALLDS DS 



CMRDSTBL 

2 OF 

F 

H 

H 

H 

H 

H 
F 



SDAT DEVICE TABLE 
RSSSUP DATA SET TABLE 
POINTER TO DATA SET NAME 
HEIRCHARY NUM FOR DELTAS 
NUM OF DELTA DATA SETS 
TOTAL NUM OF DELTAS 
NUM OF RSSSUP DELTA DATA 
SETS 

NUM OF PODS 

OPER TERM INPUT AREA * 
DELTA INFO 
POINTER 

ADDR OF LIST OF DATA SET 
NAMES 

DELTA PACK INFO 
1ST BYTE = TYPE CODE 
2ND HLFWD = ADDRESS 
EXTENT LOC RELATIVE TO 
BEGINNING OF EXTAB BUFFER 
CMREXTAB 
CMRDSTBL OFF SET 
DATA SET TABLE - I NIT = 4 
CSECT NAME OF CHBTCT 

N349.10 
CSECT NAME OF CHBBFP 
N349.10 

F VOL INFO FOR CURRENT VOLUME 

SET NAME INFORMATION 

CL4 SECOND ORDER QUALIFIER FOR 
DELTA DATA SET NAMES 

CL4 INIT = C f .IVM' 

CL4 INIT = C'.SUP' 

CL4 INIT = C .RSS f 

CL4 INIT = CALL ' 



F 

F 

CMRDVOL 
CMRDVOL+2 
H 



H 



CL8 



CL8 



* TDY TABLE IS A TABLE OF REAL CORE ADDRESSES 

* OCCUPIED BY THE TDY FOR 

* IVM. IT CONSISTS OF ONE OR MORE 3-WORD GROUPS OR 

* EXTENTS 

* THE FIRST 2 WORDS CONTAIN THE LOWEST AND HIGHEST 

* REAL CORE 

* ADDRESSES WHICH ARE RELOCATED BY A COMMON 

* RELOCATION FACTOR 

* WHICH IS WORD 3 - THE LAST ENTRY IS A DOUBLE 

* WORD OF ONES 

IB 00758 CMRTDYTB DS 64F TDY TABLE 

IB 00858 CMRINPUT DS 80C OP TERM/CARD RDR INPUT AREA 

***************************** ****************** ********** 

* THE FOLLOWING IS STARTUPS PATCH AREA 

* CMRPATDS GIVES THE DISPLACEMENT WITHIN THE 

* COMMUNICATION REGION 
* 

000008A8 CMRPATDS EQU *-CMREIAA 

10F 
F 
F 



IB 008A8 
IB 008D0 
IB 008D4 



CMRPATDS EQU 
CMRPATCH DS 
CMRSOAI DS 
CMRSOAN DS 



OF THE PATCH AREA 

DISPLACEMENT OF PATCH AREA 
N483 

SOA FOR IPL'D CPU 
SOA FOR NON-IPL f D CPU 



IB 008D8 

IB 008DC 
IB 008E0 
IB 008E8 

IB 008E8 



IB 008F0 



* 






ASSORTED CONSTANTS 


CMRPGSVE 


DS 


F 


SAVE OF ASDLST ENTRY 


* 






PRINT MAP CONSTANTS 


CMRMPBG 


DS 


F 


BEGINNING OF PRINT MAP 


CMRYMCUR 


DS 


F 


CURRENT PAGE FOR SYMGEN 




DS 


0D 


ALIGN TO DPUBLE WORD 


* 






BOUNDARY 


CMRTRMNT 


DS 


XL8 


WAIT STATE PSW = 


* 






X'0002000000000 


* 






000 f 


CMRTRTB 


DS 


CL16 


TRANSLATE TABLE 



(Listing of CHACMR continued on page 95) 



94 CHACMR 



(Listing of CHACMR continued from page 94) 



LOCATION INSTRUCTION SOURCE 

* 
CMRCEND 



INST OPER 



IB 00900 
IB 00904 
IB 00904 

IB 00910 
IB 00918 

IB 0091C 

IB 00920 



IB 0091E 



DS 
DS 

CMRENDMK DS 

* 

CMRZEROS DS 

CMRSEGMK DS 

♦ 

CMRONE 

CMRONE1 

CMR256 



DS 

EQU 

DS 



CL3 

OF 

12X 

D 
F 

F 

CMRONE+2 

F 



COMMENT 

=C , 0123456789ABC 

DEF' 

= C , END f 

ALIGN TO FULL WORD BOUNDARY 

END MARK = " FF' FOR 12 

BYTES 

DOUBLE WORD = D'0" 

SEG BOUNDARY MASK = 

X'OOOFFFFF' 

FULL WORD = F f l f 

HW OF ONE N483 

FULL WORD = F'256' 



IB 00924 
IB 00928 

IB 0092C 

IB 00930 

IB 00930 
IB 00932 



THE FOLLOWING ARE MASKS - - AIL MUST BE ON FULL 
WORD BOUNDARIES 

F LEAVE INTERRUPTS DISABLED 

AT SET 

PATH EXIT = X , 00040000 i 
F LEAVE INTS DISABLED AT 

EXIT- 

PATHF IN DING/REV PATH, 
INIT = X« 00010000" 
F DEVICE MALFUNCTION FLAG 

= X^OOOOOOO' 



* 
* 
CMRLIDMS DS 

CMRLIDMP DS 
CMRMMSK 



DS 



* THE FOLLOWING THREE CARDS MUST STAY TOGETHER 



DS 
* 

DS 
CMRPGLTH DS 



OF 

H 
H 



ALIGN TO A FULL WORD 

BOUNDARY 

FIRST HALF WORD ZERO 

SEC HALF WORD = X'lOOO" 

FULL WORD/HALF WORD FOR 

PAGE LENGTH 



IB 00934 
IB 00936 
IB 00938 
IB 0093A 
IB 0093C 

IB 0093E 
IB 00947 



OOOOOOOF 
00000006 



IB 00950 
IB 00950 

IB 00958 
IB 0095A 
IB 0095C 
IB 0095F 
IB 00967 
IB 0096F 
IB 00977 
IB 00978 



00000001 
00000002 



IB 00979 



IB 0097C 
IB 0097C 



DS 
DS 
DS 
DS 
DS 



CMRDEFCT 

CMRLXPT 

CMRLXPST 

CMRTWO 

CMRFOUR 

CMRDSNAM DS 
CMRDSQAL DS 
♦ 

CMRNLTH1 
CMRNLTH2 



CMRNAME 

* 



EQU 
EQU 
DS 
DS 



DS 
DS 
DS 



CMRCZ 
CMRCHB 
CMRTDYNM DS 
CMRMAPNM DS 
CMREXTNM DS 
CMRPGWRT DS 
CMRMAP 
CMRMAPI 
CMRMAPS 
CMRVAM2 

* 



H NUM OF DEFINITIONS-INIT = 1 

H LEN OF XPT ENTRY INIT = 8 

H LEN OF XSPT ENTRY INIT = 12 

H HALF WORD = 2 

H HALF WORD = 4 

DATA SET NAME QUALIFIERS 
CL9 INIT = C'TSS*****.' 
CL6 MODIFIED DATA SET NAME 

SYSIVM f RESSUP, RSSSUP 
♦-CMRDSNAM LEN OF WHOLE NAME 
♦-CMRDSQAL LEN OF QUALIFIER 



DS 

EQU 

EQU 

DS 
THE FOLLOWING CARDS 
FULL WORD BOUNDARY 



OF 
CL8 

2X 

CL2 

CL3 

CL8 

CL8 

CL8 

X 

X 

X"01 f 

X , 02' 

CL2 



ALIGN TO FULL WORD BOUNDARY 
INIT = ' ' - CSECT NAME 
HOLD AREA 



INIT 
INIT 
INIT 
INIT 
INIT 
INIT 



X'OOOO" 

c f cz" 

C'CHB* 
C'TDY 
C'TDY MAP 
C" EXTAB 



MAP OPTION SWITCH 
IVM MAPS PRINT WANTED 
RESSUP/RSSSUP MAPS WNATED 
INIT = 0^2" - VAM 2 CODE 
MUST BE TOGETHER TO ENSURE 



CMRMINUS 



DS 
DS 



OF 
XL4 



ALIGN TO FULL 
= X , 80000000 i 



WORD BOUNDARY 



SAVE AREA FOR REGISTER 13 BY VARIOUS ROUTINES 



IB 00980 
IB 00984 
IB 00988 
IB 0098C 
IB 00990 



CMRTRANV DS 
CMRRDPDV DS 
CMRSRCHV DS 
CMRLOCXV DS 
CMRHASHV DS 



F 
F 
F 
F 
F 



(Listing of CHACMR continued on page 96) 



SAVE WORD FOR REG 13 

SAVE WORD FOR REG 13 

SAVE WORD FOR REG 13 

SAVE WORD FOR REG 13 

SAVE WORD FOR REG 13 



CHACMR 95 



(Listing of CHACMR continued from page 95) 



LOCATION INSTRUCTION 
IB 00994 
IB 00998 
IB 0099C 
IB 009A0 

IB 009A4 

IB 009A8 

IB 009AC 

IB 009B0 

IB 009B4 
IB 009B6 
IB 009BE 

IB 009C0 

IB 009C2 

IB 009C3 

00000001 
00000002 
00000004 

00000003 

00000003 

00000020 

00000010 
00000008 



IB 009C4 
IB 009C5 

IB 009C6 



00000004 

- ************ 



IB 009C8 
IB 009CC 
IB 009CE 



00000080 
0000007F 

00000040 
00000020 

00000008 
00000004 
00000002 
00000001 



SOURCE INST 

CMRSAVEV DS 

CMRGTXSV DS 

CMRBS13 DS 

CMRHSHSV DS 

* 

CMRMODSV DS 

* 

CMRRDNSV DS 

* 

CMRSTLEN DS 

CMRSARSV DS 

CMREADER DS 
CMRMODNM DS 
CMREXTNO DS 
* 

CMRPARTM DS 
CMRTEMP DS 
CMROVFG DS 
CMROVXTS EQU 
CMROVPRI EQU 
CMROVPUB EQU 
CMRCSW1 DS 
CMRCSW1M EQU 
CMRCSW2 DS 
CMRCSW2M EQU 

* DELTA DATA 
CMRDLBT DS 
CMRDLBTD EQU 
* 

CMRDLBTE EQU 
CMRDLBTP EQU 

CMRDLBTR EQU 

************** 

* PARAMETERS 

* - EIAA2 
CMRIOAD DS 
CMRIOLEN DS 
CMRIOFG DS 
* 

CMRIOFGW EQU 
CMRIOFGR EQU 
* 

CMRIOFGL EQU 
CMRIOFGO EQU 

CMRIOFGA EQU 
CMRIOFGC EQU 
CMRIOFGD EQU 
CMRIOFGI EQU 



OPER COMMENT 

F SAVE WORD FOR REG 13 

F SAVE WORD FOR GETEXT R13 

F SAVE R13 AREA N483 

F HASH SAVE AREA REG 13 

N349.10 
F MODFY SAVE AREA FOR BASE 

N349.10 
F READIN BASE REG SAVE AREA 

N349.10 
H STARTUP PAGES OR BUFFERS 

CURRENTLY ASSIGNED 
F REG 13 SAVE AREA 

N386** 
H CARD READER INPUT INDICATOR 

CL8 MODULE NAME 
H NUM OF EXTAB (CMREXTAB) 

BUFFS 
H NUM OF TEMP PART PAGES 

X TEMPORARY STORAGE AREA 

X SEGMENT OVERFLOW FLAGS 

X f 01 f XTSI OVERFLOWED 
X'02 f PRIVATE SEGMENT OVERFLOWED 
X , 04" PUBLIC SEGMENT OVERFLOWED 
X MAIN CPU FLAG BYTE 

X'03 f ON = PROCESSING STARTUP 
X OTHER CPU FLAG BYTE 

X f 03' ON = READY TO EXIT 
SET VOLUME INFORMATION 
X FLAG BYTE 

X^O' DELTA DATA SET VOL EXISTS 

MASK 
X f 10" MINOR ERRORS MASK 
X^S' PRIMARY DS ON DELTA DS VOL 

MASK 
X , 04 f MSG LIST RELOC FLAG 
***************************** 

FOR STARTUP READ - WRITE SUBROUTINE - 



DATA BUFFER ADDRESS 
LEN FOR I/O OPERATION 
INPUT /OUTPUT FLAG 
INPUT BITS 
X'80 f WRITE ( OFF FOR READ) 
X'FF' -CMRIOFGW READ ( TURN OFF WRITE 
BIT) 

DON'T RELOCATE 
OWN CCW ADDR IN REG 
OUTPUT BITS 

ABNORMAL RETURN, OTHERS SET 
MALF CHANNEL 
MALF DEVICE OR CU BUSY 
INTERVENTION REQUIRED 



F 
H 
X 



X^O' 
X f 20' 

x i 08 i 

X i 04 t 
X'02 f 
X , 01 t 



IB 009DO 
IB 009D4 
IB 009D8 
IB 009DC 
IB O09E0 
IB 009E4 
IB 009E8 
IB 009EC 
IB 009F0 
IB 009F4 
IB 009F8 

IB 009FC 
(Listing of 



* *************** 

* PARAMETERS FOR 
CMRGRP1 DS 



CMRGRP2 
CMRGRPS1 
CMRGRPS2 DS 
CMREQAD1 DS 
CMREQAD2 DS 
CMRETAD1 DS 
CMRETAD2 DS 
CMRBUFF1 DS 
CMRBUFF2 DS 
CMRBLDF 
♦ 
CMRBLDX 



DS 
DS 



DS 



DS 



**************************** 

PAGING OF THE TDY 

F ADDR FOR MAJOR GROUP 

F ADDR FOR MINOR GROUP 

F SIZE OF MAJOR GROUP BUFFER 

F SIZE OF MINOR GROUP BUFFER 

F REL TDY ADDR REQ IN BUFFI 

F REL TDY ADDR REQ IN BUFF2 

F POINTER RETURNED FROM BUFFI 

F POINTER RETURNED FROM BUFF2 

F ADDR OF MAJOR BUFFER 

F ADDR OF MINOR BUFFER 

F BUFFER TO HOLD TDY PAGE 

TABLES 

F BUILD BUFFER INDEX 



CHACMR continued on page 97) 



96 CHACMR 



(Listing of CHACMR continued from page 96) 



c 



LOCATION INSTRUCTION SOURCE INST 

IB O0A0O CMRMAXTD DS 

IB 00A0<* CMRBFLN DS H 

IB 00A08 CMRSCED DS F 



OPER COMMENT 

F MAX SIZE OF TDY BEFORE 

PAGING ST 

ARTS 

LEN OF BUFF1/BUFF2 IN PGS 

SCHEDULE TABLE ENTRY LEN 



IB 00A10 
IB 00A18 



IB 00A1E 



COMMAND CCW LIST 
ADDRESSES FILLED IN DYNAMICALLY WHILE STARTING 



* ********************************************** 

* UP 

CMRCCW05 DS 
CMRCCW06 DS 



D 
D 



INIT = 139 f OiX'SO',! 
INIT = 09,O i X i 20 , ,0 



CMRCCW6B EQU CMRCCW06+6 



* ********************************************** * 

CONSTANTS AND STORAGE AREAS 
DATA SET NAME CONSTANTS 
= C , TSS*****.SYSIVM - 
= C , TSS*****.RESSUP I 
= C - TSS*****.RSSSUP' 



******************* 

PARAMETERS FOR QUICKSTART 

LOC OF STARTUP ON COLD 

START 

SAVE OF REG 13 BY SPECIAL 

ALIGN TO FULL WORD BOUNDARY 

DEV TYPE CODE FOR QK VOL 

DEVICE ADDR-QUICK START VOL 

RPN OF PAT FOR QUICK START 

VOL 

NUM OF CPUS AT COLD START 

REL PUB VOL NUM OF QK VOL 

RPN OF QKSTART E DSCB 

SLOT NUM OF QKSTRT E DSCB 

FIRST SERR RPN 

15718 

LAST SERR RPN 

15718 

COUNT OF BAD SERR PAGES 

15718 

INITIALLY = H'l 1 

15718 

QUICK START FLAG 

QUICK START MASK 

QUICK START VOL = IPL PACK 

QUICK START PACK PUBLIC 

QK DATA SET ALREADY EXISTS 

THIS IS A QUICK START MASK 

NEW QK START DS LARGER FLAG 

VOLID OF QUICK START VOLUME 

BYTE MAP FOR BUFFER PAGES 

INIT = X^FFFFFFF* 



INIT = C'CHBVM ' - 
MODULE NAME OF VM LOAD LIST 

INIT = C'CHBRC * MODULE 

NAME 

OF REAL CORE LOAD LIST 



IB 00A20 




* 
CMRIVM 


DS 


CL15 


IB O0A2F 




CMRSUP 


DS 


CL15 


IB 00A3E 




CMRRSS 


DS 


CL15 






* = ***** 

* 

CMRFSTSU 

* 


************** 


IB 0OA50 




DS 


F 


IB 00A54 




CMRSPSV 


DS 


F 


IB 00A58 






DS 


OF 


IB 00A58 




CMRQKTYP 


DS 


H 


IB 00A5A 




CMRQKVOL 


DS 


H 


IB 00A5C 




CMRQKPAT 

* 


DS 


H 


IB 00A5E 




CMRQKCPU 


DS 


H 


IB 00A60 




CMRQKPVT 


DS 


H 


IB 00A62 




CMRRPNE 


DS 


H 


IB 00A64 




CMRSLTE 


DS 


H 


IB 00A66 




CMRSRQKF 

* 


DS 


AL2 


IB 00A68 




CMRSRQKL 

* 


DS 


AL2 


IB 00A6A 




CMRSRCNT 

* 

* 


DS 


H 


IB 00A6C 




CMRQKFG 


DS 


X 




00000080 


CMRQKFGY 


EQU 


X^O* 




oooooouo 


CMRQKFGI 


EQU 


X'ilO' 




00000020 


CMRQKFGP 


EQU 


X'20' 




00000010 


CMRQKFGE 


EQU 


X'lO 1 




00000001 


CMRQKFGM 


EQU 


X , 01 t 




00000002 


CMRQKFGL 


EQU 


X f 02 f 


IB 00A6D 




CMRQKID 


DS 


CL6 


IB 00A7<* 




CMRQKMAP 

* 


DS 


18F 


IB OOABC 






DS 


F 


IB OOACO 




CMRVMLL 

* 


DS 


CL8 


IB 00 AC 8 






DS 


X 


IB 0OAC9 




CMRRCLL 

* 


DS 


CL8 


IB 00AD1 




* 


DS 


X 


IB 00AD2 




CMRRSLL 


DS 


CL8 



INIT = C'CHBRS 



• * 
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LOCATION INSTRUCTION SOURCE 


INST 


OPER 


COMMENT 








* 






MODULE NA 








* 






ME OF RSSSUP LOAD LIST 




IB 


00 AD A 




DS 


X 


INIT = X'00 f 




IB 


00ADB 


CMRPGIND 


DS 


X 


PAGING INDICATOR 








* * * * = 


* * * 


* * * * * 


********** 








♦ 






ASSORTED MASKS 








* ALIGNED TO FULL WORD BOUNDARY 




IB 


00 ADC 




DS 


OF 






IB 


00 ADC 


CMRMSK1B 


DS 


XL4 


INIT = XL4 f 3F f 




IB 


00AE0 


CMRMSK2 


DS 


XL4 


INIT = X'OOFFFFFO' 




IB 


O0AE4 


CMRMSK3 

* 


DS 


XL4 


INIT = X^OOFFFFFF* 
CCW COMMAND CODE MASK 




IB 


00AE8 


CMRMSKE 


DS 


XL4 


INIT= , E0000000' N483 




IB 


00AEC 


CMRMSK7 

* 


DS 


XL** 


INIT = X'FFFFFFFS* 

- DOUBLE WORD BNDRY MASK 




IB 


00AF0 


CMRMSK8 

* 


DS 


xl4 


INIT = X'OOOOOFFF' * BYTE 

PART 

OF AN ADDRESS 




IB 


00AF4 


CMRMSK9 


DS 


XL4 


INIT = X'FFFFFFCO* 






IB 00AF0 


CMRMFFF 


EQU 


CMRMSK8 


N483 






IB 00AF2 


CMRUSECT 

* 


EQU 


CMRMSK8+2 


N483 
-64 BYTE BNDRY MASK 




IB 


O0AF8 


CMRMSK11 

* 


DS 


XL** 


INIT = X^FFFFOOO' 
PAGE BOUNDARY MASK 




IB 


00 AFC 


CMRMUTCT 


DS 


H 


INIT = H' 32767 1 

- INITIAL MUT COUNT 




IB 


00AFE 


CMRSPTNO 

* 


DS 


H 


INIT = B*l* 

- INITIAL SPT NUMBER 




IB 


00B00 


CMRLSPT 


DS 


H 


LAST ASSIGNED SPT NUMBER 




IB 


O0B02 


CMRSSVE 


DS 


H 


SAVE FOR RSS SYMBOL TABLE 




IB 


00B04 


CMRBLANK 

* 


DS 


CL8 


INIT = C" 
ASSORTED CONSTANTS 




IB 


00B0C 




DS 


OF 


N349.10 




IB 


00B0C 


CMRMXHDI 

* 


DS 


XL4 


INIT = X'OOOOAOOO* 

- MAX BYTES IN IVM TDY HDNG 




IB 


00B10 


CMRMXHDR 

* 


DS 


XL4 


INIT = X* 00004000" 

MAX BYTES IN RES TDY HDNG 






IB 0034C 


CMRS0PG1 

* 


EQU 


CMRSGMTO 


STARTING ADDRESS FOR 
SEGMENT f PAGE 1 




IB 


00B14 


CMRAEAR 


DS 


F 


BUILD CEHCHRSS HERE 




IB 


00B18 


CMRPAGEV 


DS 


F 


SAVE AREA 








* INFORMATION 


NEEDED AND 


UPDATED BY LINDK LOADER 




IB 


00B1C 


CMRFXBTL 


DS 


F 


SAVE OF PMD LENGTH 




IB 


00B20 


CMRFXBS 


DS 


F 


CSECT BASE ADDRESS 




IB 


00B24 


CMRPGTAD 


DS 


F 


PAGE TABLE ORIGIN 




IB 


00B28 


CMRINADV 


DS 


F 


SAVE OF I NAD 




IB 


00B2C 


CMRVIRT 


DS 


F 


CURRENT VIRTUAL PAGE NUM 




IB 


00B30 


CMRTEXTN 


DS 


F 


CURRENT TEXT PAGE NUMBER 




IB 


00B34 


CMRNOBT 


DS 


F 


NUMBER OF BYTES IN CSECT 




IB 


00B38 


CMRERLD 


DS 


F 


START OF EXT REF MODIFIER 
PTRS 




IB 


00B3C 


CMRERND 

* 


DS 


F 


END OF EXT REF MODIFIER 
PTRS 




IB 


00B40 


CMRIRLD 


DS 


F 


START OF IN REF MODIFIER 
PTRS 




IB 


00B44 


CMRIRND 


DS 


F 


END OF INT REF MODIFIER 
PTRS 




IB 


00B48 


CMRVMPT 


DS 


F 


LOC OF VI R MEM PAGE TABLE 




IB 


00B4C 


CMRSEPCS 


DS 


F 


POINTER TO SEP CSD 




IB 


00B50 


CMRMODCO 


DS 


H 


NUM OF MODULES IN DATA SET 




IB 


00B52 


CMRINPSZ 


DS 


H 


SIGNIFICANT BYTES IN INPUT 




(Listing of CHACMR 


continued on page 99) 
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LOCATION INSTRUCTION SOURCE 



INST OPER 



IB 00B54 


* 
CMROUTSZ 


DS 


H 


IB 00B56 


CMRSEGSW 

* 


DS 


H 


IB 00B58 


CMRSSSW 

* 


DS 


H 


IB 00B5A 


CMRMVESW 


DS 


C 


IB 00B5B 


CMRNLLSW 


DS 


C 


IB 00B5C 


CMRCDFSW 


DS 


C 


IB 00B5D 


CMRSERSW 


DS 


c 


IB 00B5E 


CMRUTI 


DS 


XL** 


IB 00B62 


CMRIPLY 

* 


DS 


X 


IB 00B63 


* 
CMRSLSW 


DS 


X 


00000080 


CMRSLSWM 


EQU 


X f 80 f 


IB 00B64 


CMRNMPTH 


DS 


F 



COMMENT 

BUFF 

BYTES AVAIL IN OUTPUF BUFF 

DATA SET INDICATOR FOR 

GETEXT * 

l=RESSUP f 0=SEG0, 1=SEG1 

INIT = H f 255 f 

- RSSSUP SWITCH FOR GETEXT 
1=BYTES TO MOVE 

1=EMPTY PAGE 

COMPLEX DEF SW ( 1 = ON) 

SER SWITCH 

INIT = X , 07000000 f 

- USER TIMER INTERVAL 
IPL MOUNTED SWITCH -* 
00=YES, 

80=NO 

SELECTIVE LOAD SWITCH 
SORT LOAD LIST MASK 
NUMBER OF PATHS 



* ********** 



IB 00B68 
IB 00B68 

IB 00B6C 

IB 00B70 

IB 00B74 

IB 00B78 

IB 00B7C 

IB 00B80 

IB 00B84 
IB 00B88 
IB 00B8C 
IB OOB90 
IB 00B94 
IB 00B98 
IB 00B9C 
IB 00BA0 
IB O0BA4 
IB 00BA8 
IB O0BAC 
IB 00BB0 
IB 00BB4 
IB 00BB8 
IB 00 BBC 
IB 00BC0 
IB 00BC4 
IB 00BC8 
IB 00BCC 
IB 00BD0 
IB 00BD4 
IB 00BD8 
IB 00BDC 
IB 00BE0 
IB 00BE4 
(Listing of 



**************************************************** 

* THE FOLLOWING IS A LIST OF ADCONS USED TO 

* REFERENCE LOCATIONS 

* WITHIN STARTUP PROPER 

* ANY ADCONS TO BE USED SHOULD BE IN THIS LIST AS 

* THEY 

* MUST BE DYNAMICALLY RELOCATED BY STARTUP ITSELF 

START OF LIST 
A(ANZSDA) 

M3132 
A (CORERTN) 

M3132 
A(PARTMP) 

M3132 
A(RTMPGS) 

N349.10 
A(BFRPGIT) 

N349.10 
A(INTDE) 

N349.10 
A(MODFY) 

N349.10 
ACEIAA2) 
A (OPER) 
A (PRINTER) 
A(OPERMTBL) 
A(PPVCCW) 
A(ADTRAN) 
A(ATRAN) 
A(BTRAN) 
A(CTRAN) 
A(LOCXPT) 
A (EXTENT) 
A(HASH) 
A (ORIGIN) 
A(WRTDY) 
A(XTSIRT) 
A(SHPTRT) 
A(CRRSPI) 
A(FORMPT) 
A(SETPT) 
A(NAMLOC) 
A(RDPOD) 
A(MAPGEN) 
A(RCOMTB) 
A(WRSYMTB) 
A(ADDPGS) 



CMRFSTAC 


DS 


OF 


CMRSDAC 

* 


DS 


A 


CMRCORE 

* 


DS 


A 


CMRPTMP 

* 


DS 


A 


CMTRTPG 

* 


DS 


A 


CMRBFGT 

* 


DS 


A 


CMRTDE 

* 


DS 


A 


CMRMODFY 

* 

CMREIAA2 


DS 


A 


DS 


F 


CMROPER 


DS 


F 


CMRPRINT 


DS 


F 


CMRMSGTB 


DS 


F 


CMRPPCCW 


DS 


F 


CMRADTRN 


DS 


F 


CMRATRAN 


DS 


F 


CMRBTRAN 


DS 


F 


CMRCTRAN 


DS 


F 


CMRLOCX 


DS 


F 


CMREXTNT 


DS 


F 


CMRHASH 


DS 


F 


CMRORGIN 


DS 


F 


CMRWRTDY 


DS 


F 


CMRXTSRT 


DS 


F 


CMRSHPT 


DS 


F 


CMRRSPI 


DS 


F 


CMRFORM 


DS 


F 


CMRSETPT 


DS 


F 


CMRNAMLC 


DS 


F 


CMRRDPOD 


DS 


F 


CMRMAPGN 


DS 


F 


CMRCOMTB 


DS 


F 


CMRWRSYM 


DS 


F 


CMRADDPG 


DS 


F 
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(Listing of CHACMR continued from page 99) 



LOCATION INSTRUCTION 


SOURCE 


INSS 


* OPER 


COMMENT 


IB 00BE8 


CMRBSDST 


DS 


F 


ACBDSDST) 


IB OOBEC 


CMRESRVP 


DS 


F 


A(RESRVP) 


IB O0BF0 


CMRGTFLD 


DS 


F 


A(GETFLD) 


IB 00BF4 


CMRWTMD 


DS 


F 


ACWTMDNM) 


IB 00BF8 


CMRWRXTS 


DS 


F 


A(WRXTSI) 


IB OOBFC 


CMRSOAPG 


DS 


F 


A(SOAPGS) 
N483 




* ADCONS ADDED FOR Q- 


-CONS 




♦ 




N483 




IB 00C00 


CMRHOLTB 


DS 


A 


A(HOLETBL) 
N483 


IB 00C04 


CMRENDTB 

* 


DS 


A 


A (END OF HOLETBL> 
N483 


IB 00C08 


CMRHOLVL 

* 


DS 


A 


A (HOLETBL) -CURRENT HOLE 
N483 


IB O0C0C 


CMRQRDR 


DS 


A 


A(QRDR) 

N<*8 3 


IB 00C10 


CMRBGNTD 


DS 


A 


A(BGNTDY) 
N483 


IB 00C14 


CMRLLLNK 

* 


DS 


A 


A(LLLNK) 

N483 


IB 00C18 


CMRLLSCN 


DS 


A 


ACLLSCN) 

N483 


IB 00C1C 


CMRSRCN 


DS 


A 


A(SERRTBL) 
N483 


IB 00C20 


CMRLDPMD 

* 


DS 


A 


A(LDPMD) 
N483 


IB O0C24 


CMRSDAT 


DS 


F 


ACSDATRT) 




* ADCONS 


FOR 


CCW LIST 


TO READ/WRITE 


IB O0C28 


CMRDATA 


DS 


F 


A(RDDATA) 


IB 00C2C 


CMRCYLHD 


DS 


F 


ACCYLHEAD) 


IB 00C30 


CMRSMFSA 


DS 


F 


A(SIMFSA) 


IB 00C34 


CMRSORD 


DS 


F 


A (SORDID) 


IB 00C38 


CMROTHER 


DS 


F 


A(OTHERCPU) 


IB 00C3C 


CMRGTPAT 


DS 


F 


A(GETPAT) 


IB 00C40 


CMRRDSCB 


DS 


F 


A(RDSCB) 


IB 00C44 


CMRTDTCT 


DS 


A 


A(TDTCAT) 
NH23** 


IB 00C48 


CMRREAD 


DS 


F 


A(READCARD) 


IB 00C4C 


CMROPRT 


DS 


F 


A (INPUT) ADDR OF OPER TERM 


IB 00C50 


CMRDELDS 


DS 


F 


A(DELDS) 


IB 00C54 


CMRDLTBL 


DS 


F 


A(DELTBL) 


IB 00C58 


CMRDLBTB 


DS 


F 


A(DELBTB) 


IB 00C5C 


CMRELTDY 


DS 


F 


A(RELTDY) 


IB 00C60 


CMRALLER 


DS 


F 


A(ALLERl) 


IB 00C64 


CMRSLOAD 


DS 


F 


A(SELOAD) 


IB 00C68 


CMRSRCH 


DS 


F 


A(SRCHEX) 


IB 00C6C 


CMRNMTAB 


DS 


F 


A(NAMTAB) 


IB 00C70 


CMRSERR1 


DS 


F 


A(SERRIOO) 


IB 00C74 


CMRSTERM 


DS 


F 


A(STERM) 




* ADCONS 


FOR 


PRINTING 


MAPS AND HEADERS 


IB 00C78 


CMRLOADL 


DS 


F 


A(LOADL) 


IB 00C7C 


CMRHSHSR 


DS 


F 


A(HSHSRH) 


IB 00C80 


CMREADIN 


DS 


F 


A(READIN) 


IB 00C84 


CMRSEEK 


DS 


F 


A(IOSEEK) 


IB 00C88 


CMREROUT 


DS 


F 


A(ERROUT) 


IB 00C8C 


CMRBLDTB 


DS 


F 


A(BLDTBL) 


IB 00C90 


CMRPGTDY 


DS 


F 


A(PAGTDY) 


IB 00C94 


CMRJSHB2 


DS 


F 


A(JSHDRB2) 
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LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 


COMMENT 


IB 00C98 






CMRJSHBA 


DS 


F 


ACJSHDRB> 


IB 00C9C 






CMRADTIT 


DS 


F 


A(JSTITL) 


IB 00CA0 






CMRSTRAN 


DS 


F 


A(STRAN) 


IB 00CA4 






CMRRTRAN 


DS 


F 


A(RTRAN) 


IB 00CA8 






CMRPGXTS 


DS 


F 


A(PGXTSI) 


IB 00CAC 






CMRASAT 


DS 


F 


A(ASATRT> 


IB OOCBO 






CMRDIRSZ 


DS 


F 


A(DIRSIZ) 


IB 00CB4 






CMRQKRD 


DS 


F 


A(QKREAD> 


IB 00CB8 






CMRQKSTA 


DS 


F 


A(CEIEND) 




IB 


00B8C 


CMRWT 


EQU 


CMRPRIWT 




IB OOCBC 






CMRENAB 


DS 


A 


A(ENABLE) 


IB 00CC0 






CMRLSTAD 


DS 


OF 


LAST ADCON 




00000158 


CMRADLEN 


EQU 


CMRLSTAD-CMRFSTAC 



15628 
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Communications Area (CHACOM) 

The Communications Area (COM) passes interruption information from Task Monitor 
Scanner-Dispatcher routines to requesting programs. This area must be defined by the 
requesting program. 

The Scanner- Dispatcher, at dispatch time, moves the required interruption informa- 
tion from the Queue Entry (CHAIQE) into the COM. The requesting program can then 
analyze the interruption information. 

The COM resides in virtual storage and is write- protected from the user. The COM 
is 16 bytes in length and is maintained on doubleword boundaries. 

CHACOM Storage map 



DEC 




HEX 



| COMDET 

I 

8[ 



ORG COMOVY 



ORG COMOVY 



ORG COMOVY 



ORG COMOVY 



ORG COMOVY 



ORG COMOVY 



COMOVY 



UNNAMED 



UNNAMED | 


COMINT | 


COMPSW 






UNNAMED | 


COMSVC 


UNNAMED 






COMXML I 


COMXMN 


COMMSG 






UNNAMED 


|COMASI 

1 


COMSNS 






COMTIM | 

1 


COMTNO 


UNNAMED 






UNNAMED I 

1 


COMSTA 


UNNAMED 
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Fields in CHACOM — by displacement 



DEC HEX FIELD 

0000 0000 COMDET 

0001 0001 COMTIM 
0001 0001 COMXML 

0001 0001 COMOVY 

0002 0002 COMSTA 



DEC HEX FIELD 
0002 0002 COMTNO 
0002 0002 COMXMN 
0002 0002 COMSVC 

0002 0002 COMINT 

0003 0003 COMASI 



DEC HEX FIELD 

0004 0004 COMSNS 

0004 0004 COMMSG 

0004 0004 COMPSW 



Alphabetical list of fields in CHACOM 



FIELD 

COMASI 

COMDET 

COMINT 

COMMSG 

COMOVY 



DEC HEX 

0003 0003 

0000 0000 
0002 0002 

0004 0004 

0001 0001 



FIELD 

COMPSW 

COMSNS 

COMSTA 

COMSVC 



DEC HEX 
0004 0004 
0004 0004 
0002 0002 
0002 0002 



FIELD DEC HEX 

COMTNO 0002 0002 

COMXML 0001 0001 

COMXMN 0002 0002 



COMTIM 0001 0001 



Assembler listing of CHACOM 

LOCATION INSTRUCTION 
1C 00000 

1C 00000 
1C 00000 
1C 00001 



1C 00008 



1C 00001 



1C 00001 
1C 00002 
1C 00004 



1C 00001 



1C 00001 
1C 00002 
1C 00004 



1C 00001 



1C 00001 
1C 00002 
1C 00004 



1C 00001 



1C 00001 
1C 00003 
1C 00004 



1C 00001 



1C 00001 
1C 00002 
1C 00004 



1C 00001 



1C 00001 
1C 00002 
1C 00004 



SOURCE 
CHACOM 

COMDET 
COMOVY 

* 



INST OPER 
DSECT 



COMMENT 



COMMUNICATION AREA 



0D 

CL1 

CL7 



DE TYPE CODE 

FIELD OVERLAID FOR VARIOUS 
INTERRUPTS 
PS 2F 
| ORG | COMOVY 

* FIELDS USED FOR PROGRAM INTERRUPTS 

DS CL1 UNUSED 
COMINT DS CL2 INTERRUPT CODE 
COMPSW DS F ADDR IN VPSW AT INTERRUPT 

{ ORG | COMOVY 

* FIELDS USED FOR SVC INTERRUPTS 

DS CL1 UNUSED 
COMSVC DS CL2 SVC NUMBER FROM VPSW 

DS F ADDR IN VPSW-USES COMPSW 

| ORG | COMOVY 

* FIELDS USED FOR EXTERNAL INTERRUPTS 
COMXML DS CL1 MESSAGE LENGTH 
COMXMN DS CL2 MESSAGE NUMBER 
COMMSG DS F PTR TO MESSAGE AREA 

I ORG | COMOVY 

* FIELDS USED FOR ASYNCHRONOUS I/O INTERRUPTS 

DS CL2 UNUSED 
COMASI DS CL1 INT. TYPE FOR ASYNCHRONOUS 
COMSNS DS F SENSE INFORMATION 

| ORG | COMOVY 

* FIELDS USED FOR TIMER INTERRUPTS 

COMTIM DS CL1 TIMER TYPE - TASK OR REAL 
COMTNO DS CL2 TIMER NUMBER FROM VPSW 

DS F ADDR IN VPSW -USES COMPSW 

I ORG ! COMOVY 

* FIELDS USED FOR SYNCHRONOUS I/O INTERRUPTS 

DS CL1 UNUSED 
COMSTA DS CL2 CSW STATUS INFO 

DS F SENSE INFO - USES COMSNS 
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CPU Status Table (CHACST) 

The CPU Status Table (CST) describes the operational status of each CPU and 
Storage Element (SE) in the installation, including availability to TSS. 

The CST is set up by system generation, startup, and/or system inventory routines, 
depending on the particular installation. It furnishes data to the recovery nucleus, 
SERR, reconfiguration, and system inventory programs. 

The prefixed storage area (core storage) contains the CST, aligned on a doubleword 
boundary. Each CPU in the installation has a CST in its own PSA. 

The CST consists of the CST header, the CPU status section, and the SE status 
section. 



CHACST Storage map 



DEC HEX 





















OICSTIDO 


|CSTMDL | 
1 i 


CSTNOP | CSTNAP 
I 


1 
i 




CSTSET 






8 


8|CSTID1 
1 


| CSTID2 | 

1 I 


CSTID3 | 

1 


UNNAMED 


(CSTCST | 
1 I 


UNNAMED 




16 


10| 

1 


CSTPF1 




i 

1 




CSTPF2 






24 


18|CSTSST 

1 


| CSTFSA | 
1 I 


iment 














Fields in 


CHACST — by displace 






DEC HEX 
0000 000C 


FIELD 
> CSTID0 


DEC 
0009 


HEX 
0009 


FIELD 
CSTID2 




DEC HEX 
0024 0018 


FIELD 
CSTSOP 


(EQU) 




0001 0003 


. CSTMDL 


0010 


000A 


CSTID3 




0024 0018 


CSTSPA 


(EQU) 




0002 0002 


CSTSESZE 


(EQU> 0013 


000D 


CSTPA 


(EQU) 


0024 0018 


CSTSSK 


(EQU) 




0002 0002 


* CSTNOP 


0013 


000D 


CSTSK 


(EQU) 


0024 0018 


CSTSAV 


(EQU) 




0003 0003 


CSTNAP 


0013 


000D 


CSTAV 


(EQU) 


0024 0018 


CSTSST 






0004 000*J 


\ CSTSET 


0013 


0O0D 


CSTCST 




0024 0018 


CSTCEND 






0008 0008 


CSTID1 


0016 


0010 


CSTPF1 




0025 0019 


CSTFSA 






0008 000E 


\ CSTHEND 


0020 


0014 


CSTPF2 




0026 001A 


k CSTSEND 




Alphabetical list of 


fields in 


CHACST 
















FIELD 
CSTAV 


DEC HEX 
0013 000D 


FIELD 
(EQU) CSTID3 


DEC HEX 
0010 000A 




FIELD 
CSTSEND 


DEC HEX 
0026 001A 






CSTCEND 


0024 0018 


CSTMDL 


0001 0001 




CSTSESZE 


0002 0002 


(EQU) 




CSTCST 


0013 000D 


CSTNAP 


0003 0003 




CSTSET 


0004 0004 






CSTFSA 


0025 0019 


CSTNOP 


0002 0002 




CSTSK 


0013 000D 


(EQU) 




CSTHEND 


0008 0008 


CSTPA 


0013 000D 


(EQU) 


CSTSOP 


0024 0018 


(EQU) 




CSTID0 


0000 0000 


CSTPF1 


0016 0010 




CSTSPA 


0024 0018 


(EQU) 




CSTID1 


0008 0008 


CSTPF2 


0020 0014 




CSTSSK 


0024 0018 


(EQU) 




CSTID2 


0009 0009 


CSTSAV 


0024 0018 


(EQU) 


CSTSST 


0024 0018 




Assembler 


listinq of 


CHACST 


















LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 


COMMENT 










ID 00000 


CHACST 


DSECT 
















****** 




CPU STATUS TABLE 


****** 










♦ 






HEADER 








ID 00000 






DS 


0D 












ID 00000 




CSTID0 


DS 


XL1 


IDENTITY BYTE 


(12 FIELD OF 








* 






WRD 


INSTRUCTION) 






ID 00001 




CSTMDL 


DS 


XL1 


MODEL NO OF CPUS IN 










* 






INSTALLATION 


(1 OR 2) 






ID 00002 




CSTNOP 


DS 


XL1 


NO 


OF CPUS Ifl 


1 INSTALLATION 








* 






(1 


TO 4) 








ID 00003 




CSTNAP 


DS 


XL1 


NO 


OF ACTIVE 


CPUS IN TSS 








* 






DOMAIN AFTER 


STARTUP 










* AT SYSGEN TIME, CSTNAP CONTAINS THE 


NUMBER OF 










* STORAGE 


















♦ 






ELEMENTS IN THE SYSTEM 






ID 00004 




CSTSET 


DS 


XL4 


POINTER TO SE 


, STATUS TABLE 




ID 00008 




CSTHEND 


DS 


OX 


END 


OF CPU STATUS TABLE 








* 






HEADER 15943 








( Listing 


Of CHACST 


continued < 


Dn page 105) 










.04 CHACST 





















(Listing of CHACST continued from page 10*4) 



LOCATION INSTRUCTION SOURCE 



INST OPER 



COMMENT 



00000008 



ID 00008 

ID 00009 

ID O000A 

ID 0000B 
ID 0000D 



ID 0000D 

00000080 
ID OO00D 
00000040 
ID 0000D 
00000020 



ID 0000E 
ID 00010 
ID 00014 
ID 00018 



00000010 



ID 00018 



ID 00018 

00000080 
ID 00018 
00000040 
ID 00018 
00000020 
ID 00018 

00000010 



ID 00019 

ID 0001A 



ID 00002 



00000018 



CSTHDSZE 

* 

CSTID1 

* 

CSTID2 
CSTID3 

CSTCST 

CSTAV 

CSTAVM 

CSTSK 

CSTSKM 

CSTPA 

CSTPAM 

CSTPF1 
CSTPF2 
CSTCEND 

CSTCPSZE 

* 

CSTSST 
CSTSAV 

* 

CSTSAM 

CSTSSK 

CSTSSM 

CSTSPA 

CSTSPM 

CSTSOP 

# 

CSTSOM 

CSTFSA 

CSTSEND 

CSTSESZE 
* CSTSEND 

CSTSESZ 

* 



EQU CSTHEND-CSTIDO CPU STATUS TABLE 
HEADER SIZE 15943 
CPU STATUS ENTRY ( ONE ENTRY PER CPU) 

DS XL1 12 FIELD OF WRD FOR 
EXTERNAL INTERRUPT 
12 FIELD OF WRD FOR 
EXTERNAL START 
INTERRUPTION CODE ON 
MALFUNCTION ALERT 
UNUSED 

CPU STATUS (BITS ZERO TO 
TWO) 

CPU UNAVAILABILITY FLAG - 1 
= UNAVAILABLE 
CPU AVAILABILITY MASK 
CPU MALFUNCTIONING FLAG 
CPU MALFUNCTIONING MASK 
CPU PARTITION FLAG 
CPU PARTITION MASK 
UNUSED 

PRIMARY PREFIX 
ALTERNATE PREFIX 
END OF CPU STATUS ENTRY 
15943 
CSTCEND-CSTIDl CPU STATUS ENTRY SIZE 

15943 
SE STATUS ENTRY (ONE PER SE) 
SE STATUS (BITS TO 4> 
SE AVAILABILITY FLAG 1 = 
UNAVAILABLE 
SE AVAILABILITY MASK 
SE MALFUNCTIONING FLAG 
SE MALFUNCTIONING MASK 
SE PARTITION FLAG 
SE PARTITION MASK 
SE OPERATIONAL FLAG 1 = 
NON-OPERATIONAL 
SE OPERATIONAL MASK 
FLOATING STORAGE ADDRESS 
(HI ORDER 8 BITS) 
END OF SE STATUS ENTRY 
15943 

EQU 

( (CSTHEND-CSTIDO) ♦ (CSTCEND-CSTIDl) ) 
STATUS ENTRY SIZE 
15943 

EQU (CSTHEND-CSTIDO) + (CSTCEND-CSTIDl) 
CPU STATUS TABLE 15943 
SIZE 

15943 



DS 

DS 

DS 
DS 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

DS 

DS 

DS 

DS 

EQU 



DS 
EQU 

EQU 
EQU 
EQU 
EQU 
EQU 
EQU 

EQU 
DS 

DS 



XL1 

XL1 

XL1 

CL2 
XL1 

CSTCST 

X^O 1 

CSTCST 

X , 40 f 

CSTCST 

X^O' 

CL2 

XL4 

XL4 

OX 



XL1 
CSTSST 

X f 80 f 

CSTSST 

X'40 f 

CSTSST 

X'20« 

CSTSST 

X'10' 
XL1 

OX 
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Control Unit Table (CHACUT) 

The Control Unit Table C CHACUT) contains status and location information on all 
control units in the configuration. CHACUT is used and updated by the pathfinding 
subroutine. CHACUT is aligned on a word boundary and contains a 12-byte header fol- 
lowed by a variable number of 12-byte entries. 



CHACUT Storage map 



DEC 


HEX 










- 









| CUTMAX | 
1 1 


! UNNAMED 

1 


1 

1 


CUTFP 


i 

I 


8 


8! 

1 


CUTDGP 






1 
I 






ORG 


CUTBEG 

















0[ CUTFLG 

I 


(UNNAMED | 

\ 1 


1 < 
1 


CUTSDA 


[CUTDIG1 
1 


(CUTDIG2 (CUTDIG3 |CUTDIG4 | 
till 


8 


8 [CUTDIG5 
1 


|CUTDIG6 | 
i 1 


|CUTDIG7 (CUTDIG8 | 
1 I 1 






Fields 


in CHACUT — by displacement 












DEC HEX 

0000 oooc 


FIELD 
I CUTFLG 




DEC 
0000 


HEX 
0000 


FIELD 
CUTA 


DEC HEX FIELD 
(EQU) 0007 0007 CUTDIG4 






0000 oooc 


) CUTD 


(EQU) 


0000 


0000 


CUTMAX 


0008 0008 CUTDIG5 






0000 0000 CUTC 


(EQU) 


0000 


0000 


CUTBEG 


0008 0008 CUTDGP 






0000 OOOC 


) CUTS 


(EQU) 


0002 


0002 


CUTSDA 


0009 0009 CUTDIG6 






0000 0000 CUTR 


(EQU) 


0004 


0004 


CUTDIG1 


0010 000A CUTDIG7 






0000 oooc 


) CUTN 


(EQU) 


0004 


0004 


CUTFP 


0011 000B CUTDIG8 






0000 0000 CUTM 


(EQU) 


0005 


0005 


CUTDIG2 








0000 oooc 


> CUTP 


(EQU) 


0006 


0006 


CUTDIG3 






Alphabetical list of 


fields in 


CHACUT 












FIELD 


DEC HEX 




FIELD 


DEC HEX 


FIELD DEC HEX 






CUTA 


0000 0000 


(EQU) 


CUTDIG4 


0007 0007 


CUTMAX 0000 0000 






CUTBEG 


0000 0000 




CUTDIG5 


0008 0008 


CUTN 0000 0000 


(EQU) 




CUTC 


0000 0000 


(EQU) 


CUTDIG6 


0009 0009 


CUTP 0000 0000 


(EQU) 




CUTD 


0000 0000 


(EQU) 


CUTDIG7 


0010 000A 


CUTR 0000 0000 


(EQU) 




CUTDGP 


0008 0008 




CUTDIG8 


0011 O0OB 


CUTS 0000 0000 


(EQU) 




CUTDIG1 


0004 0004 




CUTFLG 


0000 0000 


CUTSDA 0002 0002 






CUTDIG2 


0005 0005 




CUTFP 


0004 0004 








CUTDIG3 


0006 0006 




CUTM 




0000 0000 


(EQU) 




Assembler listinq of 


CHACUT 
















LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 


COMMENT 








IF 00000 


CHACUT 


DSECT 


CONTROL UNIT TABLE 






IF 00000 




CUTBEG 


DS 


OF 


ALIGN TABLE ON A WORD 










* 








BOUNDARY 






IF 00000 




CUTMAX 


DS 


H 


NUMBER OF CONTROL UNIT 










* 








ENTRIES IN TABLE 






IF 00002 








DS 


H 


NOT USED 






IF 00004 




CUTFP 


DS 


F 


CONTROL UNIT TABLE FLAG 








* 








AREA POINTER 






IF 00008 




CUTDGP 


DS 


F 


DEVICE GROUP TABLE POINTER 








♦ 








FOR CTL UNIT N 








IF 00000 






|ORG| 


CUTBEG 








IF 00000 




CUTFLG 


DS 


C 


FLAGS FOR CONTROL UNIT 


N 






IF 00000 


CUTA 


EQU 


CUTFLG 


AVAILABILITY FLAG 








00000080 


CUTAMK 


EQU 


X'SO' 


AVAILABILITY MASK 








IF 00000 


CUTP 


EQU 


CUTFLG 


PARTITIONED FLAG 








00000040 


CUTPM 


EQU 


X , 40 i 


PARTITIONED MASK 








IF 00000 


CUTM 


EQU 


CUTFLG 


UNIT DOWN FLAG 








00000020 


CUTMM 


EQU 


X'20' 


UNIT DOWN MASK 








IF 00000 


CUTN 


EQU 


CUTFLG 


SENSE HOLD FLAG 






(Listing 


of CHACUT 


continued < 


on page 107) 
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(Listing of CHACUT continued from page 106) 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 


COMMENT 






00000010 


CUTNM 


EQU 


X«10 f 


SENSE HOLD MASK 






IF 


00000 


CUTR 


EQU 


CUTFLG 


RESERVED FLAG 






00000008 


CUTRM 


EQU 


x^s 1 


RESERVED MASK 






00000078 


CUT AM 


EQU 


X'78' 


STATUS INDS (EXCL BUSY.NE) 










* 






CTL U 






IF 


00000 


CUTS 


EQU 


CUTFLG 


SWITCH FLAG 






00000002 


CUTSM 


EQU 


X f 02' 


SWITCH MASK 






IF 


00000 


CUTC 


EQU 


CUTFLG 


ENTRY TYPE FLAG 






00000001 


CUTCM 


EQU 


X f 01 f 


ENTRY TYPE MASK 






IF 


00000 


CUTD 


EQU 


CUTFLG 


DISPLACEMENT FOR PARENT 
ENTRY 






O000O0FE 


CUTDM 


EQU 


X'FE" 


DISPLACEMENT FROM PARENT 










♦ 






ENTRY MASK 


IF 


00001 








DS 


C 


NOT USED 


IF 


00002 






CUTSDA 

* 

CUTDIG1 


DS 


H 


SYMB DEV ADDR ASSIGNED THIS 

C.U. 

FIRST DEVICE INTERACTION 


IF 


00004 






DS 


XL1 










* 






GROUP ASSOCIATED WITH 










* 




CONTROL 


UNIT. ZERO IS AN ILLEGAL 










* 




DIG NO. 




IF 


00005 






CUTDIG2 


DS 


XL1 


SECOND DIG 


IF 


00006 






CUTDIG3 


DS 


XL1 


THIRD DIG 


IF 


00007 






CUTDIG** 


DS 


XL1 


FOURTH DIG 


IF 


00008 






CUTDIG5 


DS 


XL1 


FIFTH DIG 


IF 


00009 






CUTDIG6 


DS 


XL1 


SIXTH DIG 


IF 


0000A 






CUTDIG7 


DS 


XL1 


SEVENTH DIG 


IF 


0000B 






CUTDIG8 


DS 


XL1 


EIGHTH DIG 










* NOTE 1 


- THE 


NUMBER OF 


1 DEVICE GROUP TABLE POINTER 



* (CUTDGP) AND CONTROL 

* UNIT FLAG (CUTFLG) ENTRIES IS EQUIVALENT 

* TO THE NUMBER OF 



CONTROL UNITS SPECIFIED AS PART OF THE 
HARDWARE CONFIGURATION 
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Editable Data Set (CHACVF) 

The Editable Data Set CCHACVF) defines those data sets which can be edited by the 
Text Editor. Editable data sets are defined in IBM System/360 Time Sharing System: 
Command System User's Guide , GC28-2001. 
CHACVF resides in virtual storage aligned on word boundaries. 

CHACVF Storage map 



DEC 


8 

16 



HEX 



0| 

1 


CVFLEN 




CVFREG 


8| 
1 


CVFREG (CONT) 




CVFLIN 


10| 
I 


CVFLIN (CONT) 


(CVFPAD 

i 





Fields in CHACVF — by displacement 



DEC HEX FIELD 
0000 0000 CVFLEN 
0004 0004 CVFREG 



DEC HEX FIELD 
0012 000C CVFLIN 
0019 0013 CVFPAD 



DEC HEX FIELD 

0020 0014 CVFTXT (EQU> 



Alphabetical list of fields in CHACVF 



FIELD 

CVFLEN 

CVFLIN 



DEC HEX 
0000 0000 
0012 000C 



FIELD 

CVFPAD 

CVFREG 



DEC HEX 
0019 0013 
0004 0004 



FIELD DEC HEX 
CVFTXT 0020 0014 (EQU) 



Assembler listing of CHACVF 



LOCATION INSTRUCTION SOURCE 



INST OPER 







20 


00000 


CHACVF 


DSECT 




20 


00000 






CVFLEN 


DS 


F 


20 


00004 






CVFREG 


DS 


CL8 


20 


OOOOC 






CVFLIN 


DS 


CL7 


20 


00013 






CVFPAD 


DS 


CL1 






20 


00014 


CVFTXT 


EQU 


♦ 



COMMENT 

, COMMAND 

SYSTEM VISAM REC FORMAT 

VARIABLE RECORD LENGTH 

REGION 

LINE NO 

PAD 

START OF RECORD TEXT 
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Direct Access Interface Block (CHADAI) 



The Direct Access Interface block (DAI) contains the interface data required for 
passing pages to or from core storage, with accurate posting of these pages. 

The DAI, a resident and private table, serves as the interface between the Page 
Direct Access Queue subroutine and the Page Direct Access Interrupt subroutine. The 
DAI table is constructed in supervisor core storage and exists only for the life of 
the paging operation. One DAI entry exists for each paging GQE. 

The size of the DAI, for any given paging request, is calculated by the Page 
Direct Access Queue subroutine using the PCB count contained in the GQE as a factor. 
The Queue routine builds the DAI and places a DAI pointer in the device GQE. 

The extent of the DAI is placed in the device GQE to allow the interrupt routine 
to release core storage when the paging operation is complete. 

The DAI occupies from 156 to 4096 bytes of core storage, aligned on word 
boundaries . 

DEVICE GQE 



->l 



T T 

| DAIB j DAIB 

| EXTENT | POINTER 



| PCB | PCBE | 

| POINTER j COUNT j 

-X X — X- 






GQEIOR 



DAIB 



r 



GQESAT 
i 
i 

I 
V 



GQEPCB 



GQECNT 



PCB 



- >( 

>| 



PCBE1 



L 1 

h 



GQE POINTER (DAIGQE) 



^ 



J 



| PCBE 1 POINTER CDAIPCB) \ J 

,. J 

I PCBE N POINTER (DAIPCN) f 

L . . . 1 



H 1 H 
I u >| 



PCBEN 



1 



Table Relationships; 
CHADAI Storage map 



GQE, DAI, and PCB 



DEC 


8 

16 



HEX 

L 
81 

L 

10 | 



DAIPEB 



(DAIDIS |DAIPSN | DAITYP | DAICUB 



DAICCW 



± 



DAIENT 



_L 



DAISV 



80 


501 
1. 


88 


581 
1. 


96 


60| 

L 


ORG 


DAIBEG 



DAIWK1 



DAIWK2 



DAISNS 



DAIST 



DAISA 



DAISR 



i 



DAIHA 



|DAIID 
J 



IDAIFG 



(CHADAI continued on page 110) 
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CCHADAI continued from page 109 > 



DEC 


HEX 


























ORG 


DAIBEG 





























OIDAICC 


i 
i 




DAIDA 






| DAIFLG 

1 


(DAIIGN 1 
1 1 


DAICTN 


i 
I 


ORG 


DAIBEG 





























0| 
» 






DAIIN 






| DAICNT 

1 


(DAIFA4 |DAIF3 [UNNAMED | 
till 


8 


81 






DAIGQE 






1 

1 






DAICAW 




1 
1 


16 


10| 

1 






DAIPCB 






1 
i 












ORG 


DAIBEG 





















0| 

1 






DAIPCN 






i 
I 




Fields 


in CHADAI 


— by displacement 












DEC 


HEX 


FIELD 




DEC 


HEX 


FIELD 




DEC HEX 


FIELD 






0000 


0000 


DAIPCN 




0004 


0004 


DAIDIS 




0007 0007 


DAIFG 






0000 


0000 


DAI IN 




0004 


0004 


DAISAT 




0007 0007 


DAICUB 






0000 


0000 


DAICC 




0005 


0005 


DAIFA4 




0008 0008 


DAIGQE 






0000 


0000 


DAISA 




0005 


0005 


DAIIGN 




0008 0008 


DAICCW 






0000 


0000 


DAIPEB 




0005 


0005 


DAIPSN 




0012 OOOC 


DAICAW 






0000 


0000 


DAIBEG 




0006 


0006 


DAIF3 




0012 OOOC 


DAIENT 






0001 


0001 


DAIDA 




0006 


0006 


DAICTN 




0016 0010 


DAIPCB 






0002 


0002 


DAISR 




0006 


0006 


DAIID 




0016 0010 


DAIGRE 


(EQU) 




0004 


0004 


DAICNT 




0006 


0006 


DAICS 


(EQU) 


0016 0010 


DAISV 






0004 


0004 


DAIFLG 




0006 


0006 


DAISS 


(EQU) 


0068 0044 


DAIGRB 


(EQU> 




0004 


0004 


DAIHA 




0006 


0006 


DAICP 


(EQU) 


0072 0048 


DAIGRC 


(EQU) 




0004 


0004 


DAIPI 


(EQU) 


0006 


0006 


DAIFC 


(EQU) 


0076 004C 


DAIGRD 


(EQU) 




0004 


0004 


DAISK 


(EQU) 


0006 


0006 


DAIPE 


(EQU) 


0080 0050 


DAIWK1 






0004 


0004 


DAISL 


(EQU) 


0006 


0006 


DAIWC 


(EQU) 


0084 0054 


DAIWK2 






0004 


0004 


DAICH 


(EQU) 


0006 


0006 


DAIFS 


(EQU) 


0088 0058 


DAISNS 






0004 


0004 


DAIDC 


(EQU) 


0006 


0006 


DAITYP 




0096 0060 


DAIST 




Alphabetical list of 


fields in 


CHADAI 


















FIELD 


DEC 


HEX 




FIELD 


DEC 


HEX 




FIELD 


DEC HEX 






DAIBEG 


0000 


0000 




DAIFG 


0007 


0007 




DAIPEB 


0000 0000 






DAI CAW 


0012 


oooc 




DAIFLG 


0004 


0004 




DAIPI 


0004 0004 


(EQU) 




DAICC 


0000 


0000 




DAIFS 


0006 


0006 


(EQU) 


DAIPSN 


0005 0005 






DAICCW 


0008 


0008 




DAIF3 


0006 


0006 




DAISA 


0000 0000 






DAICH 


0004 


0004 


(EQU) 


DAIGQE 


0008 


0008 




DAISAT 


0004 0004 






DAICNT 


0004 


0004 




DAIGRB 


0068 


0044 


(EQU) 


DAISK 


0004 0004 


(EQU) 




DAICP 


0006 


0006 


(EQU) 


DAIGRC 


0072 


0048 


(EQU) 


DAISL 


0004 0004 


(EQU) 




DAICS 


0006 


0006 


(EQU) 


DAIGRD 


0076 


004C 


(EQU) 


DAISNS 


0088 0058 






DAICTN 


0006 


0006 




DAIGRE 


0016 


0010 


(EQU) 


DAISR 


0002 0002 






DAICUB 


0007 


0007 




DAIHA 


0004 


0004 




DAISS 


0006 0006 


(EQU) 




DAI DA 


0001 


0001 




DAIID 


0006 


0006 




DAIST 


0096 0060 






DAI DC 


0004 


0004 


(EQU) 


DAIIGN 


0005 


0005 




DAISV 


0016 0010 






DAIDIS 


0004 


0004 




DAIIN 


0000 


0000 




DAITYP 


0006 0006 






DAIENT 


0012 


OOOC 




DAIPCB 


0016 


0010 




DAIWC 


0006 0006 


(EQU) 




DAIFA4 


0005 


0005 




DAIPCN 


0000 


0000 




DAIWK1 


0080 0050 






DAIFC 


0006 


0006 


(EQU) 


DAIPE 


0006 


0006 


(EQU) 


DAIWK2 


0084 0054 
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Assembler listing of CHADAI 



LOCATION INSTRUCTION SOURCE INST OPER 



COMMENT 



21 00000 



21 00000 
21 00000 
21 00004 

21 00004 

21 00005 

21 00006 
21 00007 
21 00008 

21 O0O0C 

21 00010 



21 00010 



21 00044 



21 00048 



21 0004C 



21 00050 

21 00054 
21 00058 



CHADAI 

* 

DAI BEG 

DAIPEB 

DAI SAT 

* 

DAIDIS 

* 

DAIPSN 

* 

DAITYP 

DAI CUB 

DA1CCW 

* 

DAIEKT 

* 

DAISV 

* 
DAIGRE 

DAIGRB 

* 

DAIGRC 

DAIGRD 

DAIWK1 

* 
* 

DAIWK2 

* 
DAISNS 



DSECT 



DS 



DS 



DS 



DS 

DS 

DS 
DS 
DS 

DS 

DS 



EQU 
EQU 
EQU 



DIRECT ACCESS INTERFACE 

CONTROL BLOCK 

ALIGN TABLE ON WORD 

BOUNDARY 

POINTER TO PAGING ERROR 

CONTROL BLOCK 

CONTROL INFORMATION FOR 

CYLINDER SEGMENTATION OF 
CHANNEL PROGRAM AND OTHER CODES 
AND COUNTS. 

DISPLACEMENT TO NEXT SAT 

ENTRY-MODULO 8- 

NEXT CHANNEL PROGRAM 

SEGMENT NUMBER 

DEVICE TYPE CODE 

START I/O RETRY COUNT 

POINTER TO DAIB CHANNEL 

PROGRAM - DAICC - 
F POINTER TO DAIB ENTRY 

HEADER - DAIIN - 
16F GENERAL REGISTER SAVE AREA 

FOR ROUTINES CALLED BY 
THE DIRECT ACCESS PAGING 
ROUTINES. 
DAISV 



OF 



OF 



XL1 

XL1 

XL1 
XL1 

F 



DAISV+5 2 



DAISV+56 



EQU DAISV+60 



DS 



DS 



DS 



GPR-14 SAVE AREA WHEN 

CALLING CEABQ 

CONTAINS LOCATION-ON-QUEUE 

FOR CEABQ 

CONTAINS ADDRESS OF CSW FOR 

CEABQ 

CONTAINS ADDRESS OF 

INTERRUPT CODE FOR CEABQ 

USED TO SAVE SIO RETURN 

PARAMETERS AND TO CONSTRUCT 

A CSW COMMAND ADDRESS ON SIO 

FAILURE. 

USED TO CONSTRUCT STATUS 
FIELD ON SIO FAILURE 
SENSE OPERATION CHANNEL 
PROGRAM AREA 
AREA - BEGINNING OF SEEK 



♦ ♦ END OF FIXED LENGTH 
♦AND SEARCH 

♦ ♦ ARGUMENT TABLE - SAT TABLE - CONTAINS ONE 8 
♦BYTE ENTRY FOR 

♦♦ EACH PAGING OPERATION TO BE PERFORMED. THIS 

♦SUBSECTION IS 

♦ 



21 00060 

21 00000 

21 00002 

21 00004 

21 00006 
21 00007 



21 00000 



21 00000 



21 00000 
21 00001 
21 00004 
(Listing 



of CHADAI 



♦ VARIABLE IN LENGTH. 
DAIST DS_ 2F FIRST SAT ENTRY 

| ORG | DAIBEG ANY SAT ENTRY 
DAISA DS 2C HIGH ORDER SEEK ARGUMENT - 

♦ BIN/BIN - 

DAISR DS 2C HIGH ORDER SEARCH ARGUMENT 

♦ - CYLINDER/CYLINDER - 
DAIHA DS 2C HIGH ORDER HEAD ADDRESS - 

♦ HEAD/HEAD - 
DAI ID DS C RECORD ID 

DAIFG DS XL1 CHANNEL PROGRAM SEGMENT 

♦ NUMBER 

♦ ♦ END OF SAT TABLE AREA.- THIS SUBSECTION 
♦CONTAINS THE CHANNEL 

♦ ♦ PROGRAM, IS ALSO VARIABLE IN LENGTH AND CAN 
♦BE ADDRESSED BY 

♦♦ USING THE CONTENTS OF THE - DAICCW - FIELD AS 
♦A BASE ADDR ESS . 

{ ORG | DAIBEG ANY CHANNEL COMMAND WORD 
DAICC DS XL1 COMMAND CODE 
DAIDA DS XL3 DATA ADDRESS 
DAIFLG DS XL1 FLAGS 
continued on page 112) 



CHADAI 111 



(Listing of CHADAI continued from page 111) 



LOCATION INSTRUCTION 
21 00004 
00000080 
21 00004 
00000040 
21 00004 
00000020 
21 00004 
00000010 
21 00004 
00000008 

21 00005 

21 00006 



21 00000 



21 00000 

21 00004 
21 00005 

21 00006 



21 00006 
00000080 
21 00006 
00000040 
21 00006 

00000020 
21 00006 

00000010 
21 00006 
00000008 
21 00006 

00000004 
21 00006 

00000002 



21 00007 
21 00008 
21 0000C 
21 00010 

21 00000 



SOURCE 

DAI DC 

DAIDCM 

DAICH 

DAICHM 

DAISL 

DAISLM 

DAISK 

DAISKM 

DAI PI 

DAIPIM 

DAIIGN 

DAICTN 



INST OPER 



EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

DS 

DS 



DAIFLG 

X^O' 

DAIFLG 

X^O^ 

DAIFLG 

X^O' 

DAIFLG 

X'lO' 

DAIFLG 

X'08 i 

C 

XL2 



COMMENT 
DATA CHAIN 



COMMAND CHAIN 



SUPPRESS INCORRECT LENGTH 



SKIP 



PROGRAM CONTROL INTERRUPT 



FIELD IS IGNORED 
COUNT 

♦ ♦ END OF CHANNEL PROGRAM SUBSECTION - THE 
♦FOLLOWING AREA OF THE 

♦* DAIB CONSISTS OF A ENTRY HEADER AND POINTERS 
♦TO EACH PCB ENTRY. 

♦ * THE SUBSECTION IS VARIABLE IN LENGTH AND CAN 
♦BE ADDRESSED BY 

♦* USING THE CONTENTS OF THE - DAIENT - FIELD AS 
♦A BASE ADDRESS. 



21 00000 



DAIIN 

DAICNT 
DAIFA4 

DAIF3 

DAIFS 

DAIFSM 

DAIWC 

DAIWCM 

DAIPE 

# 

DAIPEM 
DAIFC 

# 

DAIFCM 
DAICP 
DAICPM 
DAISS 

* 

DAISSM 
DAICS 

DAICS M 

DAIGQE 
DAICAW 
DAI PCB 

DAIPCN 



| ORG( 
DS 

DS 
DS 

DS 

EQU 
EQU 
EQU 
EQU 
EQU 

EQU 

EQU 

EQU 
EQU 
EQU 
EQU 

EQU 
EQU 



DAIBEG 
F 

XL1 
XL1 

XL1 

DAIF3 

X'80 f 

DAIF3 

X'40 f 

DAIF3 

X'20 f 
DAIF3 

X f 10" 
DAIF3 
X f 08' 
DAIF3 

X'04' 
DAIF3 




DAIB ENTRY HEADER 

POINTER TO NEXT PCB ENTRY 

TO BE POSTED 

NUMBER OF DAIB ENTRIES 

NUMBER OF REMAINING ENTRIES 

TO BE POSTED 

OTHER FLAGS 

FIRST SEEK FLAG 

WRITE CHECK OPTION SELECTED 



PAGING ERROR 
PROGRESS 



RECOVERY IN 



FIRST CHANNEL PROGRAM 
SEGMENT BUILT 

CHANNEL PROGRAM IS BUILT 

SENSE SIO ATTEMPT/BUSY 
RETURN 



CHAINING 
RETURN 



SIO ATTEMP/BUSY 



NOT USED 

POINTER TO GQE 

LAST ADDRESS USED AS CAW 

FIRST PCB ENTRY POINTER 

ANY PCB POINTER 
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MSAM Work Page CCHADBP) 

The MSAM Work Page (CHADBP) serves as the main work and communication area for the 
MSAM modules. It contains the Data Extent Block (CHADEB) built by MSAM OPEN, an 
Interrupt Control Block (CHAICB) and Communications Area for use in handling asynch- 
ronous interrupts, the fixed area of an Input/Output Request Control Block (CHAIOR) 
for use by MSAM POSTING, and Input/Output Request Control Block (CHAIOR) of maximum 
size, and an area into which the VISAM data sets SYSURS and SYSUCS may be read, plus 
other fields and flags for communication within and between the MSAM modules. 

A full page of virtual storage is allocated by MSAM OPEN for the MSAM Work Page. 
The protection class of this page is either user read-only or user-inaccessible. 

CHADBP Storage map 



DEC 




80 
88 



2008 
2016 
2024 
2032 



2104 
2112 
2120 



2200 



2296 
2304 



HEX 



®l 






RESERVED 


= 


50| 


1 

I 


DBPRCB | 


58 | 






RESERVED 


= 


7D8| 






DBPTIM 




7E0 J DBPABV 






i 
1 


DBPABR | 


7E8 I DBPRWV 






1 
I 


DBPRWR | 


7F0| 






UNNAMED 


= 


838 | DBPFCCW 






1 
1 


DBPDIS | 


840 | DBPSYME 






i 

1 


DBPASYME | 


848 | DBPTIDE 






1 
» 










UNNAMED 




8981 DBPASYM 1 
1 1 


DBPTID 


1 
1 










UNNAMED 




8F8|DBPPRDC |DBPPRSTR|DBPPRTRY 
i 1 1 


DBPALTP (DBPOPC 
1 1 


| DBPINSEL|DBPFLG1 I DBPBUSY | 
1111 


900 | DBPRT0 






1 










UNNAMED 
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DEC 
2392 



2432 

2448 
2456 



2672 
2680 



2736 
2744 

2760 
2808 



HEX 
958 



980 

990 
998 
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2536 


9E8 


2544 


9F0 


2552 


9F8 


2560 


A00 


2568 


A08 


2576 


A10 


2584 


A18 


2592 


A20 


2600 


A28 


2608 


A30 



A70 
A78 



ABO 
AB8 

AC 8 
AF8 



RESERVED 



RESERVED 



DBPIOF 



RESERVED 





DBPRKEY1 


(DBPRLIN1 

1 


| UNNAMED 
1 


UNNAMED (CONT) | 




DBPFORMN 




1 DBPCARRG 


DBPCHTRN 




UNNAMED 


| DBPDEN 
1 


UNNAMED 


|DBPFRMTP| 
1 » 


UNNAMED 


| DBPFOLD 

I 


UNNAMED | 

I 


DBPSTRK2 I 


UNNAMED 




UNNAMED (CONT) | 

1 




DBPUCSKY 






UNNAMED 








i 
1 


DBPRKEY2 





DBPRKEY2CCONT) | DBPRL IN 2 | UNNAMED 1 
J I I 



DBPAL0 



DBPRKEY3 



| DBPRLIN3 1 UNNAMED 



DBPAL60 



DBPRKEY4 



DBPRKEY4(CONT) | DBPRLIN 4 | UNNAMED | 
I l_ 



DBPAL120 



UNNAMED 



DBPCKEY1 



|DBPCLIN1 (UNNAMED 
J I 
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CCHADBP continued from page 11**) 



c 



DEC HEX 
2816 BOO 



2832 BIO 

2856 B28 

2872 B38 

2880 B40 



2944 B80 
2952 B88 



3008 
3016 



3080 
3088 



BC0 
BC8 



C08 
C10 



3144 C48 





DBPPRVER 






i 

1 






DBPTPVER 






UNNAMED 






I 

1 


DBPCKEY2 | 




DBPCKEY2 CCONT) | DBPCLIN2 | UNNAMED | 
1 1 1 






DBPBF0 






DBPCKEY3 


|DBPCLIN3 1 UNNAMED | 
1 I t 


= 


DBPBF60 






1 

1 


DBPCKEY4 | 




DBPCKEY4 (CONT) | DBPC LI N4 | UNNAMED | 
1 t 1 






DBPBF120 






DBPCKEY5 


|DBPCLIN5| UNNAMED | 
I I I 


1 


DBPBF180 






t 

i 






UNNAMED 





ORG DBPRT0 



2304 



900|DBPCR0 (DBPCR1 | DBPPR2 (DBPPR3 | 



± 



Fields in CHADBP — by displacement 

DEC HEX FIELD 

0000 0000 DBPDEB 

0088 0058 DBPRCB 

2008 07D8 DBPTIM 

2016 07E0 DBPABV 

2020 07 E4 DBPABR 

2024 07E8 DBPRWV 

2028 07 EC DBPRWR 

2104 0838 DBPFCCW 

(Continued on page 116) 



DEC 


HEX 


FIELD 


DEC 


HEX 


FIELD 


2108 


08 3C 


DBPDIS 


2297 


08F9 


DBPPRSTR 


2112 


0840 


DBPSYME 


2298 


08FA 


DBPPRTRY 


2116 


0844 


DBPASYME 


2299 


08FB 


DBPALTP 


2120 


0848 


DBPTIDE 


2300 


08FC 


DBPOPC 


2200 


0898 


DBPASYM 


2301 


08FD 


DBPINSEL 


2202 


089A 


DBPTID 


2302 


8FE 


DBPBLIP (EQU) 


2296 


08F8 


DBPPRDC 


2302 


08FE 


DBPCLIP (EQU) 


2296 


08F8 


DBPCTRS 


2302 


08FE 


DBPFLG1 

CHADBP 115 



(Continued from page 115) 



DEC 

2303 

2304 

2304 

2304 

2305 

2305 

2306 

2306 

2307 

2392 

2436 

2456 

2536 

2536 

2542 

2546 

2556 



HEX 

08FF 

09 00 

0900 

0900 

0901 

0901 

0902 

0902 

0903 

0958 

0984 

0998 

09E8 

09 E8 

09EE 

09 F2 

09FC 



FIELD 

DBPBUSY 

DBPCRO 

DBPPRO 

DBPRTO 

DBPCR1 

DBPPR1 

DBPPR2 

DBPCR2 

DBPPR3 

DBPACB 

DBPACOM 

DBPIOF 

DBPRKEY1 

DBPURS 

DBPRLIN1 

DBPFORMN 

DBPCARRG 



DEC 

2560 

2567 

(EQU) 2571 
2575 
2578 

(EQU) 2586 
2604 

(EQU) 2610 
2612 
2672 
2678 
2680 
2740 
2746 
2748 
2808 
2808 



HEX 

0A00 

0A07 

OAOB 

OAOF 

0A12 

0A1A 

0A2C 

0A32 

0A34 

0A70 

0A76 

0A78 

0AB4 

OABA 

OABC 

OAF 8 

0AF8 



FIELD 

DBPCHTRN 

DBPDEN 

DBPFRMTP 

DBPFOLD 

DBPSTRK2 

DBPUCSKY 

DBPRKEY2 

DBPRLIN2 

DBPALO 

DBPRKEY3 

DBPRLIN3 

DBPAL60 

DBPRKEY4 

DBPRLIN4 

DBPAL120 

DBPCKEY1 

DBPUCS 



DEC 


HEX 


FIELD 


2814 


OAFE 


DBPCLIN1 


2816 


0B00 


DBPPRVER 


2836 


0B14 


DBPTPVER 


2876 


0B3C 


DBPCKEY2 


2882 


0B42 


DBPCLIN2 


2884 


0B44 


DBPBFO 


2944 


OB80 


DBPCKEY3 


2950 


0B86 


DBPCLIN3 


2952 


0B88 


DBPBF60 


3012 


0BC4 


DBPCKEY4 


3018 


OBCA 


DBPCLIN4 


3020 


OBCC 


DBPBF120 


3080 


0C08 


DBPCKEY5 


3086 


OCOE 


DBPCLIN5 


3088 


0C10 


DBPBF180 



Alphabetical list of fields in CHADBP 



FIELD DEC H| 

DBPABR 2020 07 

DBPABV 2016 07 

DBPACB 2392 09 

DBPACOM 24 36 09 

DBPALTP 2299 08 

DBPALO 2612 OP 

DBPAL120 2748 OP 

DBPAL60 2680 OA 

DBPASYM 2200 08 

DBPASYME 2116 08 

DBPBFO 2884 OE 

DBPBF120 3020 OE 

DBPBF180 3088 OC 

DBPBF60 2952 OE 

DBPBLIP 2302 08 

DBPBUSY 2303 08 

DBPCARRG 2556 09 

DBPCHTRN 2560 OS 

DBPCKEY1 2808 OP 

DBPCKEY2 2876 OE 

DBPCKEY3 2944 01 

DBPCKEY4 3012 OE 

DBPCKEY5 3080 OC 

DBPCLIN1 2814 OP 

DBPCLIN2 2882 0£ 

Assembler listing of CHADBP 



FIELD DEC HEX 
DBPCLIN3 2950 0B86 
DBPCLIN4 3018 OBCA 
DBPCLIN5 3086 OCOE 
DBPCLIP 2302 08FE 
DBPCRO 2304 0900 
DBPCR1 2305 0901 
DBPCR2 2306 0902 
DBPCTRS 2296 08F8 
DBPDEB 0000 0000 
DBPDEN 2567 0A07 
DBPDIS 2108 083C 
DBPFCCW 2104 0838 
DBPFLG1 2302 08FE 
DBPFOLD 2575 OAOF 
(EQU) DBPFORMN 2546 09F2 
DBPFRMTP 2571 OAOB 
DBPINSEL 2301 08FD 
DBPIOF 2456 0998 
DBPOPC 2300 08FC 
DBPPRDC 2296 08F8 
DBPPRSTR 2297 08F9 
DBPPRTRY 2298 08FA 
DBPPRVER 2816 OB 00 
DBPPRO 2304 0900 
DBPPR1 2305 0901 



FIELD 
DBPPR2 
DBPPR3 
DBPRCB 

(EQU) DBPRKEY1 
DBPRKEY2 
DBPRKEY3 

(EQU) DBPRKEY4 
DBPRLIN1 
DBPRLIN2 
DBPRLIN3 
DBPRLIN4 
DBPRTO 
DBPRWR 
DBPRWV 
DBPSTRK2 
DBPSYME 
DBPTID 
DBPTIDE 
DBPTIM 
DBPTPVER 
DBPUCS 
DBPUCSKY 
DBPURS 

(EQU) 

(EQU) 



LOCATION INSTRUCTION SOURCE INST OPER COMMENT 
23 00000 CHADBP DSECT 

* *** NOTE THAT THE FOLLOWING 5 EQUATES MAY CHANGE AS THE SIZES OF **• 

* *♦♦ THEIR RESPECTIVE CONTROL BLOCKS CHANGE *** 



00000054 
0000002C 
00000010 
00000050 

00000780 



23 00000 



23 00054 



23 00058 



23 007D8 



23 007D8 



23 007E0 



DBPDEBSZ EQU 

DBPICBSZ EQU 

DBPCMASZ EQU 

DBPIOFSZ EQU 

DBPIORSZ EQU 



DBPDEB 

DBPRCB 

DBPTIM 

* 

DBPABV 



DS 




DS 



X , 54 i 
44 
16 
X^O' 

1920 
OD 

♦+DBPDEBSZ 
OD 



SIZE OF DEB (DEBSZ1) 

SIZE OF ICB 

SIZE OF COMMUNICATIONS AREA 

SIZE OF FIXED AREA OF IORCB 

(IORFAS) 

MAXIMUM SIZE OF IORCB 

DEB AREA r DBPDEBSZ BYTES IN 

LENGTH 

IORCB AREA, DBPIORSZ BYTES 
IN LENGTH 



♦♦DBPIORSZ 



TIME IN MICROSECONDS 
BETWEEN ALIGNMENT MESSAGES 
POINTER (ADCON) TO ABEND 
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LOCATION INSTRUCTION SOURCE 
23 007E4 DBPABR 

23 007E8 DBPRWV 

23 007EC DBPRWR 

* 

23 007F0 
23 00838 

23 0083C 

23 00840 

23 00844 

23 00848 
23 0084C 
23 00898 
23 0089A 
23 0089C 
23 008F8 
23 008F8 
23 008F9 
23 008FA 
23 008FB 

23 008FC 
23 008FD 

23 008FE 



23 008FE 
00000080 
23 008FE 

00000040 



23 008FF 
23 00900 

23 00900 

23 00901 

23 00902 

23 00903 
23 00904 
23 00958 

23 00984 

23 00998 



23 00900 
23 00900 
23 00901 
23 00902 

23 00984 
23 00994 
23 009E8 



DBPFCCW 

DBPDIS 

DBPSYME 

DBPASYME 

DBPTIDE 

DBPASYM 
DBPTID 

DBPCTRS 

DBPPRDC 

DBPPRSTR 

DBPPRTRY 

DBPALTP 

DBPOPC 
DBPINSEL 

* 

DBPFLG1 
DBPCLIP 
DBPCLIPM 
DBPBLIP 

DBPBLIPM 

* 

DBPBUSY 

DBPRT0 

DBPCR0 
DBPPR0 
DBPCR1 
DBPPR1 
DBPPR2 
DBPCR2 
DBPPR3 

DBPACB 

DBPACOM 

DBPIOF 



INST OPER 



DS 

DS 

DS 

DS 
DS 

DS 

DS 

DS 

DS 
DS 
DS 
DS 
DS 
DS 
DS 
DS 
DS 
DS 

DS 
DS 

DS 

EQU 
EQU 
EQU 

EQU 

DS 
DS 

1 QRG 1 
DS 
EQU 
DS 
EQU 
DS 
EQU 
DS 
DS 
DS 

[ ORG ! 
DS 



(ADCON) TO ABEND 



23 009E8 
23 009E8 

23 009E8 
23 009EE 
23, 009EF 
23 009F2 
23 009FC 
23 OOA0O 
23 00A04 
23 00A07 
(Listing 



DBPURS 

* 

DBPRKEY1 
DBPRLIN1 

DBPFORMN 
DBPCARRG 
DBPCHTRN 

DBPDEN 
of CHADBP continued 



9D 
F 



CL4 

CL4 

CL4 
19F 

H 

H 

46H 

OF 

XUL 

XL1 

XL1 

XL1 

XL1 
CL1 

XL1 
DBPFLG1 

x'so' 

DBPFLG1 

X'40 - 

CL1 

F 

DBPPT0 

CL1 

DBPCR0 

CL1 

DBPCR1 

CL1 

DBPPR2 

CL1 

XL84 

0D 



COMMENT 

ENTRY 

POINTER 

PSECT 

POINTER (ADCON) TO MSAM 

READ/WRITE ENTRY 

POINTER (ADCON) TO MSAM 

READ/WRITE PSECT 

RESERVED FOR FUTURE USE 

VIRTUAL MEMORY ADDRESS OF 

FAILING CCW 

DISPLACEMENT (MOD 8) TO 

FAILING CCW FROM START OF IORCB 

EBCDIC FORM OF SYMBOLIC 

DEVICE ADDRESS 

EBCDIC FORM OF ASSOCIATED 

CARD READER ON 2540 

EBCDIC FORM OF TASK ID 

RESERVED FOR FUTURE USE 

ASSOCIATED 2540 DEVICE 

TASK ID 

RESERVED FOR FUTURE USE 

PRINTER DATA CHECK COUNTER 

PRINTER STRIKEOUT COUNTER 

PRINTER RETRY COUNTER 

ALTERNATE PATH RETRY 

COUNTER 

OP CODE OF FAILING CCW 

INITIAL SELECTION SENSE 

BYTE 

FLAG BYTE 

CLOSE IN PROCESS FLAG 

CLOSE IN PROCESS MASK 

PUNCHING BLANK CARD IN 

PROGRESS FLAG 

PUNCHING BLANK CARD IN 

PROGRESS MASK 

BUSY RETRY COUNT 

RETRY COUNTERS 

CHANNEL RETRY COUNTER 
PATH RETRY COUNTER 
BUS OUT COUNTER 



ERROR RETRY VALUE 

UNUSED ERROR RETRY COUNTER 

RESERVED FOR FUTURE USE 

ICB AREA,DBPICBSZ BYTES IN 

LENGTH 



♦+DBPICBSZ 
OF 




COMMUNICATION AREA 
ICB,DBPCMASZ BYTES 



FOR 

IN LENGTH 



♦+DBPCMASZ 



♦+DBPIOFSZ 
0D 



FIXED AREA OF IORCB FOR 
POSTING f DBPIOFSZ BYTES LONG 



ALIGN AND DEFINE START OF 

URS AREA, AREA SIZE — 4X68 

SYSURS KEY 

SYSURS LINE NUMBER 'l* 

SYSURS RESERVED 

SYSURS FORM NUMBER 

SYSURS CARRIAGE TAPE NUMBER 

SYSURS CHAIN/TRAIN NUMBER 

SYSURS RESERVED 

SYSURS DENSITY 



on page 118) 
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(Listing of CHADBP continued from page 117) 



LOCATION 


INSTRUCT I( 
O0O000F6 


>N SOURCE 
DBPDEN6 


INST 
EQU 


OPER 




C - 6' 




000000F8 


DBPDEN8 


EQU 


C f 8' 


23 00A08 






DS 


CL3 


23 OOAOB 




DBPFRMTP 


DS 


CL1 




O00000C4 


DBPFRMD 


EQU 


C'D - 




000000C6 


DBPFRMF 


EQU 


ptpt 




000000E2 


DBPFRMS 


EQU 


C f S f 


23 OOAOC 






DS 


CL3 


23 00A0F 




DBPFOLD 


DS 


CL1 




OOOOO0C6 


DBPFOLDF 


EQU 


c t F t 




000000E4 


DBPFOLDU 


EQU 


C'U* 


23 O0A10 






DS 


CL2 


23 00A12 




DBPSTRK2 


DS 


CL2 


23 00A14 






DS 


CL6 


23 O0A1A 




DBPUCSKY 

* 


DS 


CL6 


23 00A20 




DS 


CL12 


23 00A2C 




DBPRKEY2 


DS 


CL6 


23 00A32 




DBPRLIN2 


DS 


CL1 


23 00A33 






DS 


CL1 


23 00A34 




DBPALO 


DS 


CL6 


23 OOA70 




DBPRKEY3 


DS 


CL6 


23 00A76 




DBPRLIN3 


DS 


CL1 


23 00A77 






DS 


CL1 


23 O0A78 




DBPAL60 

* 
DBPRKEY4 


DS 


CL60 


23 00AB4 




DS 


CL6 


23 OOABA 




DBPRLIN4 


DS 


CL1 


23 OOABB 






DS 


CL1 


23 00 ABC 




DBPAL120 


DS 


CL12 


23 00AC8 






DS 


CL48 


23 00AF8 






DS 


OD 


23 00AF8 




DBPUCS 


DS 


OD 


23 00AF8 




DBPCKEY1 


DS 


CL6 


23 OOAFE 




DBPCLIN1 


DS 


CL1 


23 OOAFF 






DS 


CL1 


23 OOBOO 




DBPPRVER 


DS 


CL20 


23 O0B14 




DBPTPVER 


DS 


CL20 


23 00B28 






DS 


CL20 


23 00B3C 




DBPCKEY2 


DS 


CL6 


23 00B42 




DBPCLIN2 


DS 


CL1 


23 00B43 






DS 


CL1 


23 00B44 




DBPBFO 


DS 


CL60 


23 00B80 




DBPCKEY3 


DS 


CL6 


23 00B86 




DBPCLIN3 


DS 


CL1 


23 00B87 






DS 


CL1 


23 00B88 




DBPBF60 
DBPCKEY4 


DS 


CL60 


23 00BC4 




DS 


CL6 


(Listing 


Of CHADBP 


continued < 


on page 119) 



COMMENT 

SYSURS DENSITY 6 LINES PER 

INCH 

SYSURS DENSITY 8 LINES PER 

INCH 

SYSURS RESERVED 

SYSURS FORM TYPE CODE 

SYSURS FORM TYPE DUMP MODE 

SYSURS FORM TYPE FORM 

SENSITIVE 

SYSURS FORM TYPE SEQUENCE 

SENSITIVE 

SYSURS RESERVED 

SYSURS UCS FOLDING CODE 

SYSURS FOLDED 

SYSURS UNFOLDED 

SYSURS RESERVED 

SYSURS UCS STRIKE OUT CODE 

SYSURS RESERVED 

SYSURS UCS BUFFER LOAD KEY 

FOR READING SYSUCS 

SYSURS RESERVED 

SYSURS KEY 

SYSURS LINE NUMBER *2* 

SYSURS RESERVED 

SYSURS FIRST 60 BYTES OF 

ALIGNMENT MESSAGE 

SYSURS KEY 

SYSURS LINE NUMBER f 3" 

SYSURS RESERVED 

SYSURS SECOND 60 BYTES OF 

ALIGNMENT MESSAGE 

SYSURS KEY 

SYSURS LINE NUMBER ' 4 • 

SYSURS RESERVED 

SYSURS LAST 12 BYTES OF 

ALIGNMENT MESSAGE 

SYSURS RESERVED 

ALIGN AND DEFINE START OF 

UCS AREA. AREA SIZE 5X68 

SYSUCS KEY 

SYSUCS LINE NUMBER ' l f 

SYSUCS RESERVED 

SYSUCS VERIFICATION MESSAGE 

FOR PRINTER 

SYSUCS VERIFICATION MESSAGE 

FOR TYPEWRITER 

SYSUCS RESERVED 

SYSUCS KEY 

SYSUCS LINE NUMBER '2' 

SYSUCS RESERVED 

SYSUCS FIRST 60 BYTES OF 

240 BYTE BUFFER LOAD 

SYSUCS KEY 

SYSUCS LINE NUMBER , 3 i 

SYSUCS RESERVED 

SYSUCS SECOND 60 BYTES OF 

240 BYTE BUFFER LOAD 

SYSUCS KEY 



t 



118 CHADBP 



(Listing of CHADBP continued from page 118) 



LOCATION INSTRUCTION SOURCE INST OPER 

23 OOBCA DBPCLIN4 DS CL1 

23 OOBCB DS CL1 

23 OOBCC DBPBF120 DS CL60 

23 00C08 DBPCKEY5 DS CL6 

23 OOCOE DBPCLIN5 DS CLl 

23 OOCOF DS CLl 

23 00C10 DBPBF180 DS CL60 

23 00C4C DS 237F 



COMMENT 

SYSUCS LINE NUMBER •**• 

SYSUCS RESERVED 

SYSUCS THIRD 60 BYTES OF 

240 BYTE BUFFER LOAD 

SYSUCS KEY 

SYSUCS LINE NUMBER • 5" 

SYSUCS RESERVED 

SYSUCS LAST 60 BYTES OF 240 

BYTE BUFFER LOAD 

RESERVED FOR FUTURE USE 
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Data Control Block (CHADCB) 



The Data Control Block Table (DCB) represents the basic reference block for all 
I/O operations and provides the principal means of achieving device independent cod- 
ing. The DCB macro instruction, used as a basis for table construction, is common to 
all of the data management access methods supported by TSS. The DCB macro instruc- 
tion is primarily used to reserve space for the DCB table. 

The maximum DCB area is reserved in virtual storage without regard to specifica- 
tion of parameters in the DCB macro instruction. Since no parameters need be speci- 
fied as operands in the DCB macro, the user can utilize any access method without 
modifying his object program. Once a parameter is specified in the DCB macro, howev- 
er, the parameter cannot be altered except by the user's object program. Therefore, 
parameters which are likely to change should be omitted. These parameters should be 
provided through one of the first four of the following six sources of the DCB table. 
1. User's problem program prior to execution of the OPEN macro 

DDEF commands 

Tables — DSCBs or tape labels 

DCB exit 

DCB macro instruction 

Service programs 
The DCB table consists of seven sections: 
1. DCB common section 

DCB SAM section 

DCB QS AM section 

DCB VAM section 

DCB IOREQ section 

DCB MS AM section 

DCB TAM section 
The DCB table occupies up to 200 bytes of virtual storage, 
boundaries. 



2. 
3. 

4. 

5. 
6. 



2. 
3. 
4. 
5. 
6. 
7. 



aligned on doubleword 



CHADCB Storage map 



DEC 



8 

16 

24 

32 

40 

48 

56 

64 

72 

80 

88 

96 

104 

112 

120 



HEX 


8 

10 

18 

20 

28 

30 

38 

40 

48 

50 

58 

60 

68 

70 

78 



| DCBDSO 


1 


DCBMAC | 


DCBEXL 




| DCBDDN | 




DCBSYV 






DCBSYR 






DCBEOV 






DCBEOR 




| DCBBUF 


) DCBDEV 

1 


| DCBBUN | 
I i 


DCBBCN 




| DCBBFT | DCBNCP | DCBREC 
I 1 1 


| DCBOPT | 
1 1 


DCBLRE 




| DCBBLK 


| DCBDD1 

1 


| DCBDD2 I DCBERO 
I I 


|DCBPAD | DCBRKP ( 
1 1 1 




DCBLPA 




| DCBEX1 


| DCBEX2 | DCBOPI 
I 1 


| DCBOFG | 
1 1 




DCBMSK 






DCB ID 






DCBCON 






DCBDEB 




|DCBLEN |DCBIFL I 
t 1 1 


DCBMCD | 


DCBIMK 






DCBGTV 






DCBGTR 






DCBPTV 






DCBPTR 






DCBPXV 






DCBPXR 






DCBSLV 






DCBSLR 






DCBBKC 




|DCBS0 


|DCBS1 |DCBPR 
i t 


|DCBBOF | 
1 1 
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DEC HEX 
128 



136 

i^a 

152 
160 
168 
176 
184 
192 

ORG DCBMAC 

2 2 

ORG DCBDD1 

50 32 

ORG DCBDD1 

50 32 

ORG DCBDD1 

50 32 

ORG DCBDD1 



80| 
I 


DCBRDN 


| DCBRDM | 
i I 


DCBRDB 


1 


DCBRDC 


1 
i 


DCBRDH 


88 I 

I 








DCBCSW 










90[ 

| 




DCBRCD 




1 

I 






DCBEAD 




98 | 
I 




DCBLX 




1 

\ 


DCBLXN 


I 

1 


DCBBSV 


A0| 
1 




DCBLAD 




1 

I 






DCBDE1 




A8| 
1 




DCBDE2 




I 






DCBDE3 




B0i 
i 




DCBBF1 




I 

1 






DCBBF2 




B8| 
1 




DCBBF3 




1 
1 


DCBLRS 


1 
i 


DCBSVL 


C0| 

1 




DCBQWK 




(DCBQF0 
1 


| DCBQF1 | DCBQF2 1 DCBQF3 
1 1 1 



50 



32 



I DCBA0 



| DCBKEY 



i DCBPRT 



| DCBSTA 



DCBA8 



| DCBCOD 
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CHADCB 121 



DEC HEX 
ORG DCBDD2 



CCHADCB continued from page 121) 



51 33 

ORG DCBDD2 

51 33 

ORG DCBEX1 



I DCBMOD 



| DCBTRT 



60 



3C 



ORG DCBMSK 



64 4 1 DCBMA | DCBMI | DCBMQ | DCBMY 
I I I f 



ORG DCBMCD 



82 



52 



ORG DCBIMK 



84 



54 



ORG DCBRDH 



134 



86 



ORG DCBBKC 



120 
128 



78 1 

L 

80| 



ORG DCBOP 



DCBN 



[DCBMCD1 1DCBUS 
1 I 



DCBLPN 



DCBIA IDCBIJ (DCBIR | DCBIZ 
I I I 



t DCBRDR | DCBRDZ 
I I 



DCBVMA 



DCBDPN 



DCBCBP 



DCBM 



DCBOP 



132 
136 
144 
152 
160 



84 

88| 

i 
90 | 

I 
98 1 

I 
A0[ 









| DCBOPF | DCBOPM | DCBI 
1 1 1 


| DCBHV | 
1 1 


DCBNI 


| DCBSHC | DCBSWT 
1 1 


1 

1 


DCBSP 






DCBSC 




1 

1 


DCBHD 




DCBNPO 


1 

1 


DCBFPO 


| DCBBPU 

1 


(DCBHLB 

1 


| DCBLOF | 
I 1 




DCBPRL 




1 
1 


DCBBP 
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CCHADCB continued from page 122) 



DEC HEX 
ORG DCBNPO 

152 
160 
168 
176 

ORG DCBB KC 

120 
128 
136 
144 
152 
160 

ORG DCBBKC 



98 | DCBPCC | 

1 


DCBOPC | 


A0| DCBCL | DCBCCL 
1 1 


DCBIOS 


|DCBPT | DCBCRL | 
1 1 i 


ASJDCBCRS |DCBRES |DCBPLM | DCBPMM 
\ 1 1 1" " 


DCBOLM 


| DCBASY | DCBFLAG | UNNAMED | 
till 


BO J DCBRK 
i 


DCBDMS | 



78| 
I 




DCBTMP 




DCBTCC | 


80 1 
I 




DCBLRL 




DCBHRL | 


88) 

I 


DCBSCC 


1 


UNNAMED 


DCBRBF I 


90 | 
I 




DCBWBF 




DCBCLE 1 


98| 
i 




DCBKNT 




DCBWCT 


| DCBNCN J 
1 I 


A0| 
1 




DCBDEC 




UNNAMED 


| DCBFLG I DCBNPL | 
1 1 1 



120 
128 

144 
152 
160 
168 
176 
184 
192 

ORG DCBBKC 



78 |DCBRETRY 
1 


1 DCB POC KE | DCBI NHMS 

1 


DCBCOMBI | 
1 1 






DCBICB 




80) 

L 


DCBLRMAX 


1 

1 


UNNAMED 










1 
L 










90) 
1. 






DCBLRC 


I 

1 






DCBEAP 




98 | 

L 






DCBPPT 


I 
1 


DCBRCX 


1 
1 


DCBCNT | 


A0| 

L 








UNNAMED 










A8| 






DCBCDE 


1 






DCBFDE 




B0| 
L 






DCBLDE 


1 

1 






DCBTDE 




B8| 
1. 






DCBUDE 


I DCBFRMTP 

1 


IDCBSTRIKJ 
1 1 


UNNAMED | 


C0| 

L 




UNNAMED (CONT) 


| DCBMSF1 
I 


|DCBMSF2 (DCBMSF3 (UNNAMED | 
1111 



120 



78| 



DCBSFS 



192 



COI 



i 
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DEC HEX 

ORG IHADCB+20 



CCHADCB continued from page 123) 



20 
24 



14 



18| 



DCBTRMAD 



DCBSOWA 



ORG IHADCB+68 



68 



44 



DCBSMSI 



ORG IHADCB+72 





























72 


48 | 

1 




DCBMSHI 






1 
I 




Fields 


in CHADCB 


— by displacement 












DEC 


HEX 


FIELD 




DEC 


HEX 


FIELD 




DEC 


HEX 


FIELD 






0000 


0000 


IHADCB 


(EQU) 


0042 


002A 


DCBRECFM 


(EQU) 


0061 


003D 


DCBX2F 


(EQU) 




0000 


0000 


DCBDSORG 


(EQU) 


0042 


00 2A 


DCBREC 




0061 


003D 


DCBX2E 


(EQU) 




0000 


0000 


DCBDSO 




0043 


002B 


DCBOPTCD 


(EQU) 


0061 


003D 


DCBX2D 


(EQU) 




0002 


0002 


DCBA0 




0043 


002B 


DCBOPT 




0061 


003D 


DCBX2C 


(EQU) 




0002 


0002 


DCBMACR 


(EQU) 


0044 


002C 


DCBLRE 




0061 


003D 


DCBX2B 


(EQU) 




0002 


0002 


DCBMACRF 


CEQU) 


0046 


002E 


DCBLRECL 


(EQU) 


0061 


003D 


DCBX2A 


(EQU) 




0002 


0002 


DCBA7 


(EQU) 


0048 


0030 


DCBBLKSI 


(EQU) 


0061 


003D 


DCBEX2 






0002 


0002 


DCBA6 


(EQU) 


0048 


0030 


DCBBLK 




0062 


003E 


DCBOPI 






0002 


0002 


DCBA5 


CEQU) 


0050 


0032 


DCBCOD 




0063 


003F 


DCBOFLGS 


(EQU) 




0002 


0002 


DCBA4 


(EQU) 


0050 


0032 


DCBSTA 




0063 


003F 


DCB07 


(EQU) 




0002 


0002 


DCBA3 


(EQU) 


0050 


0032 


DCBPRT 




0063 


003F 


DCB06 


(EQU) 




0002 


0002 


DCBA2 


(EQU) 


0050 


0032 


DCBKEY 




0063 


003F 


DCB05 


(EQU) 




0002 


0002 


DCBA1 


(EQU) 


0050 


0032 


DCBPTRSP 


(EQU) 


0063 


003F 


DCB04 


(EQU) 




0002 


0002 


DCBMAC 




0050 


0032 


DCBCODE 


(EQU) 


0063 


003F 


DCB03 


(EQU) 




0003 


0003 


DCBA8 




0050 


0032 


DCBKEYLE 


(EQU) 


0063 


003F 


DCB02 


(EQU) 




0003 


0003 


DCBAF 


(EQU) 


0050 


0032 


DCBSTACK 


(EQU) 


0063 


003F 


DCBOl 


(EQU) 




0003 


0003 


DCBAE 


(EQU) 


0050 


0032 


DCBDD1 




0063 


003F 


DCBO0 


(EQU) 




0003 


0003 


DCBAD 


(EQU) 


0051 


0033 


DCBTRT 




0063 


003F 


DCBOFG 






0003 


0003 


DCBAC 


(EQU) 


0051 


0033 


DCBMOD 




0064 


0040 


DCBMA 






0003 


0003 


DCBAB 


(EQU) 


0051 


0033 


DCBMODE 


(EQU) 


0064 


0040 


DCBMH 


(EQU) 




0003 


0003 


DCBAA 


(EQU) 


0051 


0033 


DCBTRTCH 


(EQU) 


0064 


0040 


DCBMG 


(EQU) 




0003 


0003 


DCBA9 


(EQU) 


0051 


0033 


DCBDD2 




0064 


0040 


DCBMF 


(EQU) 




0004 


0004 


DCBEXLST 


(EQU) 


0052 


0034 


DCBEROPT 


(EQU) 


0064 


0040 


DCBME 


(EQU) 




0004 


0004 


DCBEXL 




0052 


0034 


DCBER3 


(EQU) 


0064 


0040 


DCBMD 


(EQU) 




0008 


0008 


DCBDDNAM 


(EQU) 


0052 


0034 


DCBER2 


(EQU) 


0064 


0040 


DCBMC 


(EQU) 




0008 


0008 


DCBDDN 




0052 


0034 


DCBER1 


(EQU) 


0064 


0040 


DCBMB 


(EQU) 




0016 


0010 


DCBSYNAD 


(EQU) 


0052 


0034 


DCBERO 




0064 


0040 


DCBMSK 






0016 


0010 


DCBSYV 




0053 


0035 


DCBPAD 




0065 


0041 


DCBMI 






0020 


0014 


DCBTRMAD 




0054 


0036 


DCBRKP 




0065 


0041 


DCBMP 


(EQU) 




0020 


0014 


DCBBUFRQ 




0056 


0038 


DCBLP 


(EQU) 


0065 


0041 


DCBMO 


(EQU) 




0020 


0014 


DCBSYR 




0056 


0038 


DCBLPA 




0065 


0041 


DCBMN 


(EQU) 




0024 


0018 


DCBSOWA 




0060 


003C 


DCBLPN 




0065 


0041 


DCBMM 


(EQU) 




0024 


0018 


DCBEODAD 


(EQU) 


0060 


003C 


DCBEXCD1 


(EQU) 


0065 


0041 


DCBML 


(EQU) 




0024 


0018 


DCBEOV 




0060 


003C 


DCBX6 


(EQU) 


0065 


0041 


DCBMK 


(EQU) 




0028 


001C 


DCBEOR 




0060 


003C 


DCBX5 


(EQU) 


0065 


0041 


DCBMJ 


(EQU) 




0032 


0020 


DCBBUFL 


(EQU) 


0060 


003C 


DCBX4 


(EQU) 


0066 


0042 


DCBMQ 






0032 


0020 


DCBBUF 




0060 


003C 


DCBX3 


(EQU) 


0066 


0042 


DCBMX 


(EQU) 




0034 


0022 


DCBDEVT 


(EQU) 


0060 


003C 


DCBX2 


(EQU) 


0066 


0042 


DCBMW 


(EQU) 




0034 


0022 


DCBDEV 




0060 


003C 


DCBX1 


(EQU) 


0066 


0042 


DCBMV 


(EQU) 




0035 


0023 


DCBBUFNO 


(EQU) 


0060 


003C 


DCBEX1 




0066 


0042 


DCBMU 


(EQU) 




0035 


0023 


DCBBUN 




0061 


003D 


DCBEXCD2 


(EQU) 


0066 


0042 


DCBMT 


(EQU) 




0036 


0024 


DCBBUFCB 


(EQU) 


0061 


00 3D 


DCBX2K 


(EQU) 


0066 


0042 


DCBMS 


(EQU) 




0036 


0024 


DCBBCN 




0061 


003D 


DCBX2J 


(EQU> 


0066 


0042 


DCBMR 


(EQU) 




0040 


0028 


DCBBFTEK 


(EQU) 


0061 


003D 


DCBX2I 


(EQU) 


0067 


0043 


DCBMY 






0040 


0028 


DCBBFT 




0061 


003D 


DCBX2H 


(EQU) 


0067 


0043 


DCBMS 


(EQU) 




0041 


0029 


DCBNCP 




0061 


003D 


DCBX2G 


(EQU) 


0067 


0043 


DCBM4 


(EQU) 




(Continued on page 
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DEC 


HEX 


FIELD 




DEC 


HEX 


FIELD 


DEC 


HEX 


FIELD 




0067 


0043 


DCBM3 


(EQU) 


0122 


007A 


DCBINH 


(EQU) 0160 


00A0 


DCBDEC 




0067 


0043 


DCBM2 


CEQU) 


0123 


007B 


DCBCOMBI 


0160 


00A0 


DCBCL 




0067 


0043 


DCBM1 


(EQU) 


0123 


007B 


DCBCMB 


(EQU) 0160 


00A0 


DCBPRL 




0067 


0043 


DCBMO 


(EQU) 


0124 


007C 


DCBICB 


0160 


00A0 


DCBLAD 




0067 


0043 


DCBMZ 


(EQU) 


0124 


007C 


DCBTCC 


0162 


00A2 


DCBCCL 




0068 


0044 


DCBSMSI 




0124 


007C 


DCBDPN 


0164 


00A4 


DCBIOS 




0068 


0044 


DCBID 




0124 


007C 


DCBCPB 


0164 


00A4 


DCBBP 




0072 


0048 


DCBMSHI 




0124 


007C 


DCBS0 


0164 


00A4 


DCBDE1 




0072 


0048 


DCBCON 




0125 


007D 


DCBS1 


0165 


00A5 


DCBPT 




0076 


004C 


DCBDEBAD 


(EQU) 


0126 


007E 


DCBCBP 


0166 


00A6 


DCBFLG 




0076 


004C 


DCBDEB 




0126 


007E 


DCBQN 


(EQU) 0166 


00A6 


DCBCRL 




0080 


0050 


DCBLEN 




0126 


007E 


DCBQT 


(EQU) 0166 


00A6 


DCBI 01 


(EQU) 


0081 


0051 


DCBIFLG 


(EQU) 


0126 


007E 


DCBBN 


(EQU) 0166 


00A6 


DCBNCH 


(EQU) 


0081 


0051 


DCBIFLGS 


(EQU) 


0126 


007E 


DCBBT 


(EQU) 0167 


00A7 


DCBNPL 




0081 


0051 


DCBIFL 




0126 


007E 


DCBPR 


0168 


00A8 


DCBCDE 




0082 


0052 


DCBMCD1 




0127 


007F 


DCBBOF 


0168 


00A8 


DCBCRS 




0082 


0052 


DCBMCD 




0128 


0080 


DCBLRMAX 


0168 


00A8 


DCBDE2 




0083 


0053 


DCBUS 




0128 


0080 


DCBLRL 


0169 


00A9 


DCBRES 




0083 


0053 


DCBCH 


(EQU) 


0128 


0080 


DCBN 


0170 


00AA 


DCBPLM 




0084 


0054 


DCBIA 




0128 


0080 


DCBRDN 


0171 


OOAB 


DCBPMM 




0084 


0054 


DCBIMSK 


(EQU) 


0128 


0080 


DCBRD 


0172 


00 AC 


DCBFDE 




0084 


0054 


DCBII 


(EQU) 


0129 


0081 


DCBRDM 


0172 


OOAC 


DCBOLM 




0084 


0054 


DCBIH 


(EQU) 


0130 


0082 


DCBM 


0172 


00 AC 


DCBDE3 




0084 


0054 


DCBIG 


(EQU) 


0130 


0082 


DCBRDB 


0173 


OOAD 


DCBASY 




0084 


0054 


DCBIF 


(EQU) 


0132 


0084 


DCBHRL 


0174 


OOAE 


DCBFLAG 




0084 


0054 


DCBIE 


(EQU) 


0132 


0084 


DCBOPF 


0174 


OOAE 


DCBFMP 


(EQU) 


0084 


0054 


DCBIC 


(EQU) 


0132 


0084 


DCBOP 


0176 


00B0 


DCBLDE 




0084 


0054 


DCBIB 


(EQU) 


0132 


0084 


DCBRDC 


0176 


00B0 


DCBRK 




0084 


0054 


DCBIMK 




0132 


0084 


DCBRDT 


0176 


00B0 


DCBBF1 




0085 


0055 


DCBIJ 




0133 


0085 


DCBOPM 


0180 


00B4 


DCBTDE 




0085 


0055 


DCBIQ 


(EQU) 


0134 


0086 


DCBI 


0180 


00B4 


DCBDMS 




0085 


0055 


DCBIP 


(EQU) 


0134 


0086 


DCBRDR 


0180 


00B4 


DCBBF2 




0085 


0055 


DCBIO 


(EQU) 


0134 


0086 


DCBRDH 


0184 


00B8 


DCBUDE 




0085 


0055 


DCBIN 


(EQU) 


0135 


0087 


DCBHV 


0184 


00B8 


DCBBF3 




0085 


0055 


DCBIM 


(EQU) 


0135 


0087 


DCBRD Z 


0188 


OOBC 


DCBFRMTP 




0085 


0055 


DCBIL 


(EQU) 


0136 


0088 


DCBSCC 


0188 


OOBC 


DCBLRS 




0085 


0055 


DCBIK 


(EQU) 


0136 


0088 


DCBN I 


0189 


OOBD 


DCBSTRIK 




0086 


0056 


DCBIR 




0136 


0088 


DCBCSW 


0190 


OOBE 


DCBSVL 




0086 


0056 


DCBIY 


(EQU) 


0138 


008A 


DCBSHC 


0192 


00C0 


DCBQWK 




0086 


0056 


DCBIX 


(EQU) 


0139 


008B 


DCBSWT 


0196 


00C4 


DCBMSF1 




0086 


0056 


DCBIW 


(EQU) 


0140 


008C 


DCBRBF 


0196 


00C4 


DCBSWA 


(EQU) 


0086 


0056 


DCBIV 


(EQU) 


0140 


008C 


DCBSP 


0196 


00C4 


DCBRJE 


(EQU) 


0086 


0056 


DCBIU 


(EQU) 


0144 


0090 


DCBLRC 


0196 


00C4 


DCBNLP 


(EQU) 


0086 


0056 


DCBIT 


(EQU) 


0144 


0090 


DCBWBF 


0196 


00C4 


DCBELP 


(EQU) 


0086 


0056 


DCBIS 


(EQU) 


0144 


0090 


DCBSC 


0196 


00C4 


DCBOVF 


(EQU) 


0087 


0057 


DCBIZ 




0144 


0090 


DCBRECAD 


(EQU) 0196 


00C4 


DCBENT 


(EQU) 


0087 


0057 


DCBI6 


(EQU) 


0144 


0090 


DCBRCD 


0196 


O0C4 


DCBIOC 


(EQU) 


0087 


0057 


DCBI5 


(EQU) 


0148 


0094 


DCBEAP 


0196 


00C4 


DCBEOP 


(EQU) 


0087 


0057 


DCBI4 


(EQU) 


0148 


0094 


DCBCLE 


0196 


O0C4 


DCBQFO 




0087 


0057 


DCBI3 


(EQU) 


0148 


0094 


DCBHD 


0197 


00C5 


DCBMSF2 




0087 


0057 


DCBI2 


(EQU) 


0148 


0094 


DCBEOBAD 


(EQU) 0197 


O0C5 


DCBBLA1 


(EQU) 


0087 


0057 


DCBII 


(EQU) 


0148 


0094 


DCBEAD 


0197 


00C5 


DCBENOF 


(EQU) 


0087 


0057 


DCBIO 


(EQU) 


0152 


0098 


DCBPPT 


0197 


00C5 


DCBFWT 


(EQU) 


0088 


0058 


DCBGTV 




0152 


0098 


DCBKNT 


0197 


00C5 


DCBFT 


(EQU) 


0092 


005C 


DCBGTR 




0152 


0098 


DCBPCC 


0197 


00C5 


DCBFIP 


(EQU) 


0096 


0060 


DCBPTV 




0152 


0098 


DCBNPO 


0197 


00C5 


DCBFIN 


(EQU) 


0100 


0064 


DCBPTR 




0152 


0098 


DCBLX 


0197 


O0C5 


DCBSUR 


(EQU) 


0104 


0068 


DCBPXV 




0154 


009A 


DCBFPO 


0197 


00C5 


DCBPUR 


(EQU) 


0108 


00 6C 


DCBPXR 




0156 


009C 


DCBRCX 


0197 


00C5 


DCBQF1 




0112 


0070 


DCBSLV 




0156 


009C 


DCBWCT 


0198 


00C6 


DCBMSF3 




0116 


0074 


DCBSLR 




0156 


009C 


DCBOPC 


0198 


O0C6 


DCBCAN 


(EQU) 


0120 


0078 


DCBSFS 




0156 


009C 


DCBBPU 


0198 


00C6 


DCBMRF 


(EQU) 


0120 


0078 


DCBRETRY 




0156 


009C 


DCBLXN 


0198 


00C6 


DCBTAB 


(EQU) 


0120 


0078 


DCBTMP 




0158 


009E 


DCBCNT 


0198 


00C6 


DCBRJIN 


(EQU) 


0120 


0078 


DCBVMA 




0158 


009E 


DCBNCN 


0198 


00C6 


DCBSAIN 


(EQU) 


0120 


0078 


DCBBKC 




0158 


009E 


DCBHLB 


0198 


00C6 


DCBQF2 




0121 


0079 


DCBPOCKE 




0158 


009E 


DCBBSV 


0199 


00C7 


DCBQF3 




0122 


007A 


DCBINHMS 




0159 


009F 


DCBLOF 


0200 


00C8 


DCBEND 






















CHADCB 125 



Alphabetical list of fields in CHADCB 



FIELD DEC 

DCBAA 0003 

DCBAB 0003 

DCBAC 0003 

DCBAD 0003 

DCBAE 0003 

DCBAF 0003 

DCBASY 0173 

DCBAO 0002 

DCBA1 0002 

DCBA2 0002 

DCBA3 0002 

DCBA4 0002 

DCBA5 0002 

DCBA6 0002 

DCBA7 0002 

DCBA8 0003 

DCBA9 0003 

DCBBCN 0036 

DCBBFT 0040 

DCBBFTEK 0040 

DCBBF1 0176 

DCBBF2 0180 

DCBBF3 0184 

DCBBKC 0120 

DCBBLA1 0197 

DCBBLK 0048 

DCBBLKSI 0048 

DCBBN 0126 



DCBBOF 

DCBBP 

DCBBPU 

DCBBSV 

DCBBT 

DCBBUF 



0127 
0164 
0156 
0158 
0126 
0032 



DCBBUFCB 0036 
DCBBUFL 0032 
DCBBUFNO 0035 
DCBBUFRQ 0020 
DCBBUN 0035 
DCBCAN 0198 
DCBCBP 0126 
DCBCCL 0162 
DCBCDE 0168 
DCBCH 0083 
DCBCL 0160 
DCBCLE 0148 
DCBCMB 0123 
DCBCNT 0158 
DCBCOD 0050 
DCBCODE 0050 
DCBCOMBI 0123 
DCBCON 0072 



DCBCPB 
DCBCRL 
DCBCRS 
DCBCSW 
DCBDDN 



0124 
0166 
0168 
0136 
0008 



DCBDDNAM 0008 
DCBDD1 0050 
DCBDD2 0051 
DCBDEB 0076 
DCBDEBAD 0076 
DCBDEC 0160 
DCBDEV 0034 
DCBDEVT 0034 
DCBDE1 0164 
DCBDE2 0168 
(Continued on 



HEX 

0003 

0003 

0003 

0003 

0003 

0003 

00 AD 

0002 

0002 

0002 

0002 

0002 

0002 

0002 

0002 

0003 

0003 

0024 

0028 

0028 

00B0 

00B4 

0OB8 

0078 

00C5 

0030 

0030 

007E 

007F 

00A4 

009C 

009E 

007E 

0020 

0024 

0020 

0023 

0014 

0023 

00C6 

007E 

00A2 

00A8 

0053 

00A0 

0094 

007B 

009E 

0032 

0032 

007B 

0048 

007C 

00A6 

00A8 

0088 

0008 

0008 

0032 

0033 

004C 

004C 

00A0 

0022 

0022 

00A4 

00A8 

page 



CEQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 



(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 

(EQU) 



(EQU) 



(EQU) 

(EQU) 
(EQU) 



(EQU) 

(EQU) 
(EQU) 
(EQU) 



(EQU) 

(EQU) 
(EQU) 
(EQU) 



(EQU) 

(EQU) 
(EQU) 
127) 



FIELD 

DCBDE3 

DCBDMS 

DCBDPN 

DCBDSO 

DCBDSORG 

DCBEAD 

DCBEAP 

DCBELP 

DCBEND 

DCBENOF 

DCBEOT 

DCBEOBAD 

DCBEODAD 

DCBEOP 

DCBEOR 

DCBEOV 

DCBERO 

DCBEROPT 

DCBER1 

DCBER2 

DCBER3 

DCBEXCD1 

DCBEXCD2 

DCBEXL 

DCBEXLST 

DCBEX1 

DCBEX2 

DCBFDE 

DCBFIN 

DCBFIP 

DCBFLAG 

DCBFLG 

DCBFMP 

DCBFPO 

DCBFRMTP 

DCBFT 

DCBFWT 

DCBGTR 

DCBGTV 

DCBHD 

DCBHLB 

DCBHRL 

DCBHV 

DCBI 

DCBIA 

DCBIB 

DCBIC 

DCBICB 

DCBID 

DCBIE 

DCBIF 

DCBIFL 

DCBIFLG 

DCBIFLGS 

DCBIG 

DCBIH 

DCBI I 

DCBIJ 

DCBIK 

DCBIL 

DCBIM 

DCBIMK 

DCBI MS K 

DCBIN 

DCBINH 

DCBINHMS 

DCBIO 



DEC 

0172 

0180 

0124 

0000 

0000 

0148 

0148 

0196 

0200 

0197 

0196 

0148 

0024 

0196 

0028 

0024 

0052 

0052 

0052 

0052 

0052 

0060 

0061 

0004 

0004 

0060 

0061 

0172 

0197 

0197 

0174 

0166 

0174 

0154 

0188 

0197 

0197 

0092 

0088 

0148 

0158 

0132 

0135 

0134 

0084 

0084 

0084 

0124 

0068 

0084 

0084 

0081 

0081 

0081 

0084 

0084 

0084 

0085 

0085 

0085 

0085 

0084 

0084 

0085 

0122 

0122 

0085 



HEX 

00 AC 

00B4 

007C 

0000 

0000 

0094 

0094 

00C4 

00C8 

00C5 

O0C4 

0094 

0018 

00C4 

001C 

0018 

0034 

0034 

0034 

0034 

0034 

003C 

003D 

0004 

0004 

003C 

003D 

00AC 

00C5 

00C5 

00AE 

00A6 

00AE 

009A 

00BC 

00C5 

00C5 

005C 

0058 

0094 

009E 

0084 

0087 

0086 

0054 

0054 

0054 

007C 

0044 

0054 

0054 

0051 

0051 

0051 

0054 

0054 

0054 

0055 

0055 

0055 

0055 

0054 

0054 

0055 

007A 

007A 

0055 



(EQU) 



(EQU) 

(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 



(EQU) 

(EQU) 
(EQU) 

(EQU) 
(EQU) 

(EQU) 

CEQU) 



(EQU) 
(EQU) 



(EQU) 



(EQU) 

(EQU) 



(EQU) 
(EQU) 



(EQU) 
(EQU) 

(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 

(EQU) 
(EQU) 
(EQU) 

(EQU) 
(EQU) 
(EQU) 

(EQU) 



FIELD 

DCBIOC 

DCBIOI 

DCBIOS 

DCBIP 

DCBIQ 

DCBIR 

DCBIS 

DCBIT 

DCBIU 

DCBIV 

DCBIW 

DCBIX 

DCBIY 

DCBIZ 

DCBIO 

DCBI1 

DCBI2 

DCBI3 

DCBI4 

DCBI5 

DCBI 6 

DCBKEY 

DCBKEYLE 

DCBKNT 

DCBLAD 

DCBLDE 

DCBLEN 

DCBLOF 

DCBLP 

DCBLPA 

DCBLPN 

DCBLRC 

DCBLRE 

DCBLRECL 

DCBLRL 

DCBLRMAX 

DCBLRS 

DCBLX 

DCBLXN 

DCBM 

DCBMA 

DCBMAC 

DCBMACR 

DCBMACRF 

DCBMB 

DCBMC 

DCBMCD 

DCBMCD1 

DCBMD 

DCBME 

DCBMF 

DCBMG 

DCBMH 

DCBM I 

DCBMJ 

DCBMK 

DCBWL 

DCBMM 

DCBMN 

DCBMO 

DCBMOD 

DCBMODE 

DCBMP 

DCBMQ 

DCBMR 

DCBMRF 

DCBMS 



DEC 

0196 

0166 

0164 

0085 

0085 

0086 

0086 

0086 

0086 

0086 

0086 

0086 

0086 

0087 

0087 

0087 

0087 

0087 

0087 

0087 

0087 

0050 

0050 

0152 

0160 

0176 

0080 

0159 

0056 

0056 

0060 

0144 

0044 

0046 

0128 

0128 

0188 

0152 

0156 

0130 

0064 

0002 

0002 

0002 

0064 

0064 

0082 

0082 

0064 

0064 

0064 

0064 

0064 

0065 

0065 

0065 

0065 

0065 

0065 

0065 

0051 

0051 

0065 

0066 

0066 

0198 

0066 



HEX 

00C4 

00A6 

00A4 

0055 

0055 

0056 

0056 

0056 

0056 

0056 

0056 

0056 

0056 

0057 

0057 

0057 

0057 

0057 

0057 

0057 

0057 

0032 

0032 

0098 

00A0 

00B0 

0050 

009F 

0038 

0038 

003C 

0090 

002C 

002E 

0080 

0080 

00BC 

0098 

009C 

0082 

0040 

0002 

0002 

0002 

0040 

0040 

0052 

0052 

0040 

0040 

0040 

0040 

0040 

0041 

0041 

0041 

0041 

0041 

0041 

0041 

0033 

0033 

0041 

0042 

0042 

00C6 

0042 



(EQU) 
(EQU) 

(EQU) 
(EQU) 

(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 

(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 

(EQU) 



(EQU) 



(EQU) 



(EQU) 
(EQU) 
(EQU) 
(EQU) 



(EQU) 
(EQU) 
(EQU) 
(EQU) 

(EQU) 

(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 

(EQU) 
(EQU) 

(EQU) 
(EQU) 
(EQU) 



126 CHADCB 



(Continued from page 126) 



FIELD 


DEC 


HEX 




FIELD 


DEC 


HEX 




FIELD 


DEC 


HEX 




DCBMSF1 


0196 


00C4 




DCBPMM 


0171 


00AB 




DCBSLV 


0112 


0070 




DCBMSF2 


0197 


00C5 




DCBPOCKE 


0121 


0079 




DCBSMSI 


0068 


0044 




DCBMSF3 


0198 


00C6 




DCBPPT 


0152 


0098 




DCBSOWA 


0024 


0018 




DCBMSHI 


0072 


0048 




DCBPR 


0126 


007E 




DCBSP 


0140 


008C 




DCBMSK 


0064 


0040 




DCBPRL 


0160 


00A0 




DCBSTA 


0050 


0032 




DCBMT 


0066 


0042 


(EQU) 


DCBPRT 


0050 


0032 




DCBSTACK 


0050 


0032 


(EQU) 


DCBMU 


0066 


0042 


(EQU) 


DCBPT 


0165 


00A5 




DCBSTRIK 


0189 


00BD 




DCBMV 


0066 


0042 


(EQU) 


DCBPTR 


0100 


0064 




DCBSUR 


0197 


00C5 


(EQU) 


DCBMW 


0066 


0042 


(EQU) 


DCBPTRSP 


0050 


0032 


(EQU) 


DCBSVL 


0190 


00BE 




DCBMX 


0066 


0042 


(EQU) 


DCBPTV 


0096 


0060 




DCBSWA 


0196 


00C4 


(EQU) 


DCBMY 


0067 


0043 




DCBPUR 


0197 


00C5 


(EQU) 


DCBSWT 


0139 


008B 




DCBMZ 


0067 


0043 


(EQU) 


DCBPXR 


0108 


006C 




DCBSYNAD 


0016 


0010 


(EQU) 


DCBMO 


0067 


0043 


(EQU) 


DCBPXV 


0104 


0068 




DCBSYR 


0020 


0014 




DCBM1 


0067 


0043 


(EQU) 


DCBQF0 


0196 


O0C4 




DCBSYV 


0016 


0010 




DCBM2 


0067 


0043 


(EQU) 


DCBQF1 


0197 


00C5 




DCBS0 


0124 


007C 




DCBM3 


0067 


0043 


(EQU) 


DCBQF2 


0198 


00C6 




DCBS1 


0125 


007D 




DCBMU 


0067 


0043 


(EQU) 


DCBQF3 


0199 


00C7 




DCBTAB 


0198 


00C6 


(EQU) 


DCBM5 


0067 


0043 


(EQU) 


DCBQN 


0126 


007E 


(EQU) 


DCBTCC 


0124 


007C 




DCBN 


0128 


0080 




DCBQT 


0126 


007E 


(EQU) 


DCBTDE 


0180 


00B4 




DCBNCH 


0166 


00A6 


(EQU) 


DCBQWK 


0192 


OOCO 




DCBTMP 


0120 


0078 




DCBNCN 


0158 


009E 




DCBRBF 


0140 


008C 




DCBTRMAD 


0020 


0014 




DCBNCP 


0041 


0029 




DCBRCD 


0144 


0090 




DCBTRT 


0051 


0033 




DCBN I 


0136 


0088 




DCBRCX 


0156 


009C 




DCBTRTCH 


0051 


0033 


(EQU) 


DCBNLP 


0196 


O0C4 


(EQU) 


DCBRD 


0128 


0080 




DCBUDE 


0184 


00B8 




DCBNPL 


0167 


00A7 




DCBRDB 


0130 


0082 




DCBUS 


0083 


0053 




DCBNPO 


0152 


0098 




DCBRDC 


0132 


0084 




DCBVMA 


0120 


0078 




DCBOFG 


0063 


003F 




DCBRDH 


0134 


0086 




DCBWBF 


0144 


0090 




DCBOFLGS 


0063 


003F 


(EQU) 


DCBRDM 


0129 


0081 




DCBWCT 


0156 


009C 




DCBOLM 


0172 


00 AC 




DCBRDN 


0128 


0080 




DCBX1 


0060 


003C 


(EQU) 


DCBOP 


0132 


0084 




DCBRDR 


0134 


0086 




DCBX2 


0060 


003C 


(EQU) 


DCBOPC 


0156 


009C 




DCBRDT 


0132 


0084 




DCBX2A 


0061 


003D 


(EQU) 


DCBOPF 


0132 


0084 




DCBRDZ 


0135 


0087 




DCBX2B 


0061 


003D 


(EQU) 


DCBOP I 


0062 


003E 




DCBREC 


0042 


002A 




DCBX2C 


0061 


003D 


(EQU) 


DCBOPM 


0133 


0085 




DCBRECAD 


0144 


0090 


(EQU) 


DCBX2D 


0061 


003D 


(EQU) 


DCBOPT 


0043 


002B 




DCBRECFM 


0042 


002A 


(EQU) 


DCBX2E 


0061 


003D 


(EQU) 


DCBOPTCD 


0043 


002B 


(EQU) 


DCBRES 


0169 


00A9 




DCBX2F 


0061 


003D 


(EQU) 


DCBOVF 


0196 


00C4 


(EQU) 


DCBRETRY 


0120 


0078 




DCBX2G 


0061 


003D 


(EQU) 


DCBOO 


0063 


003F 


(EQU) 


DCBRJE 


0196 


00C4 


(EQU) 


DCBX2H 


0061 


003D 


(EQU) 


DCBOl 


0063 


003F 


(EQU) 


DCBRJIN 


0198 


00C6 


(EQU) 


DCBX2I 


0061 


003D 


(EQU) 


DCB02 


0063 


003F 


(EQU) 


DCBRK 


0176 


0OB0 




DCBX2J 


0061 


003D 


(EQU) 


DCB03 


0063 


003F 


(EQU) 


DCBRKP 


0054 


0036 




DCBX2K 


0061 


003D 


(EQU) 


DCB04 


0063 


003F 


(EQU) 


DCBSAIN 


0198 


00C6 


(EQU) 


DCBX3 


0060 


003C 


(EQU) 


DCB05 


0063 


003F 


(EQU) 


DCBSC 


0144 


0090 




DCBX4 


0060 


003C 


(EQU) 


DCB07 


0063 


003F 


(EQU) 


DCBSCC 


0136 


0088 




DCBX5 


0060 


003C 


(EQU) 


DCBPAD 


0053 


0035 




DCBSFS 


0120 


0078 




DCBX6 


0060 


003C 


(EQU) 


DCBPCC 


0152 


0098 




DCBSHC 


0138 


008A 




DCB06 


0063 


003F 


(EQU) 


DCBPLM 


0170 


00AA 




DCBSLR 


0116 


0074 




IHADCB 


0000 


0000 


(EQU) 


Lstinq of 


CHADCB 




















LOCATION 


INSTRUCTION SOURCE INST OPER 


COMMENT 










24 00000 


CHADCB DSECT 














24 00000 








DS 


0D 














24 00000 






DCBDSO DS 


1H 




DSORG 










00000040 


DCBDS0 EQU 


X f i 


40» 


SAM 


DSORG 










00000041 


DCBDS1 EQU 


x'< 


41 f 


SAM 


DSORG 










00000010 


DCBDT0 EQU 


x 1 : 


10' 


TAM 


DSORG 










00000011 


DCBDT1 EQU 


XV 


ll 1 


TAM 


DSORG 










00000071 


DCBDV1 EQU 


X 1 


71' 


VISAM DSORG 










00000072 


DCBDV2 EQU 


X'* 


72* 


VSAM DSORG 










00000073 


DCBDV3 EQU 


X' 


73 § 


VIPAM DSORG 










00000074 


DCBDV4 EQU 


x f 


74 f 


VSPAM DSORG 










00000075 


DCBDV5 EQU 


x« 


75" 


VPAM DSORG 










00000007 


DCBDR1 EQU 


X f l 


07* 


IOREQ SPECIFIED 








00000008 


DCBDM1 EQU 


x* 


08 1 


MSAM DSORG 








21* 00002 






DCBMAC DS 


H 




MACRF 










24 00002 




lORG 


| DCBMAC 












24 00002 






DCBA0 DS~ 


XL1 












(Listing 


of CHADCB 


continued on page 128) 













CHADCB 127 



(Listing of CHADCB continued from page 127) 



LOCATION INSTRUCTION SOURCE 



24 00003 



24 00004 



00000080 
24 00002 
00000040 
24 00002 
00000020 
24 00002 
00000010 
24 00002 

00000008 

24 00002 

00000004 

24 00002 

00000002 

24 00002 
00000001 

00000080 
24 00003 
00000040 
24 00003 
00000020 
24 00003 
00000010 
24 00003 

00000008 

24 00003 

00000004 

24 00003 

00000002 

24 00003 
00000001 

00000080 



24 00008 
24 00010 
24 00014 
24 00018 
24 0001C 
24 00020 
24 00022 

000000E3 

000000C4 

000000D9 
O000O0D5 
000000D7 
000000D1 
000000D2 
000000D3 

24 00023 

24 00024 

24 00028 

24 00029 

(Listing of CHADCB 



DCBA0M 

DCBA1 

DCBA1M 

DCBA2 

DCBA2M 

DCBA3 

DCBA3M 

DCBA4 

DCBA4M 

DCBA5 

* 

DCBA5M 

* 

DCBA6 

* 
DCBA6M 

DCBA7 

DCBA7M 

DCBA8 

DCBA8M 

DCBA9 

DCBA9M 

DCBAA 

DCBAAM 

DCBAB 

DCBABM 

DCBAC 

DCBACM 

DCBAD 

* 

DCBADM 

DCBAE 

DCBAEM 

DCBAF 
DCBAFM 
DCBEXL 
DCBELT 

DCBDDN 
DCBSYV 
DCBSYR 
DCBEOV 
DCBEOR 
DCBBUF 
DCBDEV 
DCBDTP 

DCBDDA 

* 

DCBDCR 
DCBDCP 
DCBDPR 
DCBDCJ 
DCBDCK 
DCBDCL 
DCBBUN 
DCBBCN 
DCBBFT 
DCBNCP 
* 
continued 



INST 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

DS 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 
EQU 
DS 
EQU 

DS 
DS 
DS 
DS 
DS 
DS 
DS 
EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

DS 

DS 

DS 

DS 



OPER 

x'so' 

DCBA0 
X^O* 
DCBA0 
X^O' 
DCBA0 
X^O' 
DCBAO 

X'08' 

DCBAO 

X f 04" 

DCBAO 

X , 02 f 

DCBAO 

X'Ol' 

XL1 

X^O' 

DCBA8 

X'40 f 

DCBA8 

X^O 1 

DCBA8 

X'10' 

DCBA8 

X'08' 

DCBA8 

X , 04 i 

DCBA8 

X f 02' 

DCBA8 
X , 01 i 
IF 

X f 80 f 

D 

IF 

IF 

IF 

IF 

1H 

CL1 
c t T t 

CD 9 

C'R* 

C'N' 
c .p. 

C'J' 

C'K' 

C'L' 

CL1 

IF 

CL1 

CL1 



COMMENT 

GET FLAG 

GET MASK 

READ FLAG 

READ MASK 

GET- MOVE MODE FLAG 

GET-MOVE MODE MASK 

GET- LOCATE MODE/READ- LOAD 

FLAG 

GET-LOCATE MODE/ RE AD- LOAD 

MASK 

GET-SUBSTITUTE MODE/READ 

W /POINT FLAG 

GET-SUBSTITUTE MODE/READ 

W/POINT MASK 

GET-W/CNTRL/READ W/CONTROL 

FLAG 

GET-W/CNTRL/READ W/CONTROL 

MASK 



PUT FLAG 

PUT MASK 

WRITE FLAG 

WRITE MASK 

PUT- MOVE MODE FLAG 

PUT-MOVE MODE MASK 

PUT- LOCATE MODE/WRITE-LOAD 

FLAG 

PUT- LOCATE MODE/WRITE-LOAD 

MASK 

PUT-SUBSTITUTE MODE/WRITE 

W/POINT FLAG 

PUT-SUBSTITUTE MODE/WRITE 

W/POINT MASK 

PUT-W/CONTROL/WRITE-W/CONTROL FLAG 

PUT-W/CONTROL/WRITE-W/CONTROL MASK 



POINTER TO USERS EXIT LIST 
END OF EXIT LIST MASK 

16447 
DDNAME 

SYNAD ADDR (VCON) 
SYNAD ADDR (RCON) 
EODAD ADDR (VCON) 
EODAD ADDR (RCON) 
BUFFER LENGTH - BUFL 
DEVICE TYPE - DEVD 
MAGNETIC TAPE 

16447 
DIRECT ACCESS 

16447 
CARD READER 
PUNCH 
PRINTER 
REMOTE READER 
REMOTE PUNCH 
REMOTE PRINTER 
NUMBER OF BUFFERS - BUFNO 
BUFFER CONTROL - BUFCB 
BUFFER TECHNIQUE - BFTEK 
NUMBER OF CHANNEL PROGRAMS 
- NCP 



on page 129) 



128 CHADCB 



(Listing of CHADCB continued from page 128) 



LOCATION INSTRUCTION SOURCE 



INST OPER 



COMMENT 



24 


0002A 




DCBREC 


DS 


CLl 


RECORD FORMAT - RECFM 






OOOOOOCO 


DCBRCT 


EQU 


X'CO' 


TYPE FIELD 






00000080 


DCBRCF 


EQU 


X^O 1 


FIXED FORMAT 






00000040 


DCBRCV 


EQU 


x^o* 


VARIABLE FORMAT 






OOOOOOCO 


DCBRCU 


EQU 


X'CO 1 


UNKNOWN FORMAT 






00000020 


DCBRCO 


EQU 


X^O' 


TRACK OVERFLOW 






00000010 


DCBRCB 


EQU 


X'lO' 


BLOCK RECORDS 






00000088 


DCBRCS 


EQU 


X'88' 


STANDARD RECORDS 






00000006 


DCBRCC 


EQU 


X 9 Q6* 


PRINTER CONTROL CHARACTERS 
MASK 






00000004 


DCBRCA 


EQU 


X , 04 f 


ASA CONTROL CHARACTER 






00000002 


DCBRCM 

* 


EQU 


X , 02 f 


MACHINE CODE CONTROL 
CHARACTER 






00000001 


DCBRCK 


EQU 


X^l' 


KEYLEN SPECIFIED IN DCB 
MACRO AS ZERO 


24 


0002B 




DCBOPT 


DS 


CLl 


OPTION CODE - OPTCD 






00000080 


DCBSU0 


EQU 


X^O' 


PERFORM A WRITE VALIDITY 
CHECK 






00000040 


DCBSU1 


EQU 


X^O 1 


UNIVERSAL CHARATER SET 






00000020 


DCBSU2 


EQU 


X'20 f 


ASCII TAPE REQUEST 






00000004 


DCBSU5 


EQU 


X , 04 f 


DCBIMK DEFAULTED 






00000002 


DCBSU6 


EQU 


X'02 t 


DCBPAD SPECIFIED AS ZERO 






00000001 


DCBSU7 


EQU 


X f 01 f 


DCBRKP SPECIFIED AS ZERO 


24 


0002C 




DCBLRE 


DS 


IF 


RECORD LENGTH - LRECL 


24 


00030 




DCBBLK 


DS 


1H 


BLOCK SIZE - BLKSIZE 


24 


00032 




DCBDDl 


DS 


CLl 


DEVICE DEPENDENT PARAMETERS 
1 






24 00032 




|ORG| 


DCBDDl 


24 


00032 


24 00032 


DCBKEY 


DS 
|ORG| 


CLl 
DCBDDl 


KEY LENGTH - KEYLEN 


24 


00032 




DCBPRT 


DS 


CLl 


PRINTER SPACE - PRTSP 






00000001 


DCBPR0 


EQU 


X'Ol* 


NO SPACING 






00000009 


DCBPR1 


EQU 


x^ 1 


SPACE ONE LINE 






00000011 


DCBPR2 


EQU 


X'll' 


SPACE TWO LINES 






00000019 


DCBPR3 


EQU 


X'19 - 


SPACE THREE LINES 






24 00032 




|ORG| 


DCBDDl 




24 


00032 




DCBSTA 


DS 


CLl 


STACKER SELECT - STACK 






00000001 


DCBST1 


EQU 


X' 01" 


STACKER 1 






00000002 


DCBST2 


EQU 


X , 02 f 


STACKER 2 






00000003 


DCBST3 


EQU 


X'OS^ 


STACKER 3 






24 00032 




|ORG| 


DCBDDl 




24 


00032 




DCBCOD 


DS 


CLL 


PAPER TAPE - CODE 






00000080 


DCBNCV 


EQU 


X^O' 


NO CONVERSION 






00000040 


DCBCOI 


EQU 


X'40 - 


IBM BCD 






00000020 


DCBCOF 


EQU 


X % 2Q< 


FRIDEN 






00000010 


DCBCOB 


EQU 


X'lO 1 


BURROUGHS 






00000008 


DCBCOC 


EQU 


X , 08 f 


NCR 






00000004 


DCBCOA 


EQU 


X , 04 i 


ASCII 






00000002 


DCBCOT 


EQU 


X f 02' 


TELETYPE 


24 


00033 




DCBDD2 

# 


DS 


CLl 


DEVICE DEPENDENT PARAMETERS 
2 






24 00033 




(ORG I 


DCBDD2 


24 


00033 




DCBMOD 


DS 


CLl 


CARD READER/PUNCH - MODE 






00000080 


DCBMOC 


EQU 


X'80' 


COLUMN BINARY 






00000040 


DCBMOE 


EQU 


X'HQ* 


EBCDIC 






24 00033 




|ORG| 


DCBDD2 




24 


00033 




DCBTRT 


DS 


CLl 


TAPE RECORDING TECHNIQUE - 
TRTCH 






0000002B 


DCBTEM 


EQU 


X^B' 


TRTCH TRANS EVEN PARITY 






00000033 


DCBODM 


EQU 


X i 33 i 


ODD PARITY NO TRANSLATE 






00000013 


DCBTM 


EQU 


X f 13 f 


TRANSLATE 






0000003B 


DCBEVN 


EQU 


X f 3B f 


EVEN PARITY NO TRANSLATE 






00000023 


DCBEVM 


EQU 


X^S 1 


CONVERTER AVAILABLE MASK 


24 


00034 




DCBERO 


DS 


CLl 


ERROR OPTIONS - EROPT 






24 00034 


DCBER1 


EQU 


DCBERO 


CODE=ACC FLAG 






00000080 


DCBER1M 


EQU 


X^O 1 


CODE=ACC MASK 






24 00034 


DCBER2 


EQU 


DCBERO 


CODE=SKP FLAG 






00000040 


DCBER2M 


EQU 


X^O' 


CODE=SKP MASK 
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LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 


COMMENT 








24 00034 


DCBER3 


EQU 


DCBERO 


CODE=ABE FLAG 








00000020 


DCBER3M 


EQU 


X^O' 


CODE=ABE MASK 




24 


00035 




DCBPAD 


DS 


CL1 


PADDING 




24 


00036 




DCBRKP 


DS 


1H 


RELATIVE KEY POSITION 




24 


00038 




DCBLPA 


DS 


IF 


VAM FIELD - 




24 


0003C 




DCBEX1 


DS 


CL1 


VAM PARAMETERS 








24 0003C 


DCBX1 


EQU 


DCBEX1 


ERROR CAUSED BY GET 








00000000 


DCBX1M 


EQU 


X^O' 


ERROR CAUSED BY GET MASK 








24 0003C 


DCBX2 


EQU 


DCBEX1 


ERROR CAUSED BY PUT 








00000004 


DCBX2M 


EQU 


X , 04 i 


ERROR CAUSED BY PUT MASK 








24 0003C 


DCBX3 


EQU 


DCBEX1 


ERROR CAUSED BY SETL 








00000008 


DCBX3M 


EQU 


X^' 


ERROR CAUSED BY SETL MASK 








24 0003C 


DCBX4 


EQU 


DCBEX1 


ERROR CAUSED BY READ 








0000000C 


DCBX4M 


EQU 


X'OC 1 


ERROR CAUSED BY READ MASK 








24 0003C 


DCBX5 


EQU 


DCBEX1 


ERROR CAUSED BY WRITE 








OO0O0O0F 


DCBX5M 


EQU 


X^F' 


ERROR CAUSED BY WRITE MASK 








24 0003C 


DCBX6 


EQU 


DCBEX1 


ERROR CAUSED BY DELREC 








00000014 


DCBX6M 


EQU 


X , 14 f 


ERROR CAUSED BY DELREC MASK 




24 


0003D 




DCBEX2 


DS 


CL1 


VAM PARAMETERS 








24 0003D 


DCBX2A 


EQU 


DCBEX2 


KEYS EQUAL- SEQUENCE ERROR 








00000004 


DCBX2AM 


EQU 


X , 04 i 


MASK 








24 0003D 


DCBX2B 


EQU 


DCBEX2 


KEY NOT FOUND 








00000008 


DCBX2BM 


EQU 


x^s' 


MASK 








24 0003D 


DCBX2C 


EQU 


DCBEX2 


KEYS OUT OF SEQUENCE 








oooooooc 


DCBX2CM 


EQU 


X'OC 


MASK 








24 0003D 


DCBX2D 


EQU 


DCBEX2 


KEYS DO NOT COINCIDE 








O000O00F 


DCBX2DM 


EQU 


X'OF 1 


MASK 








24 0003D 


DCBX2E 


EQU 


DCBEX2 


KEYS COINCIDE 








00000014 


DCBX2EM 


EQU 


X'14 f 


MASK 








24 0003D 


DCBX2F 


EQU 


DCBEX2 


INVALID RETRIEVAL ADDRESS 








00000018 


DCBX2FM 


EQU 


X'18' 


MASK 








24 0003D 


DCBX2G 


EQU 


DCBEX2 


INVALID RECORD LENGTH 








0000001C 


DCBX2GM 


EQU 


X'lC 


MASK 








24 0003D 


DCBX2H 

* 


EQU 


DCBEX2 


POSITION PAST END OF DATA 
SET 








0000001F 


DCBX2HM 


EQU 


X'lF' 


MASK 








24 0003D 


DCBX2I 

* 


EQU 


DCBEX2 


POSITION BEFORE BEGINNING 
OF DATA SET 








00000024 


DCBX2IM 


EQU 


X , 24' 


MASK 








24 0003D 


DCBX2J 


EQU 


DCBEX2 


EXCEED MAXIMUM NUMBER 
OVERFLOW PAGES FLAG 








00000028 


DCBX2JM 

* 


EQU 


x M 2Q 9 


EXCEED MAXIMUM NUMBER 
OVERFLOW PAGES MASK 








24 0003D 


DCBX2K 

* 


EQU 


DCBEX2 


EXCEED MAXIMUM SIZE SHARED 
DATA SET FLAG 








0000002C 


DCBX2KM 


EQU 


X'2C f 


EXCEED MAXIMUM SIZE SHARED 
DATA SET MASK 








24 0003C 




|ORG| 


DCBEX1 






24 


0003C 




DCBLPN 

* 


DS 


CL2 


LOGICAL RECORD COUNT IN 
BLOCK 




24 


0003E 




DCBOPI 


DS 


CL1 


OPTIONS 








0000003C 


DCBOMI 


EQU 


X f 3C 


AND MASK FOR OPEN OPTIONS 1 








OOOOOOCO 


DCBLVO 


EQU 


X'CO' 


LEAVE — OPEN 








00000040 


DCBRDO 


EQU 


x'40 1 


REREAD — OPEN 








00000000 


DCBINP 


EQU 


X'OO' 


INPUT 








0000003C 


DCBOUT 


EQU 


X f 3C - 


OUTPUT 








OOOOOOOC 


DCBINO 


EQU 


X'OC 1 


INOUT 








0000001C 


DCBOIN 


EQU 


X'lC 1 


OUT IN 








00000010 


DCBUPD 


EQU 


X'lO' 


UPDATE 








00000004 


DCBRBK 


EQU 


X , 04 i 


RDBACK 








00000001 


DCBRRC 


EQU 


X'Ol 1 


REREAD — CLOSE 








00000003 


DCBLVC 


EQU 


yi'QZ* 


LEAVE ~ CLOSE 




24 


0003F 




DCBOFG 


DS 


CL1 


OPEN FLAGS OPFLG 








24 0003F 


DCBO0 


EQU 


DCBOFG 










00000080 


DCBO0M 


EQU 


X^O 1 


B0 - FEOV FLAG 








24 0003F 


DCBOl 


EQU 


DCBOFG 










00000040 


DCBOIM 


EQU 


X^O' 


Bl - EODS FLAG 








24 0003F 


DCB02 


EQU 


DCBOFG 
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00000020 


DCB02M 


EQU 


X f 20 f 


B2 - PUTX FLAG 






24 0003F 


DCB03 


EQU 


DCBOFG 










00000010 


DCB03M 


EQU 


X^O' 


B3 - OPEN FLAG 






24 0003F 


DCB04 


EQU 


DCBOFG 










00000008 


DCB04M 


EQU 


x'os* 


B4 - CONCATENATION FLAG 






24 0003F 


DCB05 


EQU 


DCBOFG 










00000004 


DCB05M 


EQU 


X f 04 f 


B5 - CLOSE (T) FLAG 






24 0003F 


DCB06 


EQU 


DCBOFG 


END OF TAPE 


FLAG 






00000002 


DCB06M 


EQU 


X , 02 i 


END OF TAPE 


MASK 






24 0003F 


DCB07 


EQU 


DCBOFG 










00000001 


DCB07M 


EQU 


X^l' 


B7 - CONCATENATION FLAG 








* 






(SYSTEM) 




24 


00040 




DCBMSK 


DS 


IF 


DCB MASK FIELD 






24 00040 




|ORG| 


DCBMSK 






24 


00040 




DCBMA 


DS 


XL1 










00000080 


DCBMAM 


EQU 


X^O' 


DSORG BIT - 


BIT 






24 00040 


DCBMB 


EQU 


DCBMA 










00000040 


DCBMBM 


EQU 


X^O" 


MACRF BIT - 


BIT 1 






24 00040 


DCBMC 


EQU 


DCBMA 










00000020 


DCBMCM 


EQU 


X^O 1 


EXLST BIT - 


BIT 2 






24 00040 


DCBMD 


EQU 


DCBMA 










00000010 


DCBMDM 


EQU 


X'lO' 


DDNAME BIT < 


- BIT 3 






24 00040 


DCBME 


EQU 


DCBMA 










00000008 


DCBMEM 


EQU 


x'os* 


SYNAD BIT - 


BIT 4 






24 00040 


DCBMF 


EQU 


DCBMA 










00000004 


DCBMFM 


EQU 


X'04 f 


EODAD BIT • 


- BIT 5 






24 00040 


DCBMG 


EQU 


DCBMA 










00000002 


DCBMGM 


EQU 


X , 02 i 


BUFL BIT - 


BIT 6 






24 00040 


DCBMH 


EQU 


DCBMA 










00000001 


DCBMHM 


EQU 


X'Ol 1 


DEVD BIT - 


BIT 7 


24 


00041 




DCBMI 


DS 


XL1 










00000080 


DCBMIM 


EQU 


X^O' 


BUFNO BIT - 


BIT 8 






24 00041 


DCBMJ 


EQU 


DCBMI 










00000040 


DCBMJM 


EQU 


X^O 1 


BUFCB BIT - 


BIT 9 






24 00041 


DCBMK 


EQU 


DCBMI 










00000020 


DCBMKM 


EQU 


X^O' 


BFTEK BIT - 


BIT 10 






24 00041 


DCBML 


EQU 


DCBMI 










00000010 


DCBMLM 


EQU 


X'lO 1 


NCP BIT 


BIT 11 






24 00041 


DCBMM 


EQU 


DCBMI 










00000008 


DCBMMM 


EQU 


x'os 1 


RECFW BIT - 


BIT 12 






24 00041 


DCBMN 


EQU 


DCBMI 










00000004 


DCBMNM 


EQU 


X'04* 


OPTCD BIT - 


BIT 13 






24 00041 


DCBMO 


EQU 


DCBMI 










00000002 


DCBMOM 


EQU 


X , 02 i 


LRECL BIT - 


BIT 14 






24 00041 


DCBMP 


EQU 


DCBMI 










00000001 


DCBMPM 


EQU 


X'Ol - 


BLKSIZE BIT 


- BIT 15 


24 


00042 




DCBMQ 


DS 


XL1 










00000080 


DCBMQM 


EQU 


X^O' 


DEVDEP BIT 


1 - BIT 16 






24 00042 


DCBMR 


EQU 


DCBMQ 










00000040 


DCBMRM 


EQU 


X^O* 


DEVDEP BIT 


2 - BIT 17 






24 00042 


DCBMS 


EQU 


DCBMQ 










00000020 


DCBMSM 


EQU 


X^O 1 


EROPT BIT 


- BIT 18 






24 00042 


DCBMT 


EQU 


DCBMQ 










00000010 


DCBMTM 


EQU 


X'lO' 


PAD BIT 


- BIT 19 






24 00042 


DCBMU 


EQU 


DCBMQ 










00000008 


DCBMUM 


EQU 


x'08 - 


RKP BIT 


- BIT 20 






24 00042 


DCBMV 


EQU 


DCBMQ 










00000004 


DCBMVM 


EQU 


X'04' 


IMSK BIT 


- BIT 21 






24 00042 


DCBMW 


EQU 


DCBMQ 










00000002 


DCBMWM 


EQU 


X , 02 I 


NOT USED 


- BIT 22 






24 00042 


DCBMX 


EQU 


DCBMQ 










00000001 


DCBMXM 


EQU 


X'01 f 


NOT USED 


- BIT 23 


24 


00043 




DCBMY 


DS 


XL1 


FIND/STOW DSORG BIT- BIT 24 






00000080 


DCBMYM 


EQU 


X^O* 


FIND/STOW DSORG MASK 






24 00043 


DCBMZ 


EQU 


DCBMY 










00000040 


DCBMZM 


EQU 


X^O* 


NOT USED 


- BIT 25 






24 00043 


DCBM0 


EQU 


DCBMY 










00000020 


DCBMOM 


EQU 


X^O* 


NOT USED 


- BIT 26 
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24 00043 


PCBM1 


EQU 


PCBMY 








00000010 


DCBM1M 


EQU 


X'10' 


NOT USEP - BIT 27 






24 00043 


PCBM2 


EQU 


PCBMY 








00000008 


DCBM2M 


EQU 


x'os' 


NOT USE - BIT 28 






24 00043 


PCBM3 


EQU 


PCBMY 








00000004 


DCBM3M 


EQU 


X'04' 


NOT USE - BIT 29 






24 00043 


PCBM4 


EQU 


PCBMY 








00000002 


PCBM4M 


EQU 


X f 02 - 


NOT USE - BIT 30 






24 00043 


DCBM5 


EQU 


PCBMY 








00000001 


DCBM5M 


EQU 


X'Ol" 


NOT USE - BIT 31 


24 


00044 




DCBIP 


PS 


IF 


PCB IPENTIFIER ♦%♦% 


24 


00048 




PCBCON 

* 

****** 


PS 


IF 


POINTER FOR SAM TO THE NEXT 
JFCB 

IN A 








♦CONCATENATEP 


PAT A SET. 


FOR 








****** 






TAM TO A 








♦WORK AREA. 






2*1 


0004C 




PCBPEB 

* 

****** 


PS 


IF 


POINTER TO THE SAM OR TAM 
PEB. 

POINTER TO 








♦THE VAM 


I RESTABL. 




24 


00050 




PCBLEN 


PS 


CL1 


PCB LENGTH 


24 


00051 




PCBIFL 


PS 


CL1 


I/O FLAGS - IFLGS 






00000080 


PCBIF0 

* 


EQU 


X^O 1 


PERMANENT ERROR 
CONPITION=X , C0 f 






00000040 


PCBIF1 

* 


EQU 


X f 40' 


ERROR CONPITION IN PROGRESS 
FLAG 






00000020 


PCBIF2 


EQU 


X^O' 


PCBOVN-CHANNEL 9 INPICATOR 






00000010 


PCBIF3 


EQU 


XUO* 








00000008 


PCBIF4 


EQU 


X f 08 f 








00000004 


DCBIF5 


EQU 


X , 04» 








00000002 


PCBIF6 


EQU 


X , 02' 








00000001 


PCBIF7 


EQU 


X'Ol" 




24 


00052 


24 00052 


PCBMCP 


PS 
|ORG| 


CL2 
PCBMCP 


MACRO COPE 


24 


00052 




PCBMCP1 


PS 


CL1 


RESERVEP 


24 


00053 




PCBUS 


PS 


CL1 


COPE PARAMETERS 






00000004 


PCBUSE 


EQU 


X , 04 i 


FOR 






24 00053 


PCBCH 


EQU 


PCBUS 


R-TYPE 






00000001 


PCBCHN 


EQU 


X f 01' 


I/O MACRO 


24 


00054 


24 00054 


PCBIMK 


PS 
I0RG| 


F 

PCBIMK 


IM SK ERROR RETRY FLAGS 


24 


00054 




PCBIA 


PS 


XL1 


ATTENTION FLAG 






00000080 


PCBIAM 


EQU 


x'so 1 


ATTENTION MASK 






24 00054 


PCBIB 


EQU 


PCBIA 


STATUS MOPIFIER FLAG 






00000040 


PCBIBM 


EQU 


X^O 1 


STATUS MOPIFIER MASK 






24 00054 


PCBIC 


EQU 


PCBIA 


CONTROL UNIT ENP FLAG 






00000020 


PCBICM 


EQU 


X^O' 


CONTROL UNIT ENP MASK 






24 00054 


PCBIE 


EQU 


PCBIA 


BUSY FLAG 






00000010 


PCBIEM 


EQU 


X'lO 1 


BUSY MASK 






24 00054 


PCBIF 


EQU 


PCBIA 


CHANNEL ENP FLAG 






00000008 


PCBIFM 


EQU 


x^s' 


CHANNEL ENP MASK 






24 00054 


PCBIG 


EQU 


PCBIA 


PEVICE END FLAG 






00000004 


PCBIGM 


EQU 


X , 04 < 


PEVICE ENP MASK 






24 00054 


PCBIH 

* 


EQU 


PCBIA 


=l f BSAM OR QSAM TO APPLY 
ERR 






00000002 


PCBIHM 


EQU 


X f 02' 


RECOVERY ON UNIT CHECK 






24 00054 


PCBII 

* 


EQU 


PCBIA 


=1,BSAM OR QSAM TO APPLY 
ERR 






00000001 


PCBIIM 


EQU 


X^l 1 


RECOVERY ON UNIT EXCEPTION 


24 


00055 




DCBIJ 

* 


PS 


XL1 


PROGRAM CONTROLLEP 
INTERRUPT FLAG 






00000080 


DCBIJM 


EQU 


X^O* 


PROGRAM CONTROLLEP 
INTERRUPT MASK 






24 00055 


PCBIK 

* 


EQU 


PCBIJ 


=l f BSAM OR QSAM TO APPLY 

ERR 






00000040 


PCBIKM 

* 


EQU 


X^O 1 


RECOVERY ON INCORRECT 
LENGTH 
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24 00055 
00000020 
24 00055 
00000010 
24 00055 
00000008 
24 00055 
00000004 
24 00055 
00000002 
24 00055 
00000001 



24 00056 



00000080 
24 00056 



00000040 
24 00056 



00000020 
24 00056 



00000010 
24 00056 



00000008 
24 00056 



00000004 
24 00056 



00000002 
24 00056 



00000001 



24 00057 

(Listing of CHADCB 



DCBIL 

DCBILM 

* 

DCBIM 

DCBIMM 

DCBIN 

DCBINM 

DCBIO 

DCBIOM 

DCBIP 

DCBIPM 

DCBIQ 

DCBIQM 
DCBIR 

* 

* 

DCBIRM 
DCBIS 

* 

* 

DCBISM 

DCBIT 

* 

DCBITM 
DCBIU 

DCBIUM 
DCBIV 

* 

* 

DCBIVM 

DCBIW 

DCBIWM 
DCBIX 

# 

DCBIXM 

DCBIY 

DCBIYM 
DCBIZ 

continued 



INST OPER 
EQU DCBIJ 



EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 
DS 



EQU 
EQU 



EQU 
EQU 



EQU 
EQU 



EQU 
EQU 



EQU 
EQU 



EQU 
EQU 



X'20 - 
DCBIJ 
X f 10 f 
DCBIJ 

x'os 1 

DCBIJ 

X , 04" 

DCBIJ 

X , 02 t 

DCBIJ 

X'Ol' 
XL1 



X^O 1 
DCBIR 



X'40 - 
DCBIR 



X*2Q* 
DCBIR 



X'10 1 
DCBIR 



x'os 1 

DCBIR 



X f 04' 
DCBIR 



EQU X , 02 < 
EQU DCBIR 



EQU 
DS 



X f 01 § 
XL1 



on page 134) 



COMMENT 

PROGRAM CHECK 

FLAG 

PROGRAM CHECK 

MASK 

PROTECTION CHECK 

FLAG 

PROTECTION CHECK 

MASK 

CHANNEL DATA CHECK 

FLAG 

CHANNEL DATA CHECK 

MASK 

CHANNEL CONTROL CHECK 

FLAG 

CHANNEL CONTROL CHECK 

MASK 

INTERFACE CONTROL CHECK 

FLAG 

INTERFACE CONTROL CHECK 

MASK 

=l t BSAM OR QSAM TO APPLY 

ERR 

RECOVERY ON CHAINING CHECK 

FLAG BYTE FOR SENSE BYTE 

=*1,BSAM/QSAM TO APPLY ERROR 

Recovery on bit . o 

=0,IOREQ TO APPLY ERROR 

RECORDING ON BIT 

BIT MASK 

=1,BSAM/QSAM TO APPLY ERROR 

RECOVERY ON BIT 1 

=0,IOREQ TO APPLY ERROR 

RECORDING ON BIT 1 

BIT 1 MASK 

=l f BSAM/QSAM TO APPLY ERROR 

RECOVERY ON BIT 2 

=0,IOREQ TO APPLY ERROR 

RECORDING ON BIT 2 

BIT 2 MASK 

=1,BSAM/QSAM TO APPLY ERROR 

RECOVERY ON BIT 3 

=0 f IOREQ TO APPLY ERROR 

RECORDING ON BIT 3 

BIT 3 MASK 

=1,BSAM/QSAM TO APPLY ERROR 

RECOVERY ON BIT 4 

=0,IOREQ TO APPLY ERROR 

RECORDING ON BIT 4 

BIT 4 MASK 

=l f BSAM/QSAM TO APPLY ERROR 

RECOVERY ON BIT 5 

=0 f IOREQ TO APPLY ERROR 

RECORDING ON BIT 5 

BIT 5 MASK 

=1,BASM/QSAM TO APPLY ERROR 

RECOVERY ON BIT 6 

=0,lOREQ TO APPLY ERROR 

RECORDING ON BIT 6 

BIT 6 MASK 

=1,BSAM/QSAM TO APPLY ERROR 

RECOVERY ON BIT 7 

=0,IOREQ TO APPLY ERROR 

RECORDING ON BIT 7 

BIT 7 MASK 

FLAG BYTE FOR SENSE BYTE 1 

=1,BSAM/QSAM TO APPLY ERROR 
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(Listing of CHADCB continued from page 133) 



LOCATION INSTRUCTION SOURCE 

* 
# 
00000080 DCBIZM 
24 00057 DCBI0 

00000040 DCBI0M 
24 00057 DCBI1 

* 
# 
00000020 DCBI1M 
24 00057 DCBI2 

* 
00000010 DCBI2M 
24 00057 DCBI3 

* 

* 
00000008 DCBI3M 
24 00057 DCBI4 

* 

00000004 DCBI4M 
24 00057 DCBI5 

* 
00000002 DCBI5M 
24 00057 DCBI6 

00000001 DCBI6M 

24 00058 DCBGTV 

24 0005C DCBGTR 

24 00060 DCBPTV 

24 00064 DCBPTR 

24 00068 DCBPXV 

24 0006C DCBPXR 

24 00070 DCBSLV 

24 00074 DCBSLR 

24 00078 DCBBKC 

24 0007C DCBS0 

24 0007D DCBS1 

24 0007E DCBPR 

24 0007E DCBBT 

00000080 DCBBTV 

* 
24 0007E DCBBN 

00000040 DCBBNV 

24 0007E DCBQT 

00000020 DCBQTV 

24 0007E DCBQN 

00000010 DCBQNV 

24 0007F DCBBOF 

(Listing of CHADCB continued 



INST OPER 



EQU 
EQU 



EQU 
EQU 



EQU 
EQU 



EQU 
EQU 



EQU 
EQU 



EQU 
EQU 



EQU 
EQU 



EQU 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 



X^O' 
DCBIZ 



X"40* 
DCBIZ 



X^O 1 
DCBIZ 



X'lO' 
DCBIZ 



X'QS 9 
DCBIZ 



X , 04 i 
DCBIZ 



X , 02' 
DCBIZ 



X'01' 

IF 

IF 

IF 

IF 

IF 

IF 

IF 

IF 

IF 

CL1 

CL1 

CL1 

DCBPR 

x'so 1 

DCBPR 
X f 40 f 
DCBPR 
X f 20' 
DCBPR 
X'10 1 



COMMENT 

RECOVERY ON BIT 

=0 f IOREQ TO APPLY ERROR 

RECORDING ON BIT 

BIT MASK 

=1,BSAM/QSAM TO APPLY ERROR 

RECOVERY ON BIT 1 

=0 f IOREQ TO APPLY ERROR 

RECORDING ON BIT 1 

BIT 1 MASK 

=1,BSAM/QSAM TO APPLY ERROR 

RECOVERY ON BIT 2 

=0,IOREQ TO APPLY ERROR 

RECORDING ON BIT 2 

BIT 2 MASK 

=1,BSAM/QSAM TO APPLY ERROR 

RECOVERY ON BIT 3 

=0,IOREQ TO APPLY ERROR 

RECORDING ON BIT 3 

BIT 3 MASK 

=1,BSAM/QSAM TO APPLY ERROR 

RECOVERY ON BIT 4 

=0 f IOREQ TO APPLY ERROR 

RECORDING ON BIT 4 

BIT 4 MASK 

=1,BSAM/QSAM TO APPLY ERROR 

RECOVERY ON BIT 5 

=0,IOREQ TO APPLY ERROR 

RECORDING ON BIT 5 

BIT 5 MASK 

=l f BSAM/QSAM TO APPLY ERROR 

RECOVERY ON BIT 6 

=0 r IOREQ TO APPLY ERROR 

RECORDING ON BIT 6 

BIT 6 MASK 

=1,BSAM/QSAM TO APPLY ERROR 

RECOVERY ON BIT 7 

=0,IOREQ TO APPLY ERROR 

RECORDING ON BIT 7 

BIT 7 MASK 

GET (VCON) 

GET (RCON) 

PUT VCON 

PUT (RCON) 

PUTX (VCON) 

PUTX (RCON) 

SETL (VCON) 

SETL (RCON) 

BLOCK COUNT 

SENSE BYTE 1 FOR BSP 

SENSE BYTE 2 FOR BSP 

PRINTER OVERFLOW FLAGS 

TEST CHANNEL 12 OVERFLOW BY 

WRITE FLAG 

TEST CHANNEL 12 OVERFLOW BY 

WRITE MASK 

TEST CHANNEL 

WRITE FLAG 

TEST CHANNEL 

WRITE MASK 

TEST CHANNEL 12 OVERFLOW BY 

DOQSAM(PUT) FLAG 

TEST CHANNEL 12 OVERFLOW BY 



9 OVERFLOW BY 



9 OVERFLOW BY 



DS XL1 

on page 135) 



DOQSAM(PUT) 
TEST CHANNEL 
DOQSAM(PUT) 
TEST CHANNEL 
DOQSAM(PUT) 



MASK 

9 OVERFLOW BY 

FLAG 

9 OVERFLOW BY 

MASK 



BUFFER OFFSET LENGTH (ASCII 
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(Listing of CHADCB continued from page 134) 



LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 


24 00080 




DCBRD 


DS 


0D 


24 00080 
24 00081 
24 00082 




DCBRDN 
DCBRDM 

DCBRDB 


DS 
DS 
DS 


XL1 
XL1 

H 


24 00084 




DCBRDT 


DS 


OF 


24 00084 




DCBRDC 


DS 


H 


24 00086 




DCBRDH 


DS 


H 


24 00086 


24 00086 


DCBRDR 


|ORG| 

DS 


DCBRDH 
XL1 


24 00087 
24 00088 
24 00090 




DCBRDZ 
DCBCSW 
DCBRCD 


DS 
DS 
DS 


XL1 

D 

IF 


24 00094 




DCBEAD 


DS 


IF 


24 00098 




DCBLX 

♦ 


DS 


IF 


24 0009C 




DCBLXN 

♦ 


DS 


CL2 


24 0009E 
24 O00AO 




DCBBSV 
DCBLAD 


DS 
DS 


CL2 
IF 


24 000A4 
24 OO0A8 
24 OOOAC 
24 OOOBO 
24 000B4 
24 000B8 
24 OOOBC 
24 OOOBE 




DCBDEl 
DCBDE2 
DCBDE3 
DCBBFl 
DCBBF2 
DCBBF3 
DCBLRS 
DCBSVL 


DS 
DS 
DS 
DS 
DS 
DS 
DS 
DS 


IF 

IF 

IF 

IF 

IF 

IF 

CL2 

CL2 


24 OOOCO 
24 000C4 
24 O0OC5 


00000080 


DCBQWK 
DCBQF0 
DCBQF1 
DCBWFL 


DS 
DS 
DS 
EQU 


IF 
CL1 
CL1 
X'8Q* 




00000040 
00000020 
00000010 
00000008 


DCBEOB 
DCBPTX 
DCBCPS 
DCBSW1 

♦ 


EQU 
EQU 
EQU 
EQU 


X f 40' 
X^O' 
X f 10 f 

x'os' 




00000004 


DCBLM 


EQU 


X , 04 t 


24 000C6 


00000002 
00000001 

00000080 


DCBSYN 
DCBACC 
DCBQF2 
DCBLSW 

♦ 


EQU 
EQU 
DS 
EQU 


X'02 1 
X , 01 f 
CL1 

X f 80' 




00000040 
00000020 


DCBSGB 
DCBDNN 


EQU 
EQU 


X'40 f 
X'20' 




00000010 


DCBDET 

* 


EQU 


X^O* 


24 000C7 
24 000C8 




DCBQF3 
DCBEND 


DS 
DS 


CL1 
OX 




000O00C8 


DCBSZ 


EQU 


DCBEND- 


24 00078 


24 00078 


|ORG| 
DS 


DCBBKC 
0CL32 


(Listing 


Of CHADCB 


continued 


on page 136) 



COMMENT 

TAPE) 

» FOR 

FULREL, RELLFUL, NOTE, POINT 

NUMBER OF RECORDS ON TRACK 

EXTENT NUMBER OF TRACK 

BB FIELD OF DIRECT ACCESS 

DEVICE 

TTRZ OR CCHH OF DIRECT 

ACCESS DEVICE S 

CC OF DIRECT ACCESS DEVICE 

a 

HH OF DIRECT ACCESS DEVICE 

a 

RECORD COUNT OF TTRZ FOR 
NOTE OR POINT 
ZERO FOR POINT OR NOTE 
CHANNEL STATUS WORD FOR BSP 
ADDRESS CURRENT LOGICAL 
RECORD IN BUFFER 
ADDRESS END OF CURRENT 
BUFFER 

RELATIVE ADDRESS USED BY 
SETL 

LOGICAL RECORD COUNT USED 
BY SETL 

SAVE AREA FOR BLOCK COUNT 
ADDRESS OF LAST LOGICAL 
RECORD 

ADDRESS OF QSAM DECB 1 
ADDRESS OF QSAM DECB 2 
ADDRESS OF QSAM DECB 3 
ADDRESS OF QSAM BUFFER 1 
ADDRESS OF QSAM BUFFER 2 
ADDRESS OF QSAM BUFFER 3 
SAVE AREA FOR LRECL 
SAVE AREA FOR LENGTH OF 
NEXT LOGICAL RECORD 
POINTER QSAM WORK AREA 
RESERVED FOR QSAM 
QSAM FLAGS FIRST BYTE 
WRITE REQUEST IN TRUNC EOV 
FLAG 

END OF BUFFER FLAG 
PUTX UPDATE FLAG 
SETL FLAG 

BUFFER INITIALIZATION 
SWITCH 

LOCATE OR MOVE MODE FOR PUT 
FLAG 

DCB EROPT SKP FLAG 
DCB EROPT ACCEPT FLAG 
QSAM FLAGS BYTE 2 
FIRST LOGICAL RECORD IN 
BUFFER FLAG 
SINGLE BUFFER FLAG 
CHANNEL 9 OVERFLOW ON PUT 
FLAG 

CHANNEL 12 OVERFLOW ON PUT 
FLAG 

SAVE AREA FOR DCBOPI 
END OF DCB FOR QSAM 
16447 
-CHADCB SIZE OF DCB FOR QSAM 
16447 
REORGIN FOR VAM 
ORGANIZATION INDEPENDENT 
WORKING STORAGE 



CHADCB 135 



C Li sting of CHADCB continued from page 135) 





LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 




24 


00078 




DCBVMA 


DS 


F 




24 


0007C 




DCBCPB 


DS 


OF 




24 


0007C 




DCBDPN 


DS 


H 




24 


0007E 




DCBCBP 


DS 


H 




24 


00080 




DCBN 

♦ 


DS 


H 




24 


00082 




DCBM 


DS 


H 




24 


00084 


24 00084 


DCBOP 


DS 
J0RG| 


H 
DCBOP 




24 


00084 




DCBOPF 


DS 


XL1 








00000080 


DCBOP0 


EQU 


X^O' 








00000020 


DCBOP 2 

♦ 


EQU 


X f 20 f 








00000010 


DCBOP3 


EQU 


X'lO 1 








00000008 


DCBOP4 


EQU 


X'Q8 % 








00000004 


DCBOP 5 


EQU 


X'04' 








00000002 


DCBOP6 


EQU 


X f 02 f 








00000001 


DCBOP 7 


EQU 


X^l - 




24 


00085 




DCBOPM 


DS 


XL1 








00000080 


DCBOP 8 


EQU 


X^O' 




24 


00086 




DCBI 


DS 


CL1 








00000000 


DCBIM0 


EQU 


X'OO' 








00000001 


DCBIM1 


EQU 


X , 01 f 








00000002 


DCBIM2 


EQU 


X i 02 < 








00000004 


DCBIM4 


EQU 


X f 04' 








00000008 


DCBIM8 


EQU 


X'08' 








00000010 


DCBIM10 


EQU 


X'10' 




24 


00087 




DCBHV 


DS 


CL1 




24 


00088 




DCBNI 
DCBSHC 


DS 


H 




24 


0008A 




DS 


XL1 




24 


0008B 




DCBSWT 


DS 


XL1 




24 


0008C 




DCBSP 

♦ 


DS 


F 




24 


00090 




DCBSC 

* 


DS 


F 




24 


00094 




DCBHD 


DS 


F 




24 


00098 




DCBNPO 


DS 


H 




24 


0009A 




DCBFPO 

DCBBPU 


DS 


H 




24 


0009C 




DS 


H 




24 


0009E 




DCBHLB 


DS 


CL1 




24 


0009F 




DCBLOF 


DS 


CL1 








00000003 


DCBL01 


EQU 


X , 03 f 








oooooooc 


DCBL02 


EQU 


X'OC 1 








oooooocc 


DCBL03 


EQU 


X f CC' 








000000C3 


DCBL04 


EQU 


X , C3 f 








0000003C 


DCBL05 


EQU 


X^C 1 








00000033 


DCBL06 


EQU 


X'33' 




24 


O0OAO 




DCBPRL 


DS 


F 




24 


000A4 


24 00098 


DCBBP 


DS 
)ORG| 


F 
DCBNPO 




24 


00098 




DCBPCC 


DS 


F 




24 


0009C 




DCBOPC 


DS 


F 




24 


000A0 




DCBCL 


DS 


H 




24 


000A2 




DCBCCL 


DS 


H 




( Listing 


Of CHADCB 


continued 


on pag 


\e 137) 


136 CHADCB 















COMMENT 

VMA OF NEXT LOGICAL RECORD 

CURRENT DATA PAGE NUMBER 

CURRENT BYTE WITHIN CURRENT 

PAGE 

FIRST PAGE OF AN OPERATION 

REQUEST 

NUMBER OF PAGES INVOLVED IN 

A REQUEST 

TYPE OF VAM OPERATION 

REQUESTED 

REQUEST FLAGS 
INPUT REQUEST 
INPUT REQUEST WITH 
EXCLUSIVE READ 
OUTPUT REQUEST 
INSERT PAGE REQUEST 
DELETE PAGE REQUEST 
RELEASE READ LOCK 
RELEASE WRITE LOCK 
REQUEST FLAGS (CONT) 
REPLACE BLANK PAGES ON AN 
INSERT 
FLAGS 



MULTIPLE DCB FLAG 

N419 
PUT INHIBIT FLAG 

N419 
V-FORMAT TRAILER ISOLATED 
ON FINAL PAGE M4195 
HASHED VALUE 

FIRST PAGE RELATIVE TO THE 
DATA SET 

TYPE OF SEARCH REQUEST-VPAM 
DATA SETS 

VPAM INDICATOR, INTERNAL TO 
VAM ONLY 

LOCATION OF PREVIOUS 
DESCRIPTOR 
LOCATION OF CURRENT 
DESCRIPTOR 

LOCATION OF DCB HEADER 
NUMBER OF PAGES TO B5 
OUTPUT 

NUMBER OF FIRST PAGE TO BE 
OUTPUT 

NUMBER OF BUFFER PAGES IN 
USE 

HOLD LAST BUFFER FLAG 
LAST OPERATION FLAG 
SETL 
PUTX 

GET MOVE MODE 
GET LOCATE MODE 
PUT MOVE MODE 
PUT LOCATE MODE 
PREVIOUS LOGICAL RECORD 
LENGTH 
CURRENT BUFFER POSITION 

DATA PAGE CALL COUNTER 
OVERFLOW PAGE COUNTER 
ADDRESS OF CURRENT LOCATOR 
CONTENTS OF CURRENT LOCATOR 



I 



(Listing of CHADCB continued from page 136) 



LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 


COMMENT 


24 O0OA4 






DCBIOS 


DS 


CL1 


I/O SWITCH 


24 000A5 






DCBPT 


DS 


CL1 


PAGE TYPE 


24 O0OA6 






DCBCRL 


DS 


H 


CURRENT RECORD LENGTH 


24 000A8 






DCBCRS 


DS 


CL1 


CURRENT RECORD SWITCH 


24 000A9 






DCBRES 


DS 


CL1 


READ EXCLUSIVE SWITCH 


24 OOOAA 






DCBPLM 


DS 


CL1 


PUT LOCATE MODE ONLY 


24 OOOAB 






DCBPMM 


DS 


CL1 


PUT MOVE MODE ONLY 


24 OOOAC 






DCBOLM 


DS 


CL1 


OUTSTANDING LOCATE MODE GET 


24 OOOAD 






DCBASY 


DS 


CL1 


ASYNCHRONOUS SWITCH 


24 OOOAE 






DCBFLAG 


DS 


XL1 


FLAG BYTE 




24 


OOOAE 


DCBFMP 


EQU 


DCBFLAG 


CLOSEVAM/MVPG FLAG 




0000000F 


DCBFMPM 


EQU 


X'OF^ 


MVPG TO BYPASS GETNUMBER 








♦ 






CALL 


24 OOOAF 








DS 


XL1 


UNUSED 


24 OOOBO 






DCBRK 


DS 


F 


POINTER TO THE 256 BYTE 
RECORD KEY AREA 


24 000B4 






DCBDMS 


DS 


H 


NO. OF DATA PAGES IN DS/MBR 




24 


00078 


* 


|ORG[ 


DCBBKC 


(VAM) 

REORGIN FOR IOREQ 


24 00078 






* 


DS 


0CL48 


IOREQ INDEPENDENT WORKING 
STORAGE 


24 00078 






DCBTMP 


DS 


F 


DECB POINTER USED BY IOREQ 


24 0007C 






DCBTCC 


DS 


F 


POINTER TO A CCW IN VCCW 
LIST 


24 00080 






DCBLRL 


DS 


F 


LOWEST READ LIMIT IN BUFFER 


24 00084 






DCBHRL 

* 


DS 


F 


HIGHEST READ LIMIT IN 
BUFFER 


24 00088 






DCBSCC 

* 


DS 


H 


REL NO. OF VCCW IN THE VCCW 
LIST 


24 0008A 








DS 


CL2 


RESERVED BYTES 


24 0008C 






DCBRBF 


DS 


F 


READ AREA IN BUFFER OF 
IORCB 


24 00090 






DCBWBF 


DS 


F 


WRITE AREA IN BUFFER OF 
IORCB 


24 00094 






DCBCLE 


DS 


F 


CCW POINTER IN IORCB 


24 00098 






DCBKNT 


DS 


F 


PAGE LIST ENTRY IN IORCB 


24 0009C 






DCBWCT 


DS 


H 


COUNT OF WRITE VCCWS 


24 0009E 






DCBNCN 

* 


DS 


H 


DISP IN CLE TO PAGE LIST 
ENTRY 


24 000A0 






DCBDEC 


DS 


F 


POINTER TO DEBDEC 


24 000A4 








DS 


CL2 


RESERVED BYTES 


24 000A6 






DCBFLG 


DS 


CL1 


FLAGS FOR IOREQ 




24 


000A6 


DCBNCH 

* 


EQU 


DCBFLG 


NON-TIC WITH NO CC,CD,OR 
SCC FLAGS 




00000040 


DCBNC1 


EQU 


X , 40 f 


DCBNCH MASK 




24 


0O0A6 


DCBIOI 

* 


EQU 


DCBFLG 


ENTERED FROM CHECK FOR 
INTERCEPT DECB 




00000010 


DCBIOX 


EQU 


X'lO 1 


DCBIOI MASK 


24 000A7 






DCBNPL 

* 


DS 


CL1 


NO. PGE LIST ENTRIES IN 
IORCB 




24 


00078 




]ORG| 


DCBBKC 


REORIGIN FOR MSAM 


24 00078 






♦ 


DS 


OD 


80 BYTES FOR MSAM BEGINNING 
ON A DW BOUNDARY 


24 00078 






DCBRETRY 

* 


DS 


CL1 


OPERATOR RETRY FOR READ 
ERROR ON 2540 




000000D5 


DCBRETN 


EQU 


C'N' 


NO RETRY 




OO0OOOE4 


DCBRETU 


EQU 


C'W 


USE THRESHOLD RETRY VALUE 


24 00079 






DCBPOCKE 

* 


; ds 


CL1 


STACKER FOR CARDS READ IN 
ERROR ON 2540 




00000004 


DCBSTORG 


1 EQU 


X'04 - 


STACK AS IF NO ERROR 








♦ 






OCCURRED 




00000001 


DCBPKT1 


EQU 


DCBST1 


STACKER 1 




00000002 


DCBPKT2 


EQU 


DCBST2 


STACKER 2 


24 0007A 






DCBINHMS 


1 DS 


CL1 






24 


0007A 


DCBINH 


EQU 


DCBINHMS 






00000080 


DCBINHM 


EQU 


X^O' 


INHIBIT MESSAGE TO REMOVE 








♦ 






DATA SET FLAG 


24 0007B 






DCBCOMBI 


DS 


CL1 




(Listing 


of 


CHADCB 


continued 


on page 138) 
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(Listing of CHADCB continued from page 137) 



LOCATION INSTRUCTION SOURCE INST OPER 



24 0007B 
00000001 



24 0007C 

24 00080 

24 00082 
24 00090 

24 00094 

24 00098 

24 0009C 
24 0009L 
24 000A0 
24 OO0A8 
24 000AC 
24 000B0 
24 000B4 

24 000B8 

24 000BC 



EQU 
EQU 

DS 



000000C4 
000000C6 
00O0OOE2 



24 000BD 
24 000BE 
24 000C4 



24 000C4 
00000080 

24 000C4 
00000040 

24 000C4 
00000020 

24 000C4 
00000010 

24 000C4 
00000008 
24 000C4 
00000004 

24 000C4 
00000002 
24 000C4 

00000001 

24 000C5 

24 000C5 
00000040 
24 000C5 
00000020 
24 000C5 
00000010 
24 000C5 
00000008 
24 000C5 
00000004 

24 000C5 

(Listing of CHADCB 



DCBCMB 
DCBCMBM 

DCBICB 

DCBLRMAX DS 

* 

DS 
DS 



DCBLRC 

DCBEAP 

DCBPPT 

* 

DCBRCX 

DCBCNT 



DS 

DS 

DS 
DS 
DS 
DS 
DS 
DS 
DS 



DCBCDE 

DCBFDE 
DCBLDE 
DCBTDE 

DCBUDE DS 
* 

DCBFRMTP DS 

DCBFRMD EQU 

DCBFRMF EQU 

DCBFRMS EQU 

DCBSTRIK DS 
DS 

DCBMSF1 DS 

DCBEOP EQU 

DCBEOPM EQU 

DCBIOC EQU 

DCBIOCM EQU 

DCBENT EQU 

DCBENTM EQU 

DCBOVF EQU 

DCBOVFM EQU 

DCBELP EQU 

DCBELPM EQU 

DCBNLP EQU 

DCBNLPM EQU 

DCBRJE EQU 

DCBRJEM EQU 

DCBSWA EQU 



DCBCOMBI 
X'Ol* 



CL14 
F 



H 
H 
D 
F 
F 
F 
F 



CL1 

CD' 
c t F i 

C'S' 

XL1 

CL6 

CL1 

DCBMSF1 

x'so 1 

DCBMSF1 
X^O' 

DCBMSFl 
X 9 20 9 

DCBMSF1 
X'10' 

DCBMSF1 
X 9 QB 9 
DCBMSFl 
X'04 1 

DCBMSFl 

X f 02' 

DCBMSF1 



DCBSWAM EQU 

* 

DCBMSF2 DS CL1 

DCBPUR EQU DCBMSF2 

DCBPURM EQU X*40 f 

DCBSUR EQU DCBMSF2 

DCBSURM EQU X'20 t 

DCBFIN EQU DCBMSF2 

DCBFINM EQU X'lO' 

DCBFIP EQU DCBMSF2 

DCBFIPM EQU X'OS" 

DCBFT EQU DCBMSF2 

DCBFTM EQU X i 04 i 

DCBFWT EQU DCBMSF2 

continued on page 139) 



COMMENT 

COMBINE A RDR ON SAME 2540 

AS PUNCH FLAG 

ADDRESS OF ICB NAMED IN SIR 

0=NONE 

MAXIMUM LOGICAL RECORD 

LENGTH 

RESERVED FOR FUTURE USE 

DCBRCD — ADDRESS CURRENT 

LOGICAL RECORD IN BUFFER 

DCBEAD — ADDRESS END OF 

CURRENT BUFFER+1 

ADDRESS OF CURRENT BUFFER 

PAGE 

RETURN CODE 

LOGICAL RECORD COUNT 

RESERVED FOR FUTURE USE 

ADDRESS OF CURRENT DECB 

ADDRESS OF FIRST DECB 

ADDRESS OF LAST DECB 

ADDRESS OF DECB FOR PUT 

COMPLETION TESTING 

ADDRESS OF ERROR DECB FOR 

USER 

FORM TYPE FOR PRINTING 

DUMP MODE 

FORM SENSITIVE 

SEQUENCE SENSITIVE 

UCS STRIKE OUT CODE 

RESERVED 

MSAM FLAGS FIRST BYTE 

END OF BUFFER PROCESSING 
NECESSARY FLAG 

READ/WRITE INVOKED FOR END 
OF BUFFER FLAG 

BUFFER PRIMING REQUIRED 
FLAG 

FOR FORM TYPE F— NEW PRINT 
PAGE FLAG 

LAST PUT LOCATE FLAG 

IN PROCESS, LAST PUT LOCATE 

FLAG 

REMOTE JOB ENTRY FLAG 

REMOTE JOB ENTRY MASK 

SWITCH ACKNOWLEDGEMENTS IN 

GET IORCB 

SWITCH AKNGMNTS. IN GET 

IORCB MASK 

MSAM FLAGS SECOND BYTE 

PURGE ALL I/O IN CLOSE FLAG 

SETUR IN PROCESS FLAG 

FINISH ISSUED FLAG 

FINISH IN PROCESS FLAG 

FIRST TIME AFTER OPEN OR 

FINISH 

FIRST WRITE (ASA) WILL HAVE 

NO DUMMY RECORD 
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(Listing of CHADCB continued from page 138) 



LOCATION 


INSTRUCTION SOURCE INST 


OPER 


COMMENT 




00000002 


DCBFWTM EQU 


X f 02" 


FIRST WRITE MASK 




24 


000C5 


DCBENOF EQU 


DCBMSF2 


RJE END OF FILE FLAG 




00000001 


DCBENOFM EQU 


X f 01 f 


RJE END OF FILE MASK 




24 


000C5 


DCBBLA1 EQU 

* 


DCBMSF2 


LAST ACK OF PREVIOUS BUFFER 
WAS ON ACK1, 




00000080 


DCBBLA1M EQU 


X^O* 


LAST ACK OF PREVIOUS BUFFER 








* 




MASK 


24 000C6 






DCBMSF3 DS 


XL1 


MSAM FLAGS THIRD BYTE 




24 


000C6 


DCBSAIN EQU 

* 


DCBMSF3 


NO IORCB TO BE REISSUED 
FLAG 




00000080 


DCBSAINM EQU 


X^O" 


NO IORCB TO BE REISSUED 








* 




MASK 




24 


000C6 


DCBRJIN EQU 


DCBMSF3 


INTERNAL RJE DOMSAM FLAG 
FOR NO 




00000040 


DCBRJINM EQU 


X , 40 i 


DUMMY 




24 


000C6 


DCBTAB EQU 

* 


DCBMSF3 


TABBING PRESENT 
N412.2 




00000010 


DCBTABM EQU 


X'10' 


N412.2 




24 


0O0C6 


DCBMRF EQU 


DCBMSF3 


MRF FORMAT WHEN ON 




00000020 


DCBMRFM EQU 


X'20 - 






24 


000C6 


DCBCAN EQU 

* 


DCBMSF3 


CANCEL OUTSTANDING IO FLAG 
M3823 




00000001 


DCBCANM EQU 


X f 01 f 


CANCEL OUTSTANDING IO MASK 








♦ 




M3823 


24 00OC7 






DS 


XL1 


RESERVED 




24 


00078 


|ORG| 


DCBBKC 




24 00078 






DCBSFS DS 


19F 


TAM'S SAVE AREA FOR CALLING 
FENCE SITTERS 




24 


00000 


DCBDSORG EQU 


DCBDSO 


♦ 




24 


00002 


DCBMACRF EQU 


DCBMAC 


* 




24 


00008 


DCBDDNAM EQU 


DCBDDN 


* 




24 


0002E 


DCBLRECL EQU 


DCBLRE+2 






24 


0002B 


DCBOPTCD EQU 


DCBOPT 


* 




24 


00032 


DCBSTACK EQU 


DCBSTA 


♦ 




24 


00033 


DCBTRTCH EQU 


DCBTRT 


* 




24 


00028 


DCBBFTEK EQU 


DCBBFT 


♦ 




24 


00030 


DCBBLKSI EQU 


DCBBLK 


* 




24 


00004 


DCBEXLST EQU 


DCBEXL 


* 




24 


0003F 


DCBOFLGS EQU 


DCBOFG 


* 




24 


00023 


DCBBUFNO EQU 


DCBBUN 


* EQUATES GIVE USER 
COMPATIBILITY 




24 


00020 


DCBBUFL EQU 


DCBBUF 


* OS/360 




24 


00051 


DCBIFLGS EQU 


DCBIFL 


* 




24 


0002A 


DCBRECFM EQU 


DCBREC 






24 


00034 


DCBEROPT EQU 


DCBERO 


* 




24 


00032 


DCBKEYLE EQU 


DCBKEY 


* 




24 


00032 


DCBCODE EQU 


DCBCOD 


* 




24 


00033 


DCBMODE EQU 


DCBMOD 


* 




24 


00032 


DCBPTRSP EQU 


DCBPRT 


# 




24 


00024 


DCBBUFCB EQU 


DCBBCN 


* 




24 


00022 


DCBDEVT EQU 


DCBDEV 






24 


00002 


DCBMACR EQU 


DCBMAC 






24 


0004C 


DCBDEBAD EQU 


DCBDEB 






24 


00010 


DCBSYNAD EQU 


DCBSYV 






24 


00018 


DCBEODAD EQU 


DCBEOV 






24 


0003C 


DCBEXCD1 EQU 


DCBEX1 






24 


0003D 


DCBEXCD2 EQU 


DCBEX2 






24 


00051 


DCBIFLG EQU 


DCBIFL 






24 


00094 


DCBEOBAD EQU 


DCBEAP 




( Listing 


Of 


CHADCB 


continued on pag 


re 140) 
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(Listing of CHADCB continued from page 139) 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 


COMMENT 






24 


00090 


DCBRECAD 


EQU 


DCBLRC 








00000020 


DCBOVT 


EQU 


DCBIF2 


EQUATES 


TO IFLAGS 




00000040 


DCBOVN 


EQU 


DCBIF1 


USED IN 


BSAM 




24 


00038 


DCBLP 


EQU 


DCBLPA 


EQU FOR 


QSAM 




24 


00054 


DCBIMSK 


EQU 


DCBIMK 








24 


00000 


IHADCB 


EQU 


CHADCB 








24 


00014 




)ORG| 


IHADCB+20 






24 00014 






DCBBUFRQ 


DS 


0BL1 






24 00014 






DCBTRMAD 


DS 


A 






24 00018 






DCBSOWA 


DS 


H 








24 


00020 




I0RG| 


IHADCB+32 






24 00020 






DCBBFALN 


DS 


0BL1 








24 


00044 




(ORG I 


IHADCB+68 






24 00044 






DCBSMSI 


DS 


AL2 








24 


00048 




|ORG| 


IHADCB+7 2 






24 00048 






DCBMSHI 


DS 


A 







p 
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Combined Dictionary ( CHADCT, C HAD Eff) 

The Combined Dictionary, used by the command system for resolution of verbs and 
parameters f contains three classes of entries: 

1. Synonym and Default Entries 

2. Procedure Definition Entries 

3. Command Symbol Definition Entries 

The dictionary consists of a header (CHADCT) f and a variable number of entries CCHA- 
DEN), The full Combined Dictionary exists only in virtual storage: dictionaries 
containing synonym and default entries exist in the User Profile (CHAPFL) ; dic- 
tionaries containing procedure definition entries appear as procedure dictionaries* 

CHADCT Storage map 



DEC HEX 

0|DCTID | 

I L 

8 8| 



272 



DCTBL 



DCTDLB 



DCTASP 



DCTHTB 



264 108 | 



DCTSEN 



110|DCTSEC |DCTSDL | 



DCTNXT 



L 



JL 



I 



Fields in CHADCT — by displacement 



DEC HEX FIELD 

0000 0000 DCTID 

0001 0001 DCTBL 
0004 0004 DCTDLB 
0006 0006 DCTASP 



DEC HEX FIELD 
0008 0008 DCTHTB 
0264 0108 DCTSEN 

0272 0110 DCTSEC 

0273 0111 DCTSDL 



DEC HEX FIELD 
0274 0112 DCTNXT 
0276 0114 DCTDAT 



(EQU) 



Alphabetical list of fields in CHADCT 



FIELD 

DCTASP 

DCTBL 

DCTDAT 

DCTDLB 



DEC HEX FIELD DEC HEX 

0006 0006 DCTHTB 0008 0008 

0001 0001 DCTID 0000 0000 

0276 0114 (EQU) DCTNXT 0274 0112 



0004 0004 



DCTSDL 0273 0111 



FIELD DEC HEX 
DCTSEC 0272 0110 
DCTSEN 0264 0108 



Assembler listing of CHADCT 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 


COMMENT 






25 


00000 


CHADCT 

* 


DSECT 




, CONTROL 
DICTIONARY HEADING 


25 


00000 






DCTID 

* 


DS 


CL1 


FIXED OR VARIABLE 
IDENTIFIER 


25 


00001 






DCTBL 


DS 


CL3 


UNUSED SPACE 


25 


00004 






DCTDLB 


DS 


H 


LENGTH OF DICTIONARY IN 
BYTES 


25 


00006 






DCTASP 


DS 


AL2 


AVAILABLE SPACE POINTER 


25 


00008 






DCTHTB 


DS 


128AL2 


HASH TABLE POINTERS 


25 


00108 






DCTSEN 


DS 


CL8 


BLANK ENTRY NAME START 
ENTRY 


25 


00110 






DCTSEC 


DS 


XL1 


STARTING ENTRY CODE- 2 55 


25 


00111 






DCTSDL 


DS 


XL1 


LENGTH OF DATA IN BYTES 


25 


00112 






DCTNXT 


DS 


AL2 


NEXT ENTRY 






25 


00114 


DCTDAT 


EQU 


* 


DATA STARTS HERE 
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CHADE2A Storage map 



DEC 


8 

16 



HEX 
Of 
I. 



DENNAM 



I 



8 | DENCOD | DENDL 

I 1 

10 1 DENEXT 



DENNXT 



I DENLIB 



DENEXT 



_L 



CCONT) 



± 



Fields in CHADEN — by displacement 

DEC HEX FIELD 

0000 0000 DENNAM 

0008 0008 DENCOD 

0009 0009 DENDL 

Alphabetical list of fields in CHADEN 



DEC HEX FIELD 
0010 000A DENNXT 
0012 000C DENDAT 
0012 000C DENLIB 



DEC HEX FIELD 
0013 000D DENEXT 



(EQU) 



FIELD DEC HEX FIELD DEC HEX 

DENCOD 0008 0008 DENEXT 0013 000D 

DENDAT 0012 000C (EQU) DENLIB 0012 000C 

DENDL 0009 0009 DENNAM 0000 0000 



FIELD 
DENNXT 



DEC HEX 
0010 000A 



142 CHADEN 



Assembler listing of CHADEN 



LOCATION 



INSTRUCTION 
28 00000 



28 00000 
28 00008 



00000004 
00000008 
00000010 
00000020 
00000040 
00000041 



00000042 

0000004A 
00000043 



28 00009 



00000009 
00000001 



28 00O0A 



28 O0O0C 



00000000 
00000001 
28 0000C 



28 0000D 



SOURCE 
CHADEN 

DENNAM 
DEN COD 
DENSYN 
DENDEF 
DENTXP 
DENBIP 
DENICS 
DENFPS 

DENCSS 

DENLCS 
DENHCS 

DENDL 

* 

DENLB 
DENLT 
DENNXT 

* 
DENLIB 

DENSLM 
DENULM 
DEN DAT 

♦ 

* 

DEN EXT 



INST 
DSECT 

DS 

DS 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 



EQU 



DS 



EQU 
EQU 
DS 



DS 



EQU 
EQU 
EQU 



DS 



OPER 



CL8 

XL1 

4 

8 

16 

32 

64 

65 



COMMENT 



CONTROL 
ENTRY 



66 



EQU 74 
EQU 67 



* 
* 
* 

* 



DATA FIELD 



XL1 



9 
1 
AL2 



XL1 



X'O 1 
X'l' 

DENLIB 



CL8 
CONTAINS 



DICTIONARY 

ENTRY NAME 

ENTRY CODE 

SYNONYM CODE 

DEFAULT CODE 

TEXTUAL PROCEDURE CODE 

BUILTIN CODE 

INTEGER COMMAND SYMBOL CODE 

FLOATING POINT COMMAND 

SYMBOL 

CODE 

CHARACTER STRING COMMAND 

SYMBOL 

CODE 

LOGICAL COMMAND SYMBOL CODE 

16400 
HEX COMMAND SYSMBOL CODE 

16400 
ENTRY DATA LENGTH IN BYTES 
INCLUDES LENGTH OF DENLIB 
FIELD 

BUILTIN ENTRY LENGTH 
TEXTUAL PROCEDURE LENGTH 
POINTER TO NEXT ENTRY IN 
HASH 
CHAIN 

ENTRY DATA STARTS HERE 
LIBRARY DESIGNATION FOR 
BUILTINS 

AND TEXTUAL PROCEDURES 
SYSLIB CODE 
USERLIB CODE 
FOR SYNONYM, DEFAULT OR 
COMMAND 

SYMBOL ENTRIES, FIELD 
CONTAINS 

LENGTH OF DATA IN DENEXT 
FIELD 

DATA FIELD 
- FOR SYNONYM, DEFAULT OR 



COMMAND SYMBOL, THE 

ASSOCIATED VALUE 
-FOR TEXTUAL PROCEDURE, NOT USED 
-FOR BUILTIN IF FIRST BYTE NON-ZERO, 
THE BPKD EXTERNAL SYMBOL (APPLIES 

TO ALL USER LIB ENTRIES) 
-FOR BUILTIN IF FIRST BYTE ZERO, 
THE STORAGE PROTECTION CLASS IN FOURTH BYTE. 
AND VCON OF BPKD IN LAST FOUR BYTES 
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Data Extent Block (CHADEB) 

The Data Extent Block (DEB) provides the requested attributes of both the data set 
and the device on which the volume for that data set resides. It also contains poin- 
ters to other control blocks associated with the data set. If a direct access volume 
is used f the DEB also contains information about the volume extents. 

The user has read-only access to the DEB, which occupies a minimum of 84 bytes of 
virtual storage aligned on word boundaries. 
The DEB is logically divided into three sections: 

• An 8 4 -byte section containing information about the data set, and the device on 
which the volume for that data set resides. 

• A 4 -byte section containing a chain of pointers to DECBs which have not yet been 
checked by the user. The chain is updated by the CHECK routine and is variable 
in length depending on the NCP parameter. 

• A third section which exists only if direct access volumes are involved. The 
length depends on the number of extents within the volume. This section contains 
information about the extents, and the length of the section in bytes is 40 plus 
16 times the number of extents. 

The DCB and JFCB contain pointers to the DEB. 

CHADEB Storage map 



DEC 


8 

16 

24 

32 

40 

48 

56 

64 

72 

80 

88 

96 

104 

112 

120 

128 

136 



HEX 



8 
10 
18 
20 
28 
30 
38 
40 
48 
50 
58 
60 
68 
70 
78 
80 
88 



| DEBDCB 


DEBJFC | 


| DEBSDT 


DEBMDL (DEBDVC | DEBUNT | DEBFEA | 
111! 


| DEBIO | 
I 1 


DEBIOC 


DEBBTK 




DEBTKC | 


| DEBSYM | 
I » 


DEBMSK | 


DEBID 




DEBSIZ 1 


| DEBPSV 


DEBPSR | 


| DEBNF 


(DEBENOF jDEBFL ( DEBDN 
f 1 1 


DEBCLS | 

1 


UNNAMED | 


| DEBER2 


DEBWRK I 


| DEBIOF 


(DEBOPT | 
t f 


DEBLBC 


DEBUS Z 


i 
i 


DEBVOL | 


| DEBBF1 


DEBBF2 I 


| DEBLSW 


DEBNP 


i 

I 


DEBNPC | 


| DEBDEL 


j DEBDEC | 


(DEBLWR 


IDEBLWM | 
1 « 


DEBLWB 


DEBLWC 


1 

I 


DEBLWH | 


| DEBNIR 


| DEBNIM | 
1 1 


DEBNIB 


i DEBNIC 


1 

i 


DEBNIH | 


| DEBLIR 


(DEBLIM I 
1 1 


DEBLIB 


DEBLIC 


1 
i 


DEBLIH | 


| DEBETR 


| DEBETM | 
1 I 


DEBETB 


! DEBETC 


1 
I 


DEBETB | 


| DEBATR 


JDEBATM | 
1 I 


DEBATE 


DEBATC 


I 

I 


DEBATH | 


I DEBEXF 


| DEBMBM | 
1 1 


DEBBBB 


| DEBLCC 


1 

I 


DEBLHH | 


I DEBUCC | 


DEBUHH 


DEBTKN 


i 
i 


DEBBLT I 
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Fields in CHADEB — by displacement 



DEC 

0000 

0000 

0004 

0008 

0012 

0012 

ooia 

0014 
0015 
0016 
0018 
0020 
0022 
0024 
0026 
0028 
0030 
0032 
0036 
0040 
0040 
0041 
0042 
0042 
0042 
0043 
0044 
0048 
0052 
0056 



HEX 

0000 

0000 

0004 

0008 

00 0C 

000C 

000D 

O00E 

000F 

0010 

0012 

0014 

0016 

0018 

001A 

001C 

001E 

0020 

0024 

0028 

0028 

0029 

00 2A 

00 2A 

002A 

002B 

00 2C 

0030 

0034 

0038 



FIELD 

DEBDCB 

DEBBEG 

DEBJFC 

DEBSDT 

DEBMDL 

DEBCLT 

DEBDVC 

DEBUNT 

DEBFEA 

DEBIO 

DEBIOC 

DEBBTK 

DEBTKC 

DEBSYM 

DEBMSK 

DEBID 

DEBSIZ 

DEBPSV 

DEBPSR 

DEBNF 

DEBER1 

DEBENOF 

DEBDA 

DEBTP 

DEBFL 

DEBDN 

DEBCLS 

DEBER2 

DEBWRK 

DEBIOF 



DEC 
0057 
0058 
0060 
0062 
0064 
0068 
0072 
0076 
0078 
0080 
0084 
0088 
0088 
0088 
0088 
0089 
0090 
0092 
0094 
0096 
0096 
0097 
(EQU> 0098 
(EQU) 0100 
0102 
0104 
0104 
0105 
0106 
0108 



HEX 

0039 

00 3A 

003C 

003E 

0040 

0044 

0048 

004C 

004E 

0050 

0054 

0058 

0058 

0058 

0058 

0059 

005A 

00 5C 

005E 

0060 

0060 

0061 

0062 

0064 

0066 

0068 

0068 

0069 

006A 

006C 



FIELD 

DEBOPT 

DEBLBC 

DEBUSZ 

DEBVOL 

DEBBF1 

DEBBF2 

DEBLSW 

DEBNP 

DEBNPC 

DEBDEL 

DEBDEC 

DEBLWR 

DEBLWT 

DEBDAF 

DEBEND 

DEBLWM 

DEBLWB 

DEBLWC 

DEBLWH 

DEBNIR 

DEBNIO 

DEBNIM 

DEBNIB 

DEBNIC 

DEBNIH 

DEBLIR 

DEBLIO 

DEBLIM 

DEBLIB 

DEBLIC 



DEC 
0110 
0112 
0112 
0113 
0114 
0116 
0118 
0120 
0120 
0121 
0122 
0124 
0126 
(EQU) 0128 
(EQU) 0128 
0128 
0129 
0129 
0130 
0132 
0132 
0134 
0136 
0136 
0138 
0140 
0142 
0144 



HEX 

006E 

0070 

0070 

0071 

0072 

0074 

0076 

0078 

0078 

0079 

007A 

007C 

007E 

0080 

0080 

0080 

0081 

0081 

0082 

0084 

0084 

0086 

0088 

0088 

008A 

008C 

008E 

0090 



FIELD 

DEBLIH 

DEBETR 

DEBETK 

DEBETM 

DEBETB 

DEBETC 

DEBETH 

DEBATR 

DEBATK 

DEBATM 

DEBATE 

DEBATC 

DEBATH 

DEBEXF 

DEBDAV 

DEBEDF 

DEBMBM 

DEBMBB 

DEBBBB 

DEBLCC 

DEBLCH 

DEBLHH 

DEBUCC 

DEBUCH 

DEBUHH 

DEBTKN 

DEBBLT 

DEBEDV 



(EQU) 
(EQU) 



(EQU) 



Alphabetical list of fields in CHADEB 



FIELD 

DEBATE 

DEBATC 

DEBATH 

DEBATK 

DEBATM 

DEBATR 

DEBBBB 

DEBBEG 

DEBBF1 

DEBBF2 

DEBBLT 

DEBBTK 

DEBCLS 

DEBCLT 

DEBDA 

DEBDAF 

DEBDAV 

DEBDCB 

DEBDEC 

DEBDEL 

DEBDN 

DEBDVC 

DEBEDF 

DEBEDV 

DEBEND 

DEBENOF 

DEBER1 

DEBER2 

DEBETB 

DEBETC 



DEC 

0122 

0124 

0126 

0120 

0121 

0120 

0130 

0000 

0064 

0068 

0142 

0020 

0044 

0012 

0042 

0088 

0128 

0000 

0084 

0080 

0043 

0013 

0128 

0144 

0088 

0041 

0040 

0048 

0114 

0116 



HEX 

007A 

007C 

007E 

0078 

0079 

0078 

0082 

0000 

0040 

0044 

008E 

0014 

002C 

000C 

002A 

0058 

0080 

0000 

0054 

0050 

002B 

000D 

0080 

0090 

0058 

0029 

0028 

0030 

0072 

0074 



(EQU) 
(EQU) 

(EQU) 



(EQU) 
(EQU) 
(EQU) 



FIELD 

DEBETH 

DEBETK 

DEBETM 

DEBETR 

DEBEXF 

DEBFEA 

DEBFL 

DEBID 

DEBIO 

DEBIOC 

DEBIOF 

DEBJFC 

DEBLBC 

DEBLCC 

DEBLCH 

DEBLHH 

DEBLIB 

DEBLIC 

DEBLIH 

DEBLIM 

DEBLIO 

DEBLIR 

DEBLSW 

DEBLWB 

DEBLWC 

DEBLWH 

DEBLWM 

DEBLWR 

DEBLWT 

DEBMBB 



DEC 

0118 

0112 

0113 

0112 

0128 

0015 

0042 

0028 

0016 

0018 

0056 

0004 

0058 

0132 

0132 

0134 

0106 

0108 

0110 

0105 

0104 

0104 

0072 

0090 

0092 

0094 

0089 

0088 

0088 

0129 



HEX 

0076 

0070 

0071 

0070 

0080 

000F 

002A 

001C 

0010 

0012 

0038 

0004 

003A 

0084 

0084 

0086 

006A 

006C 

006E 

0069 

0068 

0068 

0048 

005A 

005C 

005E 

0059 

0058 

0058 

0081 



FIELD 


DEC 


HEX 


DEBMBM 


0129 


0081 


DEBMDL 


0012 


oooc 


DEBMSK 


0026 


001A 


DEBNF 


0040 


0028 


DEBNIB 


0098 


0062 


DEBNIC 


0100 


0064 


DEBNIH 


0102 


0066 


DEBNIM 


0097 


0061 


DEBNIO 


0096 


0060 


DEBNIR 


0096 


0060 


DEBNP 


0076 


004C 


DEBNPC 


0078 


004E 


DEBOPT 


0057 


0039 


DEBPSR 


0036 


0024 


DEBPSV 


0032 


0020 


DEBSDT 


0008 


0008 


DEBSIZ 


0030 


001E 


DEBSYM 


0024 


0018 


DEBTKC 


0022 


0016 


DEBTKN 


0140 


008C 


DEBTP 


0042 


002A (EQU) 


DEBUCC 


0136 


0088 


DEBUCH 


0136 


0088 


DEBUHH 


0138 


008A 


DEBUNT 


0014 


000E 


DEBUSZ 


0060 


003C 


DEBVOL 


0062 


003E 


DEBWRK 


0052 


0034 
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Assembler listing of CHADEB 



LOCATION INSTRUCTION SOURCE 



26 00000 



26 00000 

26 00000 
26 00004 

26 00008 

26 OOO0C 

26 0000C 



26 0000D 



00000000 

00000001 
00000002 
00000003 
00000004 

00000080 
00000020 
00000008 
00000001 
00000002 



26 0000E 



26 0000F 



(listing 



00000001 

00000001 

00000002 

00000003 

00000004 

00000008 

00000001 

00000002 

00000008 

00000010 

00000012 
00000010 

00000020 

00000030 

00000040 

00000080 

00000001 

00000002 
00000003 
00000004 

00000020 

OOOOOOEO 

000000A0 

Of CHADEB 



CHADEB 
DEBBEG 

DEBDCB 
DEBJFC 

* 

DEBSDT 

* 

DEBCLT 

DEBMDL 
DEBMD1 

DEBMDA 

DEBMDB 

DEBMDC 

DEBMDD 

DEBDVC 

DEBDTP 

DEBDDA 

DEBDUR 

DEBDVA 

DEBDVB 

DEBUNT 

* 

DEBUTP 

DEBUDP 

DEBUD1 

* 

DEBUDC 

DEBUD2 

DEBUD3 

DEBUCR 

DEBUCP 

DEBUPR 

DEBUPT 

DEBREM 
DEBUNA 
* 
DEBUNB 

DEBUNC 

DEBUND 

DEBUNE 

* 

DEBUNF 

* 

DEBUNG 

DEBUNH 

DEBUNI 

DEBFEA 

DEBO? 

♦ 

DEB07D 

DEB07N 

continued 



INST OPER 

DSECT 

DS OF 



DS 
DS 

DS 

DS 

DS 
EQU 

EQU 

EQU 

EQU 

EQU 

DS 

EQU 

EQU 

EQU 

EQU 

EQU 

DS 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 
EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

DS 

EQU 

EQU 

EQU 



F 

F 

F 
OF 

X 

X'00 f 

X'Ol* 

X'02' 

X'OS' 

X , 04 i 

X 

X^O' 

X^O' 

x^s* 

X f 01' 
X , 02 t 
X 

X^Ol' 

X'Ol 1 

X , 02' 

X^* 

X'04" 

x'os 1 

X'Ol 1 
X , 02 i 

X'lO 1 

X , 12 i 

X'10' 

X^O' 

x^o* 

X^O' 

x'so 1 

X'01 f 

X , 02 i 

X , 03 i 

X f 04- 

X 

X^O' 

X^O' 

X'AO' 
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COMMENT 

DATA EXTENT BLOCK 

ALIGN TABLE ON A WORD 

BOUNDARY 

POINTER TO DCB FOR DATA SET 

POINTER TO JFCB FOR DATA 

SET 

POINTER TO SDAT ENTRY FOR 

ASSIGNED DEVICE 

CLASSIFICATION AND TYPE 

DATA FROM SDAT 

MODEL OF DEVICE 

MODEL CODE FOR TAPE, DIRECT 

ACC AND UNIT R 

1050 TERMINAL SYSTEM MASK 

2741 TERMINAL MASK 

MOD 35 TTY MASK 

1052 MOD 7 TERMINAL MASK 

TYPE OF DEVICE 

DEVICE CODE— MAG TAPE 

DEVICE CODE — DIRECT ACCESS 

DEVICE CODE — UNIT RECORD 

DIAL LINE MASK 

DEDICATED LINE MASK 

UNIT DESCRIPTION FOR DEVICE 

TYPE 

UNIT TYPE — MAG 

TAPE--2400 

UNIT TYPE — DIRECT 

ACCESS — 2311 

UNIT TYPE — DIRECT 

ACCESS — 2301 

UNIT TYPE — DIRECT 

ACCESS — 2321 

UNIT TYPE — DIRECT 

ACCESS — 2302 

UNIT TYPE — DIRECT 

ACCESS— 2314 

UNIT TYPE — UNIT RECORD 

— 2540 READER 

UNIT TYPE — UNIT RECORD 

— 2540 PUNCH 

UNIT TYPE — UNIT RECORD 

— 1403 PRINTER 

UNIT TYPE — UNIT RECORD 

-- 2671 PPT RDR 

UNIT TYPE 2701 REMOTE LINE 

IBM TERMINAL CONTROL TYPE 1 

MASK 

IBM TERMINAL CONTROL TYPE 2 

MASK 

TELEGRAPH CONTROL TYPE 1 

MASK 

TELEGRAPH CONTROL TYPE 2 

MASK 

WORLD TRADE TERMINAL 

CONTROL MASK 

2702 TRANSMISSION CONTROL 

MASL 

2701 DATA ADAPTER UNIT MASK 

MULTIPLEXOR CHANNEL MASK 

SELECTOR CHANNEL MASK 

DEVICE FEATURES 

OPTIONAL FEATURES — 7 TRACK 

COMPAT 

OPTIONAL FEATURES — DATA 

CONVERTER/7 TRK 

OPTIONAL FEATUES — 7 TRACK 

NO DATA CONV 



p 
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(Listing of CHADEB continued from page 146) 



LOCATION 



INSTRUCTION 
00000020 

00000080 
00000040 

00000080 

00000040 

00000080 

00000040 

00000001 
00000002 
00000003 



26 00010 

26 00012 

26 00014 
26 00016 

26 00018 

26 0001A 
26 0001C 
26 0001E 
26 00020 

26 00024 

26 00028 
26 00028 



00000080 
00000040 
00000020 



00000010 
00000008 



00000004 
00000002 



26 00029 
26 0002A 

26 0002B 

26 0002C 



26 0002A 
26 0002A 



00000003 
00000043 
00000083 

00000001 
00000003 
00000007 



SOURCE 
DEB09T 

DEBOSC 
DEBOTO 
* 
DEBOCI 

DEBOPR 

* 

DEBOUC 

* 
DEBOSL 

* 

DEBFE1 

DEBFE2 

DEBFE3 

DEBIO 

* 

DEBIOC 

* 

DEBBTK 

DEBTKC 

DEBSYM 

DEBMSK 
DEBID 
DEBSIZ 
DEBPSV 

DEBPSR 

DEBER1 

DEBNF 

DEBNF1 

DEBNF2 

DEBNF3 

DEBNF4 

* 
DEBNF 5 

DEBNF6 
DEBNF7 
* 
DEBENOF 

DEBFL 
DEBTP 
DEBDA 

DEBDN 

DEBDN1 

DEBDN 2 

DEBDN3 

DEBCLS 

DEBCLA 

DEBCLB 

DEBCLC 



INST OPER 



EQU 

EQU 
EQU 

EQU 

EQU 

EQU 

EQU 

EQU 
EQU 
EQU 
DS 

DS 

DS 
DS 

DS 

DS 

DS 
DS 
DS 

DS 

DS 
DS 

EQU 
EQU 

EQU 



DS 



26 0002D 
26 00030 
26 00034 
26 00038 



DEBER2 
DEBWRK 
DEBIOF 
00000080 DEBWPE 

* 

(Listing of CHADEB continued on page 148) 



DS 

EQU 

EQU 

EQU 

DS 

EQU 

EQU 

EQU 

DS 

DS 

DS 

DS 

EQU 



X^O' 

X^O' 
X f 40 f 

X^O^ 

X'40 f 

X'80' 

X^O" 

X^l 1 
X'02" 
X'03 f 
H 

H 

H 
H 



H 
H 

H 

F 



OF 
X 

X , 80 i 
X^O' 
X*20' 



EQU X'10' 
EQU X'08 f 



EQU X , 04 f 
EQU X , 02 i 



XL! 



DS XL1 
EQU DEBFL 
EQU DEBFL 



XL1 

X^* 

X'43 1 

X f 83" 

X 

X'Ol 1 

x^s 1 

X«07 f 

XL3 

F 

F 

X 

X f 80 f 



COMMENT 

OPTIONAL FEATURES — NINE 

TRACK TAPE 

OPTIONAL FEATURES— SCAN 

OPTIONAL FEATUES— TRACK 

OVERFLOW 

OPTIONAL FEATURES — CARD 

IMAGE 

OPTIONAL FEATURES — 

PCH-FEED-READ 

OPTIONAL FEATURES — UNIV 

CHAR SET FOR PRT 

OPTIONAL FEATURES — SEL 

TAPE LISTING 

SAD ONE MASK 

SAD TWO MASK 

SAD THREE MASK 

NUMBER OF OUTSTANDING 

IORCBS ALLOWED 

CURRENT NUMBER OF 

OUTSTANDING IORCBS 

NUMBER OF BYTES PER TRACK 

NUMBER OF TRACKS PER 

CYLINDER 

SYSTEM SYMBOLIC DEVICE 

ADDRESS 

POSTING INFORMATION MASK 

DEB IDENTIFIER 

SIZE OF DEB IN BYTES 

POINTER (ACON) TO POSTING 

(SAM) ENTRY 

POINTER (ACON) TO POSTING 

(SAM) PSECT 

ERROR INFORMATION 

ERROR FLAGS 

UNRECOVERABLE ERROR 

PERMANENT ERROR 

END OF TAPE OR EXCEPTIONAL 

CONDITION 

(MSAM) 

DSCB EXTENTS ARE NOT IN 

CONSECUTIVE 

ORDER OR CONTROL MARK (MSAM) 

READ/WRITE NO EXTENTS FLAG 

OR RETRY 

IN PROGRESS (MSAM) 

EOV NO EXTENTS FLAG 

SYNAD REQUESTED BY CHECK 

PRIOR TO LAST IOREQ 

INTERNAL INDICATION TO MSAM 

POSTING — EOF 

POSTING RETRY INFORMATION 

TAPE RETRY INFORMATION 

DIRECT ACCESS RETRY 

INFORMATION 

TAPE DENSITY 

200 BPI 

556 BPI 

800 BPI 

PROTECTION CLASS OF DCB 

PROTECTION CLASS A 

PROTECTION CLASS B 

PROTECTION CLASS C 

RESERVED 

ERROR INFORMATION 

POINTER TO WORK PAGE 

I/O STATUS INFORMATION 

A WRITE WAS PREVIOUSLY 

EXECUTED 
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(Listing of CHADEB continued from page 147) 



LOCATION INSTRUCTION SOURCE 



26 00039 



00000040 

00000020 

00000010 

00000008 
00000004 
00000002 
00000001 

00000040 

OOOOOOCO 

00000000 
0000003C 
0000000C 
0000001C 
00000004 
00000010 
00000001 

00000003 



26 0003A 

26 0003C 

26 0003E 

26 00040 
26 00044 

26 00048 

26 0004C 
26 0004E 

26 00050 

26 00054 



26 00058 
26 00058 



26 00058 
26 00058 

26 00059 
26 0005A 
26 0005C 
26 0005E 
26 00060 

26 00060 

26 00061 
26 00062 
26 00064 
26 00066 
26 00068 

26 00068 

26 00069 
26 0006A 
26 0006C 
(Listing 



Of CHADEB 



DEBWSF 
DEBRSB 

DEBRSF 

* 

DEBIBT 

DEBBP 

DEBIPT 

DEBDBP 

* 

DEBOPT 

DEBRDO 

* 

DEBLVO 

* 

DEBINP 

DEBOUT 

DEBINO 

DEBOIN 

DEBRDB 

DEBUPD 

DEBRDC 

DEBLVC 

DEBLBC 

* 

DEBUS Z 

DEBVOL 
* 

DEBBF1 
DEBBF2 

DEBLSW 
* 

DEBNP 
DEBNPC 

DEBDEL 

DEBDEC 

DEBEND 

DEBDAF 

♦ 

DEBLWT 

DEBLWR 

DEBLWM 
DEBLWB 
DEBLWC 
DEBLWH 
DEBNIO 

DEBNIR 

DEBNIM 
DEBNIB 
DEBNIC 
DEBNIH 
DEBLIO 

DEBLIR 

DEBLIM 

DEBLIB 

DEBLIC 

continued 



INST OPER 
EQU X^O' 

EQU 

EQU 



EQU 
EQU 
EQU 
EQU 

DS 

EQU 



EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 



DS 

DS 

DS 
DS 

DS 

DS 
DS 

DS 



DS 
DS 

DS 
DS 
DS 
DS 
DS 

DS 

DS 
DS 
DS 
DS 
DS 

DS 

DS 
DS 
DS 



X^O' 
X , 10 i 

x'os 1 

X'04 f 
X , 02 f 
X'Ol* 

X 

X^O 1 



EQU X'CO' 



X'OO* 
X'3C 
X f 0C f 
X^C 1 
X'04 f 
X'lO' 
X'01 f 



EQU X f 03 f 
DS H 



H 



F 
F 



H 
H 



DS F 

EQU * 
EQU * 



0XL8 
C 

C 
H 
H 
H 
0XL8 



C 
H 
H 
H 
0XL8 



C 

H 
H 



COMMENT 

LAST I/O OPERATION WAS 

WRITE 

LAST I/O OPERATION WAS A 

READ BACKWARD 

LAST I/O OPERATION WAS A 

READ FORWARD 

INTEGRITY BIT 

LAST I/O WAS A BSP OR POINT 

INCREMENT POINT FLAG 

DEB IS IN PROTECTED VIRTUAL 

MEMORY 

COPY OF DCB f S OPTION FIELD 

REREAD OPEN 

OPTION — BITS- 0,1 

LEAVE OPEN 

OPTION — BITS- 0,1 



INPUT 
OUTPUT 
INOUT 
OUTIN 



— BITS-- 

— BITS — 

— BITS-- 



2-5 ONLY 
2-5 ONLY 
2-5 ONLY 



— BITS — 2-5 ONLY 



RDBACK — BITS — 2-5 ONLY 

UPDATE — BITS — 2-5 ONLY 

REREAD CLOSE 

OPTIONS — BITS-6 f 7 

LEAVE CLOSE OPTIONS— BITS 

6,7 

NUMBER OF USER LABEL 

WRITTEN TO DIRECT AC 

SIZE OF DEB AREA CURRENTLY 

IN USE 

VOLUME SEQUENCE FOR THIS 

DEB 

QSAM DATA 

QSAM DATA/MSAM TIMER SAVE 

AREA 

POINTER TO DEB'S LST DIRECT 

AC WRITE ADDR 

COPY OF DCB f S NCP FIELD 

NUMBER OF DECBS IN 

UNCHECKED DECB QUEUE 

POINTER TO LAST DECB 

UNCHECKED ENTRY 

POINTER TO UNCHECKED DECB 

END OF COMMON DEB 

START OF DIRECT ACCESS 

FIXED PORTION 

LAST DIRECT ACCESS WRITE 

RECORD NUMBER WITHIN A 

TRACK (R) 

EXTENT NUMBER (M) 

BIN OR MODULE ADDRESS (BB) 

CYLINDER NUMBER (CO 

HEAD (TRACK) NUMBER (HH) 

ADDRESS OF NEXT READ 

OPERATION 

RECORD NUMBER WITHIN A 

TRACK (R) 

EXTENT NUMBER (M) 

BIN OR MODULE ADDRESS (BB) 

CYLINDER NUMBER (CO 

HEAD (TRACK) NUMBER (HH) 

ADDRESS OF LAST READ OR 

WRITE OPERATION 

RECORD NUMBER WITHIN A 

TRACK (R) 

EXTENT NUMBER (M) 

BIN OR MODULE ADDRESS (BB) 

CYLINDER NUMBER (CO 
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(Listing of CHADEB continued from page 148) 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 


26 0006E 






DEBLIH 


DS 


H 


26 00070 






DEBETK 

* 


DS 


0XL8 


26 00070 






DEBETR 


DS 


C 


26 00071 






DEBETM 


DS 


c 


26 00072 






DEBETB 


DS 


H 


26 00074 






DEB ETC 


DS 


H 


26 00076 






DEBETH 


DS 


H 


26 00078 






DEBATK 


DS 


0XL8 


26 00078 






DEBATR 


DS 


C 


26 00079 






DEBATM 


DS 


C 


26 0007A 






DEBATE 


DS 


H 


26 0007C 






DEBATC 


DS 


H 


26 0007E 






DEBATH 


DS 


H 




26 


00080 


DEBEDF 


EQU 


* 




26 


00080 


DEBDAV 


EQU 


* 


26 00080 






DEBEXF 


DS 


X 




00000080 


DEBMEX 


EQU 


X f 80 f 




00000040 


DEBEHT 


EQU 


X^O* 


26 00081 






DEBMBB 


DS 


0CL3 


26 00081 






DEBMBM 


DS 


X 


26 00082 






DEBBBB 


DS 


H 


26 00084 






DEBLCH 


DS 


OF 


26 00084 






DEBLCC 


DS 


H 


26 00086 






DEBLHH 


DS 


H 


26 00088 






DEBUCH 


DS 


OF 


26 00088 






DEBUCC 


DS 


H 


26 0008A 






DEBUHH 


DS 


H 


26 0008C 






DEBTKN 


DS 


H 


26 0008E 






DEBBLT 


DS 


H 




26 


00090 


DEBEDV 


EQU 


* 




00000058 


DEBSZ1 


EQU 


DEBEND« 




00000028 


DEBSZ2 

♦ 


EQU 


DEBEDF- 




00000010 


DEBS Z 3 


EQU 


DEBEDV 



COMMENT 

HEAD (TRACK) NUMBER (HH) 
ADDRESS OF LAST TRK TO GIVE 
CONDITION CK 
RECORD NUMBER WITHIN A 
TRACK (R) 
EXTENT NUMBER (M) 
BIN OR MODULE ADDRESS (BB) 
CYLINDER NUMBER (CO 
HEAD (TRACK) NUMBER (HH) 
ALTERNATE TRACK ADDRESS FOR 
LAST ERROR TK 
RECORD NUMBER WITHIN A 
TRACK (R) 
EXTENT NUMBER (M) 
BIN OR MODULE ADDRESS (BB) 
CYLINDER NUMBER (CO 
HEAD (TRACK) NUMBER (HH) 
END OF DIRECT ACCESS FIXED 
PORTION 

START OF DIRECT ACCESS 
VARIABLE PORTION 
EXTENT FLAGS 
THIS IS THE LAST EXTENT 
HEADER/TRAILER LABEL EXISTS 
FIRST 3 BYTES OF DIRECT 
ACCESS ADDRESS 
EXTENT NUMBER (M) 
BIN OR MODULE ADDRESS (BB) 
LOWER LIMIT OF EXTENT 
CYLINDER NUMBER (CO 
HEAD (TRACK) NUMBER (HH) 
UPPER LIMIT OF EXTENT 
CYLINDER NUMBER (CO 
HEAD (TRACK) NUMBER (HH) 
NUMBER TRACKS IN EXTENT 
BYTES REMAINING ON LAST 
TRACK WRITTEN 
END OF DIRECT ACCESS 
VARIABLE PORTION 
•DEBBEG SIZE OF COMMON DEB 
•DEBDAF SIZE OF DIRECT ACCESS 

FIXED PORTION 
-DEBDAV SIZE OF DIRECT ACCESS 
VARIABLE PORTION 
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Data Event Control Block (CHADEC) 

The Data Event Control Block (DECB) describes the status of an I/O operation and 
furnishes the access method routine with the parameters necessary for I/O execution. 

The DECB is set by macro-supplied parameters and POSTING subroutines. Data in the 
DECB is used by the problem program, and read/write routines, and by the Check and 
Control CCNTLJ routines- 

The Read/Write DECB (40 bytes > and the IOREQ DECB (48 bytes) are aligned on doub- 
leword boundaries- 

CHADEC Storage map 



DEC 


8 

16 

24 

32 

40 



HEX 



| DECECB 

i 


[DECBSF | DECSVC | DECTYP | 
f 1 1 I 


DECLEN 


8| 
i 


DECDCB | DECDAD 




10) DECSAD | DECK AD 
i 1 


18|DECLFN 
1 


|DECSTA (DECSBO [DECSBl | DEC RES |DECCSC | 
1 t 1 1 1 i 


DECFLG 


20 | 


DECCSW 




28) 

I 


DECASB 





ORG DECBSF 



ORG DECTYP 



ORG DECKAD 



| DECMSF | 



JDECTYI |DECTY2 | 
I I i 



20 14 



DECT AD 



ORG DECKAD 



20 14 
ORG DECLFN 



DECVCA 



24 18|DECID I 
I I 
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(CHADEC continued from page 150) 



DEC HEX 
ORG DECRES 



28 



1C 



I DECVCL 



ORG DECCSC 



29 ID 



I DECVCS 



ORG DECFLG 



30 



IE 



| DECFL1 | DECFL2 



± 



ORG DECCSW 
























32 20| 
1 




DECCS1 






1 
I 




ORG DECCS1 
















32 20 1 
i 




DECVCW 






| DECCB1 

1 


I DECCB2 | 
1 I 




DECCBN 


1 
[ 


Fields in CHADEC 


— by displacement 


















DEC 


HEX 


FIELD 




DEC 


HEX 


FIELD 




DEC 


HEX 


FIELD 




0000 


0000 


DECECB 




0016 


0010 


DEC SAD 




0031 


001F 


DECGB 


(EQU) 


0000 


0000 


DECBEG 




0020 


0014 


DECVCA 




0031 


001F 


DECGA 


(EQU) 


0001 


0001 


DECMSF 




0020 


0014 


DECTAD 




0031 


001F 


DECG9 


(EQU) 


0001 


0001 


DEC EOF 


(EQU) 


0020 


0014 


DECKAD 




0031 


001F 


DECG8 


(EQU) 


0001 


0001 


DECMRF 


(EQU) 


0024 


0018 


DECID 




0032 


0020 


DECVCW 




0001 


0001 


DECRSU 


(EQU) 


0024 


0018 


DECLFN 




0032 


0020 


DECCS1 




0001 


0001 


DECF7 


(EQU) 


0025 


0019 


DECTWA 


(EQU) 


0032 


0020 


DECCSW 




0001 


0001 


DECSS 


(EQU) 


0025 


0019 


DECSTA 




0036 


0024 


DECCB1 




0001 


0001 


DECF3 


(EQU) 


0026 


001A 


DECTO 


(EQU) 


0036 


0024 


DECMUE 


(EQU) 


0001 


0001 


DECF2 


(EQU) 


0026 


001A 


DECS BO 




0036 


0024 


DECMUC 


(EQU) 


0001 


0001 


DECF1 


(EQU) 


0027 


001B 


DECSB1 




0036 


0024 


DECMDE 


(EQU) 


0001 


0001 


DECF0 


(EQU) 


0028 


001C 


DECVCL 




0036 


0024 


DECMCE 


(EQU) 


0001 


0001 


DECBSF 




0028 


001C 


DECRES 




0036 


0024 


DECMBU 


(EQU) 


0002 


0002 


DEC SVC 




0029 


001D 


DECVCS 




0036 


0024 


DECMCU 


(EQU) 


0004 


0004 


DECTY1 




0029 


001D 


DECCSC 




0036 


0024 


DECMST 


(EQU) 


0004 


0004 


DECIO 


(EQU) 


0030 


001E 


DECFL1 




0036 


0024 


DECMAT 


(EQU) 


0004 


0004 


DECR07 


(EQU) 


0030 


001E 


DECG7 


(EQU) 


0037 


0025 


DECCB2 




0004 


0004 


DECTYP 




0030 


001E 


DECG6 


(EQU) 


0037 


0025 


DECCNC 


(EQU) 


0005 


0005 


DECTY2 




0030 


001E 


DECG5 


(EQU) 


0037 


0025 


DECICC 


(EQU) 


0005 


0005 


DECTF 


(EQU) 


0030 


001E 


DECG4 


(EQU) 


0037 


0025 


DECCHC 


(EQU) 


0005 


0005 


DECTE 


(EQU) 


0030 


001E 


DECG3 


(EQU) 


0037 


0025 


DECCDC 


(EQU) 


0005 


0005 


DECTD 


(EQU) 


0030 


001E 


DECG2 


(EQU) 


0037 


0025 


DECPTC 


(EQU) 


0005 


0005 


DECTC 


(EQU) 


0030 


001E 


DECG1 


(EQU) 


0037 


0025 


DECPGC 


(EQU) 


0005 


0005 


DECTB 


(EQU) 


0030 


001E 


DECGO 


(EQU) 


0037 


0025 


DECINL 


(EQU) 


0005 


0005 


DECTA 


(EQU) 


0030 


001E 


DECFLG 




0037 


0025 


DECPCI 


(EQU) 


0005 


0005 


DECT9 


(EQU) 


0031 


001F 


DECFL2 




0038 


0026 


DECCBN 




0005 


0005 


DECT8 


(EQU) 


0031 


001F 


DECGF 


(EQU) 


0040 


0028 


DECASB 




0006 


0006 


DECLEN 




0031 


001F 


DECGE 


(EQU) 


0048 


0030 


DECEND 


(EQU) 


0008 


0008 


DECDCB 




0031 


001F 


DECGD 


(EQU) 










0012 


OOOC 


DECDAD 




0031 


001F 


DECGC 


(EQU) 











CHADEC 151 



Alphabetical list of fields in CHADEC 





FIELD 


DEC 


HEX 




FIELD 


DEC 


HEX 




FIELD 


DEC 


HEX 






DEC AS B 


0040 


0028 




DECGF 


0031 


001F 


CEQU) 


DEC PTC 


0037 


0025 


CEQU) 




DECBEG 


0000 


0000 




DECGO 


0030 


001E 


CEQU) 


DECRES 


0028 


001C 






DECBSF 


0001 


0001 




DECG1 


0030 


001E 


CEQU) 


DECRSU 


0001 


0001 


CEQU) 




DECCBN 


0038 


0026 




DECG2 


0030 


001E 


CEQU) 


DECR07 


0004 


0004 


CEQU) 




DECCB1 


0036 


0024 




DECG3 


0030 


001E 


CEQU) 


DEC SAD 


0016 


0010 






DECCB2 


0037 


0025 




DECG4 


0030 


001E 


CEQU) 


DECSBO 


0026 


001A 






DECCDC 


0037 


0025 


CEQU) 


DECG5 


0030 


001E 


CEQU) 


DECSB1 


0027 


001B 






DECCHC 


0037 


0025 


CEQU) 


DECG6 


0030 


001E 


CEQU) 


DECSS 


0001 


0001 


CEQU) 




DECCNC 


0037 


0025 


CEQU) 


DECG7 


0030 


001E 


CEQU) 


DECSTA 


0025 


0019 






DECCSC 


0029 


001D 




DECG8 


0031 


001F 


CEQU) 


DECSVC 


0002 


0002 






DECCSW 


0032 


0020 




DECG9 


0031 


001F 


CEQU) 


DECTA 


0005 


0005 


CEQU) 




DECCS1 


0032 


0020 




DECICC 


0037 


0025 


CEQU) 


DECTAD 


0020 


0014 






DECDAD 


0012 


oooc 




DEC ID 


0024 


0018 




DECTB 


0005 


0005 


CEQU) 




DECDCB 


0008 


0008 




DECINL 


0037 


0025 


CEQU) 


DECTC 


0005 


0005 


CEQU) 




DECECB 


0000 


0000 




DEC 10 


0004 


0004 


CEQU) 


DECTD 


0005 


0005 


CEQU) 




DECEND 


0048 


0030 


CEQU) 


DECK AD 


0020 


0014 




DECTE 


0005 


0005 


CEQU) 




DEC EOF 


0001 


0001 


CEQU) 


DECLEN 


0006 


0006 




DECTF 


0005 


0005 


CEQU) 




DECFLG 


0030 


001E 




DECLFN 


0024 


0018 




DECTO 


0026 


001A 


CEQU) 




DECFL1 


0030 


001E 




DECMAT 


0036 


0024 


CEQU) 


DECTWA 


0025 


0019 


CEQU) 




DECFL2 


0031 


001F 




DECMBU 


0036 


0024 


CEQU) 


DECTYP 


0004 


0004 






DECFO 


0001 


0001 


CEQU) 


DECMCE 


0036 


0024 


CEQU) 


DECTY1 


0004 


0004 






DECF1 


0001 


0001 


CEQU) 


DECMCU 


0036 


0024 


CEQU) 


DECTY2 


0005 


0005 






DECF2 


0001 


0001 


CEQU) 


DECMDE 


0036 


0024 


CEQU) 


DECT8 


0005 


0005 


CEQU) 




DECF3 


0001 


0001 


CEQU) 


DECMRF 


0001 


0001 


CEQU) 


DECT 9 


0005 


0005 


(EQU) 




DECF7 


0001 


0001 


CEQU) 


DECMSF 


0001 


0001 




DECVCA 


0020 


0014 






DECGA 


0031 


001F 


CEQU) 


DECMST 


0036 


0024 


CEQU) 


DECVCL 


0028 


001C 






DECGB 


0031 


001F 


CEQU) 


DECMUC 


0036 


0024 


CEQU) 


DECVCS 


0029 


001D 






DECGC 


0031 


001F 


CEQU) 


DECMUE 


0036 


0024 


CEQU) 


DECVCW 


0032 


0020 






DECGD 


0031 


001F 


CEQU) 


DECPCI 


0037 


0025 


CEQU) 












DECGE 


0031 


001F 


CEQU) 


DECPGC 


0037 


0025 


CEQU) 










Assembler 


listinq of 


CHADEC 
























LOCATION 


INSTRUCTION SOURCE 


INST OPER 


COMMENT 












27 00000 


CHADEC 


DSECT 




DATA EVENT 


CONTROL BLOCK 




27 00000 






DECBEG 


DS 


OD 




ALIGN ON DOUBLE WORD 












* 










BOUNDARY 










27 00000 






DECECB 


DS 


XL1 


EVENT CONTROL BLOCK CECB) 






00000040 


DECECM 


EQU 


X'i 


40 f 


COMPLETION 


FLAG 










00000000 


DECECO 


EQU 


X'OO' 


ECB 


"READ/WRITE" REQUEST 










♦ 










CODE 












0000007F 


DECEC1 


EQU 


X'* 


7F f 


ECB 


"NORMAL COMPLETION* 


i 










* 










CODE 












00000041 


DECEC2 


EQU 


X»l 


%1* 


ECB 


"COMPLETE WITH ERROR" 










* 










CODE 












0000007E 


DECEC3 


EQU 


X 9 ' 


7E« 


ECB 


"INTERCEPTED" 


CODE 








00000080 


DECEC4 


EQU 


X'l 


80 1 


ECB 


"WAIT" 


CODE 










00000014 


DECEC5 


EQU 


X«14« 


ECB 


■ RJE INTERVENTION 












* 










REQUIRED' CODE 








27 00001 






DECBSF 


DS 


XL1 


BSAM FLAGS 












27 00001 


DECFO 


EQU 


DECBSF 


IORCB NOT ISSUED-MSAM 








00000080 


DECFO M 


EQU 


X'l 


30* 


MASK 












27 00001 


DECF1 


EQU 


DECBSF 


RESERVED 












00000040 


DECF1M 


EQU 


X'J 


*0' 


DCF1 MASK BIT 










27 00001 


DECF2 


EQU 


DECBSF 


RESERVED 












00000020 


DECF2M 


EQU 


x f ; 


20' 


DECF2 MASK 


BIT 










27 00001 


DECF3 


EQU 


DECBSF 


SIO 


FAILURE-IOREQ 










00000010 


DECF3M 


EQU 


x f : 


L0 f 


MASK 












27 00001 


DECSS 


EQU 


DECBSF 


SENSE BYTES COUNT 


FIELD 










* 










BITS 4-6 


X # 02 f = 


=8 BYTES 






0000000E 


DECSSM 


EQU 


X f l 


0E f 


SENSE BYTE 


COUNT J 


MASK 












* 










BITS 4-6 CMODULO 1 


B) 








27 00001 


DECF7 


EQU 


DECBSF 


EXTENDED AWAIT FLAG 








00000001 


DECF7M 


EQU 


X'< 


Dl 1 


EXTENDED AWAIT MASK 








27 00001 






I ORG 


I DECBSF 














27 00001 






DECMSF 


DS 


XL1 


MSAM FLAGS 










( Listing 


of CHADEC 


continued < 


on page 153) 
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p 



(Listing of CHADEC continued from page 152) 



LOCATION INSTRUCTION SOURCE INST OPER 



27 00001 
00000080 
27 00001 
00000040 
27 00001 
00000020 



27 00002 
27 00004 

27 00004 



27 00004 

27 00004 
00000001 
O0OOOOFE 

00000002 

00000003 

00000004 
00000005 

00000006 
00000007 

00000008 

00000009 

O0000OOA 
0000000B 

0000000C 
OOO00O0D 

O000OO0E 

0O000O0F 

00000020 

00000024 

00000028 

00000029 

00000040 

00000043 

00000044 
00000048 

00000049 



0000004A 
27 00004 
00000050 
00000064 
00000065 
00000066 
00000067 
00000068 
00000069 
0000006A 
0000006B 
0000006C 
0000006D 
00000OC7 
(Listing of CHADEC 



DECRSU 

DECRSUJM 

DECMRF 

DECMRFM 

DECEOF 

DECEOFM 

DECSVC 

DECTYP 

DECTY1 
DECR07 
DECROM 
DECRON 

DEC02 

DEC03 

DEC04 

DEC 05 

* 

DEC 06 

DEC07 

* 

DEC08 

DEC09 

DECOA 
DEC OB 

DECOC 
DECOD 

* 

DECOE 

* 
DECOF 

DEC20 

DEC24 

DEC28 

* 

DEC29 
DEC 40 

DEC 4 3 

DEC 4 4 
DEC48 
* 

DEC49 
* 

DEC 4 A 
DECIO 
DECIOM 
DEC64 
DEC65 
DEC 6 6 
DEC67 
DEC 6 8 
DEC69 
DEC6A 
DEC6B 
DEC6C 
DEC6D 
DECC7 
continued 



DECBSF 

X^O 1 

DECBSF 

X f 40 i 

DECBSF 

X^O 1 

H 

H 

DECTYP 

XL1 

DECTY1 

X'Ol' 

X^E* 

X , 02 i 

X'OS 1 

X , 04 i 

x'os 1 

X , 06 i 
X f 07» 

X f 08' 

X'09 f 

X f 0A' 

X'OB' 

X'OC 
X , 0D t 

X'OE 1 

X'OF* 

X^O' 

X'24' 

x'28 f 

X , 29 i 

X^O' 

X f 43' 

X , 44 i 
X f 48' 

X f 49 f 

X f 4A' 

DECTY1 

X f 50 f 

X'64" 

X^S 1 

X'66' 

X'67' 

X 9 S8 9 

X f 69 f 

X f 6A f 

X^B* 

X 9 6C 

X f 6D f 

X'CT 



EQU 
EQU 

EQU 
EQU 

EQU 

EQU 

EQU 
EQU 

EQU 
EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 
EQU 

EQU 

EQU 
EQU 

EQU 

EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
on page 154) 



COMMENT 

TO BE REISSUED FLAG 

MASK 

MRF FORMAT WHEN ON 

END OF FILE INDICATER 

AWAIT SUPVR CALL 
OPERATION TYPE CODE 

OPN CODE HI ORDER BYTE 
REPEAT OPTION BIT 
REPEAT OPTION BIT MASK 
REPEAT OPTION MASK 
ELIMINATOR 
READ INITIAL WITH 
DIALING (TID)-TAM- 
READ INITIAL WITH 
DIALING/REPEAT CTDR) -TAM- 
READ INITIAL (TIN) -TAM- 
READ INITIAL/REPEAT 
(TNR)-TAM- 

READ CONTINUE (TCN)-TAM- 
READ CONTINUE/REPEAT 
(TCR) -TAM- 

WRITE INITIAL WITH DIALING 
(TID)-TAM- 
WRITE INITIAL WITH 
DIALING/REPEAT ( TDR) -TAM- 
WRITE INITIAL (TIN) -T AM- 
WRITE 

INITIAL/REPEAT (TNR) -TAM- 
WRITE CONTINUE (TCN)-TAM- 
WRITE 

CONTINU E/REPEAT ( TCR ) - TAM- 
WRITE WITH 
RESPONSE (TIA)-TAM- 
WRITE WITH 

RESPONSE/REPEAT (TAR)-TAM- 
READ- SEQUENTIAL 
FORWARD (SF) -SAM- 
READ- SEQUENTIAL 
BACKWARD ( SB ) - SAM- 
WRITE- SEQUENTIAL 
FORWARD (SF) -SAM- 
WRITE END OF FILE (WEF) -SAM- 
REPLACE BY RETRIEVAL 
ADDRESS (KR) -VIS-WRITE 
REPLACE BY 
KEY (KS) -VIS-WRITE 
WRITE NEW KEY (KT) -VIS-WRITE 
READ BY SPECIFIC 
KEY (KY) -VIS-READ 
READ BY RETRIEVAL 
ADDR. (KZ) -VIS-READ 
EXCLUSIVE READ (KX) -VIS-READ 
IOREQ DECB 
DECIO MASK 

AUTOWRAP (2702 OPTION) 
DISABLE (2702 OPTION) 
ENABLE (2702 OPTION) 
INHIBIT (2702 OPTION) 
PREPARE (2702 OPTION) 
SADONE (2702 OPTION) 
SADTWO (2702 OPTION) 
SADTHREE (2702 OPTION) 
SADZER (2702 OPTION) 
BREAK (2702 OPTION) 
GAM OPN CODE 
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(Listing of CHAPEC continued from page 153) 





LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 




27 


00005 




PECTY2 


PS 


XLl 








27 00005 


PECT8 


ECU 


PECTY2 








00000080 


PECT8M 


EQU 


X f 80' 








27 00005 


PECT9 

♦ 


EQU 


PECTY2 








00000040 


PECT9M 


EQU 


X'40' 








27 00005 


PECTA 


EQU 


PECTY2 








00000020 


PECTAM 


EQU 


X^O' 








27 00005 


PECTB 


EQU 


PECTY2 








00000010 


PECTBM 


EQU 


X'10 f 








27 00005 


PECTC 


EQU 


PECTY2 








00000008 


PECTCM 


EQU 


x'08' 








27 00005 


PECTP 


EQU 


PECTY2 








00000004 


PECTPM 


EQU 


X'04' 








27 00005 


PECTE 


EQU 


PECTY2 








00000002 


DECTEM 


EQU 


X'02' 








27 00005 


PECTF 


EQU 


PECTY2 








00000001 


PECTFM 


EQU 


X'01 1 




27 


00006 




PECLEN 


PS 


H 




27 


00008 




PECPCB 


PS 


F 




27 


OOOOC 




PECPAP 


PS 


F 




27 


00010 




PECSAP 


PS 


F 




27 


00014 


27 00014 


PECKAP 


PS 
|ORG| 


F 
PECKAP 




27 


0001** 


27 00014 


PECTAP 


PS 
|ORG| 


F 
PECKAP 




27 


00014 




PECVCA 


PS 


F 




27 


00018 


27 00018 


PECLFN 


PS 
|ORG| 


XLl 
PECLFN 




27 


00018 




PEC IP 


PS 


XLl 








00000080 


PECI80M 


EQU 


X'80' 








00000040 


PECI4 0M 


EQU 


X € 40' 




27 


00019 




* 
PECSTA 


PS 


C 








27 00019 


PECTWA 


EQU 


PECSTA 








00000080 


PECTWM 


EQU 


X'80' 




27 


0001A 




PECS BO 


PS 


XLl 








27 0001A 


PECTO 


EQU 


PECSBO 








00000001 


PECTOM 


EQU 


X'01' 




27 


0001B 




PECSB1 


PS 


XLl 




27 


0001C 


27 0001C 


PEC RES 


PS 
I0RG| 


C 
PECRES 




27 


0001C 




PECVCL 

♦ 


PS 


CL1 




27 


0001P 


27 0001D 


PECCSC 


PS 
lORG| 


XLl 
PECCSC 




27 


0001P 




PECVCS 


PS 


CL1 




27 


0001E 






PS 


OH 




27 


0001E 


27 0001E 


PECFLG 


PS 
|ORG| 


XL2 
PECFLG 




27 


0001E 




PECFL1 


PS 


XLl 








27 0001E 


PECGO 
PECGOM 


EQU 


PECFL1 








00000080 


EQU 


X'80' 








27 0001E 


PECG1 


EQU 


PECFL1 








00000040 


PECG1M 


EQU 


X f 40' 








27 0001E 


PECG2 


EQU 


PECFL1 








00000020 


PECG2M 


EQU 


X'20' 








27 0001E 


PECG3 


EQU 


PECFL1 








00000010 


PECG3M 


EQU 


X'lO' 








27 0001E 


PECG4 


EQU 


PECFL1 




(Listing 


Of CHAPEC 


continued 


on page 155) 


5*1 CHADEC 















COMMENT 

OPN COPE LOW ORPER BYTE 

CHAR. 'S' IN MACRO OPERANP 

LENGTH FIELP 

PECT 8 MASK BIT 

CHAR. 'S' IN VIS MACRO 

OPERANP AREA FIELP 

PECT 9 MASK BIT 

CHAR C IN MACRO OPERANP 

LENGTH FIELP 

PECTA MASK BIT 

RESERVED 

PECTB MASK BIT 

RESERVED 

PECTC MASK BIT 

RESERVED 

PECTP MASK BIT 

IOREQ BUFFEREP 

PECTE MASK BIT 

RESERVED 

PECTF MASK BIT 

PATA AREA LENGTH 

PCB APPRESS 

PATA AREA APPRESS 

STATUS INDICATORS APPRESS 

APPRESS OF VIS KEY 

APPRESS OF TAM TERMINAL 
ENTRY LIST 

VCCW LIST APPRESS 
LOGICAL FUNCTION (TAM) 

USER MESSAGE IPENTITY-BSAM 

NON-RETRYABLE ERROR 

UNPREDICTABLE 

RESULTS-PROCEEP AT 

OWN RISK 

RESERVED FOR STATUS 

TWAIT REQUIRED 

PECTWA MASK BIT FOR TWAIT 

SENSE BYTE 

TIME OUT FLAG 

TIME OUT MASK 

SENSE BYTE 1 

RESPONSE— TAM— 

VCCW LIST POUBLE-WORP 

LENGTH 

TAM CHARACTER SET COPE 

NO. OF PBL WDS TO START CCW 
FROM VCCW ORIGIN 

FLAGS 

FLAGS 1 BYTE 

•PURGE' BIT (SET BY 

QSAM) , CHECK ZEROS IT 

PECGO MASK BIT 

•PERMANENT ERROR' SET BY 

CHECK ROUTINE 

PECG 1 MASK BIT 

'ACTIVE' (SET BY TAM OR SAM 

OR IOREQ 

PECG2 MASK BIT 

USER ERROR — TAM — 

PECG3 MASK BIT 

RECORP OVERFLOW — TAM — 



t 



(Listing of CHAPEC continued from page 154) 



LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 


COMMENT 






00000008 


PECG4M 


EQU 


x , 08 i 


PECG4 MASK BIT 






27 0001E 


PECG5 

* 


EQU 


PECFL1 


BUFFER OVERFLOW (TAM) OR NEW 

PAGE 

INPICATOR ( MSAM) 






00000004 


PECG5M 


EQU 


X , 04 i 


PECG5 MASK BIT 






27 0001E 


PECG6 


EQU 


PECFL1 


SYSTEM ERROR — TAM — 






00000002 


PECG6M 


EQU 


X'02 i 


PECG6 MASK BIT 






27 0001E 


PECG7 

* 


EQU 


PECFL1 


INTERVENTION REQUIREP — 

TAM ~ 






00000001 


PECG7M 


EQU 


X'Ol 1 


PECG7 MASK BIT 


27 


0001F 




PECFL2 


PS 


XL1 


FLAGS 2 BYTE 






27 0001F 


PECG8 


EQU 


PECFL2 


ABENP REQUIREP 






00000080 


PECG8M 


EQU 


X^O* 


PECG 8 MASK BIT 






27 0001F 


PECG9 


EQU 


PECFL2 


EOV REQUESTEP 






00000040 


PECG9M 


EQU 


X'HQ* 


PECG9 MASK BIT 






27 0001F 


PECGA 


EQU 


PECFL2 


SYNAP REQUESTEP 






00000020 


PECGAM 


EQU 


X f 20 f 


PECGA MASK BIT 






27 0001F 


PECGB 


EQU 


PECFL2 


IN USE 






00000010 


PECGBM 


EQU 


X'lO' 


PECGB MASK BIT 






27 0001F 


PECGC 


EQU 


PECFL2 


(TAM) WRITE 






00000008 


PECGCM 


EQU 


x-os' 


PECGC MASK BIT 






27 0001F 


PECGD 


EQU 


PECFL2 


(TAM) REAP 






00000004 


PECGPM 


EQU 


X , 04 i 


PECGP MASK BIT 






27 0001F 


PECGE 


EQU 


PECFL2 


(TAM) RESPONSE 






00000002 


PECGEM 


EQU 


X f 02 f 


PECGE MASK BIT 






27 0001F 


PECGF 


EQU 


PECFL2 


(TAM) ATTENTION 






00000001 


PECGFM 


EQU 


X f 01 f 


PECGF MASK BIT 


27 


00020 






PS 


OP 




27 


00020 


27 00020 


PECCSW 


PS 

|ORG| 


XL8 
PECCSW 


CHANNEL STATUS WORP (CSW) 


27 


00020 


27 00020 


PECCS1 


PS 
|ORG| 


XL4 

PECCS1 


FIRST WORP OF CSW 


27 


00020 




PECVCW 

* 


PS 


F 


VCCW APPRESS OF OFFENPING 

ccw 


27 


00024 




PECCB1 


PS 


XL1 


FIFTH BYTE OF CSW 






27 00024 


PECMAT 


EQU 


PECCB1 


ATTENTION FLAG 






00000080 


PECMATM 


EQU 


X^O 1 


ATTENTION MASK 






27 00024 


PECMST 


EQU 


PECCB1 


STATUS MOPIFIER FLAG 






00000040 


PECMSTM 


EQU 


X'40 f 


STATUS MOPIFIER MASK 






27 00024 


PECMCU 


EQU 


PECCB1 


CONTROL UNIT ENP FLAG 






00000020 


PECMCUM 


EQU 


X f 20 f 


CONTROL UNIT ENP MASK 






27 00024 


PECMBU 


EQU 


PECCB1 


BUSY FLAG 






00000010 


PECMBUM 


EQU 


X , 10 f 


BUSY MASK 






27 00024 


PECMCE 


EQU 


PECCB1 


CHANNEL ENP FLAG 






00000008 


PECMCEM 


EQU 


x'os* 


CHANNEL ENP MASK 






27 00024 


PECMPE 


EQU 


PECCB1 


PEVICE ENP MASK 






00000004 


PECMPEM 


EQU 


X , 04 f 


PEVICE ENP FLAG 






27 00024 


PECMUC 


EQU 


PECCB1 


UNIT CHECK FLAG 






00000002 


PECMUCM 


EQU 


X , 02 t 


UNIT CHECK MASK 






27 00024 


PECMUE 


EQU 


PECCB1 


UNIT EXCEPTION FLAG 






00000001 


PECMUEM 


EQU 


X^l* 


UNIT EXCEPTION MASK 


27 


00025 




PECCB2 


PS 


XL1 


SIXTH BYTE OF CSW 






27 00025 


PECPCI 


EQU 


PECCB2 


PROGRAM- CONTROLLEP 
INTERRUPTION FLAG 






00000080 


PECPCIM 

* 


EQU 


X^O" 


PROGRAM-CONTROLLEP 
INTERRUPTION MASK 






27 00025 


PECINL 


EQU 


PECCB2 


INCORRECT LENGTH FLAG 






00000040 


PECINLM 


EQU 


X^O' 


INCORRECT LENGTH MASK 






27 00025 


PECPGC 


EQU 


PECCB2 


PROGRAM CHECK FLAG 


C Listing 


of CHADEC 


continued 


on page 156) 





CHAPEC 155 



C Listing of CHADEC continued from page 155) 



LOCATION INSTRUCTION SOURCE 



INST OPER 



00000020 
27 00025 
00000010 
27 00025 
00000008 
27 00025 
00000004 
27 00025 

00000002 

27 00025 
00000001 



27 00026 
27 00028 
27 00028 



27 00030 
00000030 



DECPGCM 

DEC PTC 

DECPTCM 

DECCDC 

DECCDCM 

DECCHC 

DECCHCM 

DECICC 

# 

DECICCM 

DECCNC 

DECCNCM 

DECCBN 

DEC AS B 
DEC END 
DECSZ 



EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 

EQU 

EQU 

EQU 

DS 

DS 

DS 

EQU 

EQU 



COMMENT 

PROGRAM CHECK MASK 

PROTECTION CHECK FLAG 

PROTECTION CHECK MASK 

CHANNEL DATA CHECK FLAG 

CHANNEL DATA CHECK MASK 

CHANNEL CONTROL CHECK FLAG 

CHANNEL CONTROL CHECK MASK 

INTERFACE CONTROL CHECK 

FLAG 

INTERFACE CONTROL CHECK 

MASK 

CHAINING CHECK FLAG 

CHAINING CHECK MASK 

LAST 2 BYTES OF CSW 

SENSE BYTES 0,1, ETC. 



X f 20' 
DECCB2 
X'10' 
DECCB2 

x^s' 

DECCB2 

X , 04 i 

DECCB2 

X f 02 f 

DECCB2 

X'Ol 1 

H 

0D 

XL8 

♦ 

DECEND-DECBEG DECS SIZE 



156 CHADEC 



Device Group Table (CHADEV) 

The Device Group Table (CHADEV) f by maintaining the current status of each device 
in the table, provides the data required to assign or release devices. CHADEV occu- 
pies 24 bytes of core storage, aligned on a doubleword boundary. 

CHADEV Storage map 



DEC 


8 

16 



HEX 



OIDEVLOCK 
i 


|DEVMAX 
I 


(DEVF 


I DEVLB | 
I 1 


DEVAEP 




8| 

i 






DEVPP 






lOfDEVFLG 
i 


| UNNAMED 
1 


| DEVDIG 
i 


| DEVEP | DEVNO 
i 1 


| DEVTP | 
1 1 


DEVSDA | 



ORG DEVBEG 



DEVTSI 



L 



DEVASD 



| DEVI 



Fields in CHADEV — by displacement 



DEC 

0000 

0000 

0000 

0000 

0000 

0000 

0001 

0002 

0002 

0002 

0002 

0003 

0003 

0003 

0003 

0003 

0003 

0003 

0003 



HEX 

0000 

0000 

0000 

0000 

0000 

0000 

0001 

0002 

0002 

0002 

0002 

0003 

0003 

0003 

0003 

0003 

0003 

0003 

0003 



FIELD 

DEVTSI 

DEVAIO 

DEVTIO 

DEVTCT 

DEVLOCK 

DEVBEG 

DEVMAX 

DEVAE 

DEVCT 

DEVMS 

DEVF 

DEVB7 

DEVB6 

DEVB5 

DEVB4 

DEVB3 

DEVB2 

DEVB1 

DEVB0 



(EQU) 
CEQU) 



(EQU) 
(EQU) 
(EQU) 

CEQU) 
(EQU) 
CEQU) 
CEQU) 
CEQU) 
CEQU) 
CEQU) 
CEQU) 



DEC 

0003 

0004 

0004 

0006 

0006 

0006 

0006 

0006 

0006 

0006 

0006 

0006 

0006 

0006 

0008 

0016 

0016 

0016 

0016 



HEX 

0003 

0004 

0004 

0006 

0006 

0006 

0006 

0006 

0006 

0006 

0006 

0006 

0006 

0006 

0008 

0010 

0010 

0010 

0010 



FIELD 

DEVLB 

DEVASD 

DEVAEP 

DEVI 

DEVDI 

DEVHP 

DEVHE 

DEVHD 

DEVRT 

DEVMT 

DEVT 

DEVD 

DEVN 

DEVC 

DEVPP 

DEVE 

DEVR 

DEVS 

DEVM 



CEQU) 
(EQU) 
CEQU) 
(EQU) 
CEQU) 
(EQU) 
CEQU) 
(EQU) 
(EQU) 
(EQU) 

(EQU) 
(EQU) 
(EQU) 
(EQU) 



DEC 

0016 

0016 

0016 

0016 

0018 

0019 

0019 

0019 

0019 

0019 

0019 

0019 

0019 

0019 

0020 

0021 

0022 



HEX 

0010 

0010 

0010 

0010 

0012 

0013 

0013 

0013 

0013 

0013 

0013 

0013 

0013 

0013 

0014 

0015 

0016 



FIELD 

DEVP 

DEVA 

DEVFLG 

DEVEN 

DEVDIG 

DEVE7 

DEVE 6 

DEVE5 

DEVE4 

DEVE3 

DEVE2 

DEVE1 

DEVE0 

DEVEP 

DEVNO 

DEVTP 

DEVSDA 



(EQU) 
(EQU) 



(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 



Alphabetical list of fields in CHADEV 



FIELD 

DEVA 

DEVAE 

DEVAEP 

DEVAIO 

DEVASD 

DEVBEG 

DEVB0 

DEVB1 

DEVB2 

DEVB3 

DEVB4 

DEVB5 

DEVB6 

DEVB7 

DEVC 

DEVCT 

DEVD 

DEVDI 

DEVDIG 



DEC 

0016 

0002 

0004 

0000 

0004 

0000 

0003 

0003 

0003 

0003 

0003 

0003 

0003 

0003 

0006 

0002 

0006 

0006 

0018 



HEX 

0010 

0002 

0004 

0000 

0004 

0000 

0003 

0003 

0003 

0003 

0003 

0003 

0003 

0003 

0006 

0002 

0006 

0006 

0012 



(EQU) 
(EQU) 



(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
CEQU) 
CEQU) 
CEQU) 
CEQU) 
CEQU) 
CEQU) 



FIELD 

DEVE 

DEVEN 

DEVEP 

DEVE0 

DEVE1 

DEVE2 

DEVE3 

DEVE4 

DEVE5 

DEVE6 

DEVE7 

DEVF 

DEVFLG 

DEVHD 

DEVHE 

DEVHP 

DEVI 

DEVLB 

DEVLOCK 




(EQU) 



(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 



CEQU) 
CEQU) 

CEQU) 



FIELD 

DEVM 

DEVMAX 

DEVMS 

DEVMT 

DEVN 

DEVNO 

DEVP 

DEVPP 

DEVR 

DEVRT 

DEVS 

DEVSDA 

DEVT 

DEVTCT 

DEVTIO 

DEVTP 

DEVTSI 



DEC 

0016 

0001 

0002 

0006 

0006 

0020 

0016 

0008 

0016 

0006 

0016 

0022 

0006 

0000 

0000 

0021 

0000 



HEX 

0010 
0001 
0002 
0006 
0006 
0014 
0010 
0008 
0010 
0006 
0010 
0016 
0006 
0000 
0000 
0015 
0000 



CEQU) 

CEQU) 
(EQU) 
(EQU) 

(EQU) 

(EQU) 
(EQU) 
(EQU) 

(EQU) 

(EQU) 
(EQU) 
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Assembler listing of CHADEV 



LOCATION INSTRUCTION SOURCE 



29 00000 



29 00000 

29 00000 
29 00001 
29 00002 



29 00002 
00000080 
29 00002 

00000070 

29 00002 

00000008 



29 00003 



29 00003 
00000080 
29 00003 
00000040 
29 00003 
00000020 
29 00003 
00000010 
29 00003 
00000008 
29 00003 
00000004 
29 00003 
00000002 
29 00003 
00000001 



29 00004 

29 00008 
29 00010 

29 00010 



29 00010 
00000080 
29 00010 
00000040 
29 00010 
00000020 
29 00010 
00000010 
29 00010 
00000008 
00000078 

29 00010 
00000002 



29 00011 
29 00012 
29 00013 



(Listing 



29 00013 
00000080 
29 00013 
00000040 
29 00013 
00000020 
29 00013 
00000010 
29 00013 
00000008 
29 00013 
00000004 
of CHADEV 



CHADEV 
DEVBEG 

* 

DEVLOCK 

DEVMAX 

DEVF 

DEVMS 

DEVMSM 

DEVCT 

* 

DEVCTM 
DEVAE 

DEVAEM 

♦ 

DEVLB 

DEVB0 

DEVB0M 

DEVB1 

DEVB1M 

DEVB2 

DEVB2M 

DEVB3 

DEVB3M 

DEVB4 

DEVB4M 

DEVB5 

DEVB5M 

DEVB6 

DEVB6M 

DEVB7 

DEVB7M 

DEVAEP 

* 

DEVPP 

DEVEN 

DEVFLG 

DEVA 

DEVAMK 

DEVP 

DEVPM 

DEVM 

DEVMM 

DEVS 

DEVSM 

DEVR 

DEVRM 

DEVAM 

* 

DEVE 
DEVEM 

DEVDIG 
DEVEP 
DEVE0 
DEVE0M 
DEVE1 
DEVE1M 
DEVE 2 
DEVE2M 
DEVE 3 
DEVE3M 
DEVE 4 
DEVE4M 
DEVE5 
DEVE5M 
continued 



INST OPER 

DSECT 

DS OD 



DS 

DS 

DS 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

DS 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

DS 

DS 
DS 

DS 
EQU 

EQU 
EQU 
EQU 
EQU 

EQU 
EQU 

EQU 
EQU 
EQU 
EQU 

EQU 

EQU 

DS 

DS 

DS 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 



XL1 
XL1 
XL1 

DEVF 

x'so' 

DEVF 

X^O' 

DEVF 

x^s' 

XL1 

DEVLB 

X'80' 

DEVLB 

X'40 f 

DEVLB 

X'20' 

DEVLB 

X'lO' 

DEVLB 

X f 08' 

DEVLB 

X f 04 f 

DEVLB 

X'02« 

DEVLB 

X'01' 

F 

D 

OD 

XL1 
DEVFLG 

x'80' 

DEVFLG 

X - 40' 

DEVFLG 

X'20 f 

DEVFLG 

X'10' 

DEVFLG 

X i 08 t 

X f 78' 

DEVFLG 

X , 02 i 

XL1 

XL1 

XL1 

DEVEP 

X^O' 

DEVEP 

X'40 - 

DEVEP 

X^O^ 

DEVEP 

X'10' 

DEVEP 

X'08' 

DEVEP 

X , 04' 



COMMENT 

DEVICE GROUP TABLE 

ALIGN TABLE ON A DOUBLE 

WORD BOUNDARY 

LOCK BYTE 

MAX DEVICE ADDRESS IN TABLE 

TABLE FLAGS 

CHANNEL TYPE FLAG 

CHANNEL TYPE MASK 

NUMBER OF ACTUAL PATH 

ENTRIES 

NUMBER OF ACTUAL PATH 

ENTRIES MASK 

ASYNCHRONOUS INTERRUPT TYPE 

FLAG 

ASYNCHRONOUS INTERRUPT TYPE 

MASK 

LOW ORDER PATH ADDRESS BITS 

FOR PATH 

MASK 



f 



FOR PATH 
FOR PATH 
FOR PATH 
FOR PATH 
FOR PATH 
FOR PATH 
FOR PATH 
FOR PATH 
FOR PATH 
FOR PATH 
FOR PATH 
FOR PATH 
FOR PATH 
FOR PATH 
FOR PATH 



MASK 



MASK 



MASK 



MASK 



MASK 



MASK 



MASK 

ASYNCHRONOUS INTERRUPT LIST 
POINTER 

ACTUAL PATHS TO DEVICE 
DOUBLEWORD ENTRY FOR EACH 
DEVICE IN TABLE 
DEVICE FLAGS 
AVAILABILITY FLAG 
AVAILABILITY MASK 
PARTITIONED FLAG 
PARTITIONED MASK 
UNIT DOWN FLAG 
UNIT DOWN MASK 
SENSE HOLD FLAG 
SENSE HOLD MASK 
RESERVED FLAG 
RESERVED MASK 
INDS RESTRCTING AVAIL OF 
DEVICE 

NONEXISTENT FLAG 
NON-EXISTENT MASK 
RESERVED 

DIG CODE FOR DEVICE 
ENABLE PATH 
PATH ENABLED 
PATH ENABLED MASK 
PATH 1 ENABLED 
PATH 1 ENABLED MASK 
PATH 2 ENABLED 
PATH 2 ENABLED MASK 
PATH 3 ENABLED 
PATH 3 ENABLED MASK 
PATH 4 ENABLED 
PATH 4 ENABLED MASK 
PATH 5 ENABLED 
PATH 5 ENABLED MASK 



on page 159) 
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(Listing of CHADEV continued from page 158) 



LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 






29 00013 


DEVE6 


EQU 


DEVEP 






00000002 


DEVE6M 


EQU 


X i 02 i 






29 00013 


DEVE7 


EQU 


DEVEP 






00000001 


DEVE7M 


EQU 


X'01' 


29 


00014 




DEVNO 


DS 


c 


29 


00015 




DEVTP 


DS 


XL1 






00000000 


DEV01 


EQU 


X'O 1 






00000001 


DEV11 


EQU 


X'Ol' 






00000003 


DEV21 


EQU 


X'OS' 






00000004 


DEV14 


EQU 


X f 04' 






00000008 


DEV27 


EQU 


X'08 f 






00000010 


DEV2701L 


EQU 


X f 10' 






00000011 


DEV27 01S 


EQU 


X^l - 






00000006 


DEV2703 

* 


EQU 


X , 06 i 






00000016 


DEV2703L 

* 


EQU 


X'16 f 






00000017 


* 
DEV2703S 


EQU 


X f 17 f 


29 


00016 




* 

DEVSDA 

4c 


DS 


H 






29 00000 




|ORG| 


DEVBEG 


29 


00000 




DEVAIO 


DS 


0D 


29 


00000 




DEVTSI 


DS 


F 






29 00000 


DEVTCT 


EQU 


DEVTSI 






29 00000 


DEVTIO 


EQU 


DEVTSI 


29 


00004 




DEVASD 


DS 


H 


29 


00006 




DEVI 


DS 


XL1 






29 00006 


DEVC 


EQU 


DEVI 






00000080 


DEVCM 


EQU 


X«80* 






29 00006 


DEVN 


EQU 


DEVI 






00000040 


DEVNM 


EQU 


X^O* 






29 00006 


DEVD 


EQU 


DEVI 






00000020 


DEVDM 


EQU 


X'20" 






29 00006 


DEVT 


EQU 


DEVI 






00000010 


DEVTM 

* 

DEVMT 


EQU 


X , 10 i 






29 00006 


EQU 


DEVI 






00000008 


DEVMTM 


EQU 


x'os* 






29 00006 


DEVRT 


EQU 


DEVI 






00000004 


DEVRTM 

* 
* 

♦ 


EQU 


X f 04 f 






29 00006 


* 
* 
DEVHD 


EQU 


DEVI 






00000010 


DEVHDM 


EQU 


X'10 f 






29 00006 


DEVHE 


EQU 


DEVI 


(Listing 


of CHADEV 


continued 


on page 160) 



COMMENT 

PATH 6 ENABLED 

PATH 6 ENABLED MASK 

PATH 7 ENABLED 

PATH 7 ENABLED MASK 

NOT USED 

DEVICE TYPE 

CODE FOR 2301 DRUM 

CODE FOR 2311 DISK 

CODE FOR 2321 DATA CELL 

CODE FOR 2314 DISK 

CODE FOR 2702 TERMINAL 

DEVICES 

2701 DEDICATED (LEASED) LINE 

2701 DIAL UP(SWITCHED) LINE 

CODE FOR 2703 TERMINAL 

DEVICE 

2703 DEDICATED (LEASED) LINE 

15649 
TO A 2780 DEVICE 

15649 
270 3 DIAL UP (SWITCHED) LINE 

15649 
TO A 27 80 DEVICE 

15649 
SYSTEM SYMBOLIC DEVICE 
ADDRESS 

ASYNCHRONOUS INTERRUPT 
ENTRY 

TASK STATUS INDEX (TSI) 
POINTER 

POINTER TO TCT SLOT 
(MT/T) 

POINTER TO TIOCB 
SYSTEM SYMBOLIC DEVICE 
ADDRESS 

ASYNCHRONOUS INTERRUPT 
FLAGS 

ATTENTION INTERRUPT IS 
BEING PROCESSED FG 
ATTENTION INTERRUPT IS 
BEING PROCESSED MK 
TASK INITIATED FLAG 
TASK INITIATED MASK 
IGNORE DEVICE END 
IGNORE DEVICE END MASK 
TSS-ORIENTED FLAG 
(MT/T) 

TSS-ORIENTED MASK 
(MT/T) 

SPECIAL TASK-ORIENTED FLAG 
(MT/T) 

SPECIAL TASK-ORIENTED MASK 
(MT/T) 

TSS UNDER RTAM FLAG 
(RTAM) 

TSS UNDER RTAM MASK 
(RTAM) 

THE FOLLOWING FLAGS HAVE 
MEANING ONLY 
WHEN DEVICE CODE 
EQUALS: DEV2701S OR 2701L 
DISABLE AFTER HIO TO 2701 
SDA II FLAG 

DISABLE AFTER HIO TO 2701 
SDA II MASK 

ENABLE AFTER HIO TO 2701 
SDA II FLAG 
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(Listing of CHADEV continued from page 159) 



LOCATION INSTRUCTION SOURCE INST QPER 
00000008 



29 00006 



00000004 



29 00006 



00000002 



COMMENT 

DEVHEM EQU X'08 f ENABLE AFTER HIO TO 27 01 

* SDA II MASK 

DEVHP EQU DEVI PRIME AFTER HIO TO 2701 

* SDA II FLAG 

DEVHPM EQU X'Oa" PRIME AFTER HIO TO 2701 

* SDA II MASK 

DEVDI EQU DEVI REMOTE JOB ENTRY DISABLE 

* INTERRUPT FLAG 

DEVDIM EQU X'0 2' REMOTE JOB ENTRY DISABLE 

* INTERRUPT MASK 

* NOTE 1- THE SYMBOLIC DEVICE ENTRIES (LABELS 

* DEVFLG THRU DEVSDA> ARE 

* VARIABLE IN NUMBER. THEY WILL BE 

* EQUIVALENT TO THE NUMBER 

* OF DEVICES SPECIFIED AS BEING ATTACHED TO 

* THE CONTROL UNIT(S) 

* WHOSE ENTRY (IES) IN THE CONTROL UNIT 

* TABLE POINT TO THIS 

* DEVICE GROUP TABLE, 

* NOTE 2- THE ASYNCHRONOUS INTERRUPT ENTRIES 

* (DEVAIO) 

* ARE VARIABLE IN NUMBER WITH A MATCHING 

* ENTRY FOR EACH SYM- 

* BOLIC DEVICE ENTRY. HOWEVER, ONLY THOSE 

* ASYNCHRONOUS ENTRIES 

* THAT MATCH A TERMINAL CLASS SYMBOLIC 

* DEVICE ENTRIES WILL BE 

* ACTIVE. THOSE THAT MATCH NON-TERMINAL 

* CLASS SYMBOLIC DEVICE 

* ENTRIES WILL BE MARKED NONEXISTENT. 

* NOTE 3- SYMBOLIC DEVICE AND ASYNCHRONOUS 

* INTERRUPT ENTRIES MUST BEGIN 

* ON DOUBLE WORD BOUNDARIES. 
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Damage Report (CHADMR) 

The Damage Report describes the nature and extent of CPU and/or storage failures; 
it also provides for evaluation of the effects of machine malfunction upon 
programming. 

The damage report is prepared by either the System Environment Recording and Retry 
(SERR) or the recovery nucleus, and furnishes data to the reconfiguration program. 

A core storage entry of 16 bytes in the prefixed storage area is allocated to the 
damage report. It is aligned on a doubleword boundary. 

DMRFCC: Failure Classification Code is a positive integer defined to indicate the 
nature of the machine failure and/or the extent of damage as follows: 
00 
01 
02 
03 
04 
05 
06 



Invalid 
CPU Failure 

Storage Element Failure 
CPU and Storage Element Failure 
Solid Storage Parity Error 

Intermittent Storage Parity Error on a Page 
Intermittent Storage Parity Error on a Storage 
Element 
07-3F Unassigned 

40 Retry Possible 

41 Retry Possible but CPU Failure is solid 
42-47 Unassigned 

48 No drum path available to SERR 

49 Drum Failure during SERR operation 
4A-7F Unassigned 

8 Machine Error with Global Damage 

81-8F Unassigned 

90 SERR Auxiliary Queue Overflow 

91-9F Unassigned 

A0 SERR Auxiliary Queue Interlocked 

Al-FE Unassigned 

FF Failing CCU (Set by Ext. Mach. Check 

Handler) 
Note ; Bit of this byte, if 1, indicates that the System Restart is mandatory. 



CHADMR Storage map 



DEC 




HEX 
01 



DMRMOP 



8| 



DMRSC1 



DMRSC2 



DMRSC3 [DMRSCN (DMRFCC 
1 I 



Fields in CHADMR — by displacement 



DEC HEX FIELD 
0000 0000 DMRMOP 
0008 0008 DMRSC1 
0010 000A DMRSC2 



DEC HEX FIELD 
0012 000C DMRSC3 
0014 00 0E DMRCPU 
0014 O00E DMRSCN 



DEC 
0015 



HEX FIELD 
00 OF DMRFCC 



(EQU> 



Alphabetical list of fields in CHADMR 



FIELD 
DMRCPU 
DMRFCC 
DMRMOP 



DEC HEX FIELD DEC HEX 

0014 000E (EQU) DMRSCN 0014 000E 

0015 000F DMRSC1 0008 0008 
0000 0000 DMRSC2 0010 000A 



FIELD 
DMRSC3 



DEC HEX 
0012 000C 



Assembler listing of CHADMR 



LOCATION INSTRUCTION SOURCE 



INST OPER 





2B 


00000 


CHADMR 

* 


DSECT 




2B 00000 






DS 


0D 


2B 00000 






DMRMOP 


DS 


XL8 


2B 00008 






DMRSC1 


DS 


XL2 


2B 0OO0A 






DMRSC2 


DS 


XL2 


2B O0O0C 






DMRSC3 


DS 


XL2 


2B O0O0E 






DMRSCN 


DS 


XL1 



(Listing of CHADMR continued on page 162) 



COMMENT 

DAMAGE REPORT 

MACHINE CHECK OLD PSW 
FAILING CORE ADDRESS 1 
FAILING CORE ADDRESS 2 
FAILING CORE ADDRESS 3 
NO OF SICK CORES LISTED 
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(Listing of CHADMR continued from page 161) 

LOCATION INSTRUCTION SOURCE INST OPER COMMENT 

2B OOOOE DMRCPU EQU DMRSCN FAILING CPU ID 

2B 0000F DMRFCC DS XL1 FAILURE CLASSIFICATION CODE 



162 CHADMR 



Data Set Control Blocks in the VTQC (CHADSC fc CHADSV & CHADAS & CHADAV & CHAVTC) 

The Data Set Control Blocks (DSCBs) for the data sets mounted on a SAM volume are all 
contained in the Volume Table of Contents (VTOC). All records in the VTOC have a 44- 
byte key and a 96-byte data entry. Each VTOC record becomes a DSCB of varying type 
and describes the attributes and extents of a data set. 

The first record in the Volume Table of Contents is the VTOC-DSCB, which describes 
the extents of the VTOC itself. The VTOC-DSCB is format 4 DSCB. The second DSCB in 
the VTOC is always a direct access device space management (DADSM) DSCB which uses a 
format 5 DSCB for SAM volumes. The remaining DSCBs in the VTOC describe the extents 
and attributes of datasets residing on the volume. 

A format 1 DSCB defines SAM datasets. If additional space is required to des- 
cribe the SAM dataset, the format 1 DSCB is chained to one or more format 3 DSCBs 
to provide additional extents. For VAM r no VTOC exists. DSCBs are located via the 
catalog or PAT page (see CHAPAT) . The format E DSCB describes the VAM datasets. 
If additional space is needed, these are chained to format F DSCBs. 

Each DSCB occupies 140 bytes (44 byte key plus a 96 byte data entry) in virtual 
storage, aligned on word boundaries. 

CHADSC Storage map 



DEC 




HEX 

01 



DSCNME 



40 


28 


48 


30 


56 


38 



DSCVSR (CONT) 



[DSCFID | 

L 



DSCVSR 



DSCVSQ 



DSCCRD 



DSCEXP 



± 



(DSCNEX |DSCFL1 | DSCSP1 | 
J I I 



DSCSCD 



72 



481 



DSCRSV 



80 

88 

96 

104 

112 

120 



50 

58] 
60 
68| 
70 

781 



DSCRSV (CONT) 


| DSCFTY 
» 


| DSCRFM 
I 


| DSCOPT | 
1 I 


DSCBKS 


DSCLRC 


| DSCKLN | 
\ 1 


DSCRKP 


1 DSCDSI | 
t I 


DSCSAL 


DSCSAL (CONT) 


1 
i 


DSCLRD 




|DSCSP2 

1 


DSCSP2 [DSCEXT 
1 


I DSCMVL | 
t i 


DSCLCH 


| DSCVCH 
1 



DSCVCH (CONT) 



DSCEX2 



128 



136 



801 



881 



DSCEX3 



DSCCHN (CONT) 



I DSCCHN 



JL 



Fields in CHADSC — by displacement 



DEC HEX FIELD 
0000 0000 DSCKY3 
0000 0000 DSCNME 
0000 0000 DSCSTA 
0004 0004 DSCEX4 
0044 002C DSCID3 

0044 002C DSCFID 

0045 002D DSCEX9 
0045 002D DSCVSR 
0051 00 33 DSCVSQ 
0053 0035 DSCCRD 
0056 0038 DSCEXP 
0059 003B DSCNEX 
(Continued on page 164) 





DEC 


HEX 


FIELD 




DEC 


HEX 


FIELD 




(EQU) 


0060 


003C 


DSCFL1 




0084 


0054 


DSCXTR 


(EQU) 




0061 


003D 


DSCSP1 




0084 


0054 


DSCXBL 


(EQU) 


(EQU) 


0062 


003E 


DSCSCD 




0084 


0054 


DSCXTO 


(EQU) 


(EQU) 


0075 


004B 


DSCRSV 




0084 


0054 


DSCXFL 


(EQU) 


(EQU) 


0082 


0052 


DSCXAB 


(EQU) 


0084 


0054 


DSCRFM 






0082 


0052 


DSCXIS 


(EQU) 


0085 


0055 


DSCXVC 


(EQU) 


(EQU) 


0082 


0052 


DSCXOU 


(EQU) 


0085 


0055 


DSCOPT 






0082 


0052 


DSCXPO 


(EQU) 


0086 


0056 


DSCBKS 






0082 


0052 


DSCXDO 


(EQU) 


0088 


0058 


DSCLRC 






0082 


0052 


DSCXSO 


(EQU) 


0090 


005A 


DSCKLN 






0082 


0052 


DSCFTY 




0091 


005B 


DSCRKP 




164) 


0084 


0054 


DSCXCC 


(EQU) 


0093 


005D 


DSCX14 


(EQU) 
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(Continued from page 163) 



DEC 


HEX 


FIELD 




DEC 


HEX 


FIELD 




DEC 


HEX 


FIELD 




0093 


005D 


DSCX13 


(EQU) 


0105 


0069 


DSCX33 


(EQU) 


0107 


006B 


DSCLCH 




0093 


005D 


DSCX12 


CEQU) 


0105 


0069 


DSCX32 


(EQU) 


0111 


006F 


DSCVCH 




0093 


005D 


DSCX10 


(EQU) 


0105 


0069 


DSCX29 


(EQU) 


0115 


0073 


DSCEX2 




0093 


005D 


DSCDSI 




0105 


0069 


DSCX28 


(EQU) 


0125 


007D 


DSCEX3 




0094 


005E 


DSCX23 


(EQU) 


0105 


0069 


DSCX27 


(EQU) 


0135 


0087 


DSCCN3 


(EQU) 


0094 


005E 


DSCX22 


(EQU) 


0105 


0069 


DSCX26 


(EQU) 


0135 


0087 


DSCCHN 




0094 


005E 


DSCSAL 




0105 


0069 


DSCX25 


(EQU) 


0140 


008C 


DSC END 


(EQU) 


0098 


0062 


DSCLRD 




0105 


0069 


DSCEXT 












0103 


0067 


DSCSP2 




0106 


006A 


DSCMVL 













Alphabetical list of fields in CHADSC 



FIELD 

DSCBKS 

DSCCHN 

DSCCN3 

DSCCRD 

DSCDSI 

DSCEND 

DSCEXP 

DSCEXT 

DSCEX2 

DSCEX3 

DSCEX4 

DSCEX9 

DSCFID 

DSCFL1 

DSCFTY 

DSCID3 

DSCKLN 

DSCKY3 

DSCLCH 

DSCLRC 

DSCLRD 



Assembler listing of CHADSC 




(EQU) 
(EQU) 



FIELD 

DSCMVL 

DSCNEX 

DSCNME 

DSCOPT 

DSCRFM 

DSCRKP 

DSCRSV 

DSCSAL 

DSCSCD 

DSCSP1 

DSCSP2 

DSCSTA 

DSCVCH 

DSCVSQ 

DSCVSR 

DSCXAB 

DSCXBL 

DSCXCC 

DSCXDO 

DSCXFL 

DSCXIS 



DEC 

0106 

0059 

0000 

0085 

0084 

0091 

0075 

0094 

0062 

0061 

0103 

0000 

0111 

0051 

0045 

0082 

0084 

0084 

0082 

0084 

0082 



HEX 

006A 

003B 

0000 

0055 

0054 

005B 

004B 

005E 

003E 

003D 

0067 

0000 

006F 

0033 

002D 

0052 

0054 

0054 

0052 

0054 

0052 



(EQU) 



(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 



FIELD 

DSCXOU 

DSCXPO 

DSCXSO 

DSCXTO 

DSCXTR 

DSCXVC 

DSCX10 

DSCX12 

DSCX13 

DSCX14 

DSCX22 

DSCX23 

DSCX25 

DSCX26 

DSCX27 

DSCX28 

DSCX29 

DSCX32 

DSCX33 



DEC 

0082 

0082 

0082 

0084 

0084 

0085 

0093 

0093 

0093 

0093 

0094 

0094 

0105 

0105 

0105 

0105 

0105 

0105 

0105 



HEX 

0052 

0052 

0052 

0054 

0054 

0055 

005D 

005D 

005D 

005D 

005E 

005E 

0069 

0069 

0069 

0069 

0069 

0069 

0069 



LOCATION INSTRUCTION SOURCE 



INST OPER 



COMMENT 



2C 00000 



2C 00000 



2C 00000 
2C 0002C 
2C 0002D 
2C 00033 
2C 00035 
2C 00038 
2C 0003B 
2C 0003C 
2C 0003D 
2C 0003E 
2C 0004B 
2C 00052 



2C 00052 
2C 00052 
2C 00052 
2C 00052 
2C 00052 
2C 00052 



00000040 
00000020 
00000002 
00000000 
00000080 



(Listing of CHADSC 



CHADSC 

* DSECT 

* SETS. 
DSCSTA 
DSCNME 
DSCFID 
DSCVSR 
DSCVSQ 
DSCCRD 
DSCEXP 
DSCNEX 
DSCFL1 
DSCSP1 
DSCSCD 
DSCRSV 
DSCFTY 
DSCXSO 
DSCXDO 
DSCXPO 
DSCXOU 
DSCXIS 
DSCXAB 
* 

DSCM15 
DSCM16 
DSCM17 
DSCM18 
DSCM30 

continued 



DSECT 
FOR FORMATS 1 AND 3 DSCBS FOR SAM DATA 



EQU 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 



EQU 
EQU 
EQU 
EQU 

EQU 



* 

CL44 
X 
XL6 

Xla2 

XL3 
XL3 
X 
X 

X 

XL13 

CL7 

XL2 

DSCFTY 

DSCFTY 

DSCFTY 

DSCFTY 

DSCFTY 

DSCFTY 



X^O' 
X'2Q* 
X , 02« 
X^O 1 
X § B0 9 



(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 



on page 165) 



START OF DSCB 

DSNAME 

FORMAT ID 

VOL SERIAL 

VOL SEQUENCE 

CREATION DATE 

EXPIRATION DATE 

NUMBER OF EXTENTS ON VOL 

BYTES IN DIR BLK 

SPARE 

SYSTEMS CODE 

RESERVED 

FILE TYPE 

SEQUENTIAL ORGANIZATION 

DIRECT 

PARTITIONED 

UNDEFINED 

INDEXED SEQUENTIAL 

ABSOLUTE LOCATION MUST NOT 

CHANGE 

MASKS TO TEST FILE TYPE, 

SEQUENTIAL ORGANIZATION 

DIRECT ORGANIZATION 

PARTITIONED ORGANIZATION 

ORGANIZATION UNDEFINED. 

INDEXED SEQUENTIAL 

ORGANIZATION 
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(Listing of CHADSC continued from page 164) 



LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 


COMMENT 






00000001 


DSCM31 


EQU 


X^l* 


ABSOLUTE LOCATION MUST NOT 
CHANGE 


2C 


00054 




DSCRFM 


DS 


X 


RECFM 






2C 00054 


DSCXFL 

* 


EQU 


DSCRFM 


FIXED, VARIABLE OR UNDEFINED 
LENGTH FORMAT 






2C 00054 


DSCXTO 


EQU 


DSCRFM 


TRACK OVERFLOW BIT 






2C 00054 


DSCXBL 


EQU 


DSCRFM 


BLOCKED RECORD BIT 






2C 00054 


DSCXTR 


EQU 


DSCRFM 


TRUNCATED RECORD BIT 






2C 00054 


DSCXCC 

* 


EQU 


DSCRFM 


ASA OR MACHINE CODE CONTROL 

CHARACTER 

MASKS TO TEST RECORD FORMAT. 






00000080 


DSCM01 


EQU 


X^O 1 


FIXED LENGTH RECORD 






00000040 


DSCM02 


EQU 


X'40' 


VARIABLE LENGTH RECORD 






000000C0 


DSCM03 


EQU 


X'C0 f 


UNDEFINED RECORD FORMAT 






00000020 


DSCM04 

* 


EQU 


X^O' 


TRACK OVERFLOW FEATURE MUST 
BE USED 






00000010 


DSCM05 


EQU 


X , 10 f 


BLOCKED 






00000008 


DSCM06 


EQU 


x'os- 


TRUNCATED RECORDS IN FILE 






00000004 


DSCM07 


EQU 


X , 04 f 


CONTROL CHARACTER ASA CODE 






00000002 


DSCM08 

* 


EQU 


X"02 f 


CONTROL CHARACTER MACHINE 
CODE 


2C 


00055 




DSCOPT 


DS 


X 


OPTCD 






2C 00055 


DSCXVC 

* 


EQU 


DSCOPT 


DATA SET CREATED USING 

VALIDITY CHECK 

MASKS TO TEST OPTION CODES. 






00000080 


DSCM19 

* 


EQU 


X , 80 i 


DATA SET CREATED USING WRT 
VLDTY CHK 


2C 


00056 




DSCBKS 


DS 


XL2 


BLKSIZE 


2C 


00058 




DSCLRC 


DS 


XL2 


LREC 


2C 


0005A 




DSCKLN 


DS 


X 


KEYLEN 


2C 


0005B 




DSCRKP 


DS 


XL2 


KEY LOCATION — RKP 


2C 


0005D 




DSCDSI 


DS 


X 


DS INDICATORS 






2C 0005D 


DSCX10 


EQU 


DSCDSI 


LAST VOLUME CONTAINING DATA 
SET 






2C 0005D 


DSCX12 

* 


EQU 


DSCDSI 


BLOCK LENGTH MULTIPLE OF 8 
BYTES 






2C 0005D 


DSCX13 


EQU 


DSCDSI 


DATA SET SECURITY PROTECTED 






2C 0005D 


DSCX14 


EQU 


DSCDSI 


INTEGRITY BIT 








* MASKS 


TO TEST DATA 


SET INDICATORS. 






00000080 


DSCM10 

* 


EQU 


x'so 1 


LAST VOLUME CONTAINING DATA 
SET. 






00000020 


DSCM12 

* 


EQU 


X^O 1 


BLOCK LENGTH MULTIPLE OF 8 
BYTES 






00000010 


DSCM13 


EQU 


X'lO' 


DATA SET SECURITY PROTECTED 






00000008 


DSCM14 


EQU 


x'os* 


INTEGRITY BIT 


2C 


0005E 




DSCSAL 


DS 


XL4 


SECONDARY ALLOCATION 






2C 00 05E 


DSCX22 


EQU 


DSCSAL 


RECORDS TRACKS OR CYLINDERS 






2C 0005E 


DSCX23 


EQU 


DSCSAL 


ORIGINAL REQUEST WAS FOR 
INDEXED SEQUENTL 








* SECONDARY 


SPACE ALLOCATION TYPE. 






O000O0CO 


DSCM22 

* 


EQU 


x-co' 


SET , CYLINDERS . UNSET, NO 
2NDRY ALLOCTN 






00000080 


DSCM34 


EQU 


X^O' 


TRACKS 






00000040 


DSCM35 


EQU 


X^O* 


RECORDS 






00000020 


DSCM23 


EQU 


X f 20' 


INDEXED SEQUENTIAL 






00000001 


DSCM36 


EQU 


X'Ol 1 


ORIG REQUEST WAS A RECORD 
REQUEST TOBE ROUNDED UP 






00000002 


DSCM37 


EQU 


X'02 1 


ORIG REQUEST WAS FOR THE 5 
OR LESS SPECIFIED EXTS 






00000004 


DSCM38 

* 


EQU 


X , 04' 


ORIGINAL REQUEST WAS FOR 
MAX CONTIGUOUS QUANTITY 






00000008 


DSCM39 


EQU 


x-os 1 


ORIGINAL REQUEST WAS FOR A 
CONTIGUOUS EXTENT 


2C 


00062 




DSCLRD 


DS 


XLS 


TTRLL OF LAST RECORD 


2C 


00067 




DSCSP2 


DS 


XL2 


SPARE 


2C 


00069 




DSCEXT 


DS 


X 


EXTENT TYPE 






2C 00069 


DSCX25 


EQU 


DSCEXT 


EXTENT FIELDS UNUSED 






2C 00069 


DSCX26 


EQU 


DSCEXT 


PRIME OR CONSECUTIVE AREA 


(Listing 


Of CHADSC 


continued 


on page 166) 





CHADSC 165 



(Listing of CHADSC continued from page 165) 



LOCATION INSTRUCTION SOURCE 



INST OPER 



2C 00069 

2C 00069 

2C 00069 

2C 00069 
2C 00069 



00000000 
00000001 
00000002 

00000040 

00000080 
00000080 
00000081 



2C 0006A 

2C 0006B 
2C 0006F 
2C 00073 
2C 0007D 
2C 00087 



2C 0008C 
0000008C 
OO0O000A 



2C 00000 
2C 00004 

2C 0002C 
2C 0002D 

2C 00087 



DSCX27 EQU 

DSCX28 EQU 

DSCX29 EQU 

* 

DSCX32 EQU 

DSCX33 EQU 

* 

* 

DSCM25 EQU 

DSCM26 EQU 

DSCM27 EQU 

DSCM28 EQU 

DSCM29 EQU 

DSCM32 EQU 

DSCM33 EQU 

* 

DSCMVL DS 

* 

DSCLCH DS 

DSCVCH DS 

DSCEX2 DS 

DSCEX3 DS 

DSCCHN DS 

DSCEND EQU 

DSCSIZ EQU 

DSCESZ EQU 

* FORMAT 3 

* SETS. 
DSCKY3 EQU 
DSCEX4 EQU 
* 

DSCID3 EQU 

DSCEX9 EQU 

DSCCN3 EQU 



DSCEXT 
DSCEXT 

DSCEXT 

DSCEXT 
DSCEXT 



X'OO' 
X'Ol' 
X'02 f 

x'ao* 

X^O' 
X'80' 

x'si' 



COMMENT 

OVERFLOW AREA FOR INDEXED 

SEQUENTIAL 

INDEX AREA FOR INDEXED 

SEQUENTIAL 

1 TRACK RESERVED FOR USER 

LABELS 

EXTENT IS SHARING CYLINDERS 

EXTENT OCCUPIES INTEGER 

NUMBER OF CYLNDRS 

EXTENT TYPE INDICATOR 

EXTENT FIELDS UNUSED 

PRIME OR CONSECUTIVE AREA 

OVERFLOW AREA FOR INDEXED 

SEQUENTIAL 

1 TRACK RESERVED FOR USERS 

LABELS 

SHARED CYLINDERS 

EXTENT IS SHARING CYLINDERS 

EXTENT OCCUPIES INTEGER 

NUMBER OF CYLNDRS 

EXTENT SEQUENCE ALWAYS IN 

FORMAT 1 DSCB 

LOWER CCHH 

UPPER CCHH 

FIRST ADDITIONAL EXTENT 

SECOND ADDITIONAL EXTENT 

CCHHR CHAIN TO FORMAT 3 

END OF DSCB 

SIZE OF DSCB 

SIZE OF EXTENT ENTRY 



XL4 

XL4 
XL10 
XL10 
XL5 
* 

DSCEND- DSCSTA 
DSCEX2-DSCEXT 
DSCB. CONTINUATION DSCB FOR SAM DATA 



DSCNME KEY IDENTIFICATION- 1 WORD 
DSCNME+4 ADDR OF FIRST 4 EXTS OF FM3 

DSCB 
DSCFID FORMAT ID,X , F3' 
DSCFID+1 ADDR OF NEXT 9 EXTS OF FM3 

DSCB 
DSCCHN NEXT DSCB 
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CHADSV Storage map 



DEC 




40 
48 
56 

72 

80 

88 

96 

104 



128 
136 



HEX 



0| 








DSVNME 








= 


28( 


| DSVFID 

1 


1 

! 


DSVDLU 




30( 




DSVROU 


i 

1 


DSWSQ 




I 

1 


DSVCRD 




38 | 




DSVEXD 


| DSVNEX | 
1 1 


DSVLPB 


1 
1 












DSVSCD 










48 | 


| DSVXPD | 

i 1 






DSVSP1 




50| 


DSVSP1 


(CONT) | 


DSVFTP 


| DSVRFM 

i 


(DSVOPC | DSVRCL I 
i 1 1 


58 | 


DSVRCL 


(CONT) | DSVKYL | 


DSVKLC 




|DSVDSI | DSVSAL | 
1 1 1 


60) 


DSVSAL 


(CONT) | 


DSVNDP 


1 

» 


DSVDOP 


I DSVNOP 


| DSVTNP | 
1 ( 


68) 


DSVTNP | 
1 


DSVNXP 


i 


DSVFXP 




1 

i 


DSVFVN 


1 1 
I | 










DSVXP2 










80 | 


I DSVNXT | 
1 1 


88 | 




DSVNXT CCONT) 


1 

1 











Fields in CHADSV — by displacement 



DEC 

0000 

0000 

0000 

0002 

0044 

0044 

0045 

0045 

0048 

0051 

0053 

0056 

0059 

0060 

0062 

0075 

0076 

0082 



HEX 

0000 

0000 

0000 

0002 

002C 

002C 

002D 

002D 

0030 

0033 

0035 

0038 

003B 

003C 

003E 

004B 

004C 

0052 



FIELD 

DSV7KY 

DSVNME 

DSVSTA 

DSV7X1 

DSV7ID 

DSVFID 

DSV7X2 

DSVDLU 

DSVROU 

DSWSQ 

DSVCRD 

DSVEXD 

DSVNEX 

DSVLPB 

DSVSCD 

DSVXPD 

DSVSP1 

DSVX07 



(EQU) 

CEQU> 
(EQU) 
(EQU) 

(EQU) 



(EQU) 



DEC 

0082 

0082 

0082 

0082 

0082 

0084 

0084 

0084 

0084 

0084 

0084 

0085 

0085 

0086 

0090 

0091 

0093 

0093 



HEX 

0052 

0052 

0052 

0052 

0052 

0054 

0054 

0054 

0054 

0054 

0054 

0055 

0055 

0056 

005A 

005B 

005D 

005D 



FIELD 

DSVX04 

DSVX03 

DSVX02 

DSVX01 

DSVFTP 

DSVX12 

DSVX11 

DSVX10 

DSVX09 

DS VX06 

DSVRFM 

DSVX14 

DSVOPC 

DSVRCL 

DSVKYL 

DSVKLC 

DSVX21 

DSVX20 



DEC HEX FIELD 

(EQU> 0093 005D DSVX19 

(EQU) 0093 005D DSVX17 

(EQU) 0093 005D DSVDSI 

(EQU) 0094 005E DSVX24 

0094 00 5E DSVSAL 

(EQU) 0098 0062 DSVNDP 

(EQU) 0100 0064 DSVDOP 

(EQU) 0102 0066 DSVNOP 

(EQU) 0103 0067 DSVTNP 

(EQU) 0105 0069 DSVX25 

0105 0069 DSVNXP 

(EQU) 0107 006B DSVFXP 

0109 006D DSVFVN 

0111 006F DSVXP2 

0135 0087 DSV7NX 

0135 0087 DSVNXT 

(EQU) 014 008C DSVEND 

(EQU) 



(EQU) 
(EQU) 

(EQU) 



(EQU) 

(EQU) 
(EQU) 



Alphabetical list of fields in CHADSV 



FIELD 

DSVCRD 

DSVDLU 

DSVDOP 

DSVDSI 

DSVEND 

DSVEXD 

DSVFID 

DSVFTP 

DSVFVN 

(Continued on 



HEX 

0035 

002D 

0064 

005D 

008C (EQU) 

0038 

002C 

0052 

006D 

page 168) 



FIELD 

DSVFXP 

DSVKLC 

DSVKYL 

DSVLPB 

DSVNDP 

DSVNEX 

DSVNME 

DSVNOP 

DSVNXP 




FIELD DEC HEX 

DSVNXT 0135 0087 

DSVOPC 0085 0055 

DSVRCL 0086 0056 

DSVRFM 0084 0054 

DSVROU 0048 0030 

DSVSAL 0094 005E 

DSVSCD 0062 003E 

DSVSP1 0076 004C 

DSVSTA 0000 0000 (EQU) 



CHADSV 167 



(Continued from page 167) 





FU 


SLD 


DEC HEX 
0103 0067 


FIELD 
DSVX 07 


DEC HEX 
0082 0052 


FIELD DEC HEX 
(EQU) DSVX21 0093 005D 






DSVTNP 


(EQU) 




DSWSQ 


0051 0033 


DSVX 09 


0084 0054 


(EQU) DSVX24 0094 005E 


(EQU) 




DSVXPD 


0075 004B 


DSVX 10 


0084 0054 


(EQU) DSVX25 0105 0069 


(EQU) 




DSVXP2 


0111 006F 


DSVX11 


0084 0054 


(EQU) DSV7ID 0044 002C 


(EQU) 




DSVX01 


0082 0052 


(EQU) DSVX 12 


0084 0054 


(EQU) DSV7KY 0000 0000 


(EQU) 




DSVX 02 


0082 0052 


(EQU) DSVX14 


0085 0055 


(EQU) DSV7NX 0135 0087 


(EQU) 




DSVX03 


0082 0052 


(EQU) DSVX17 


0093 005D 


(EQU) DSV7X1 0002 0002 


(EQU) 




DSVX04 


0082 0052 


(EQU) DSVX19 


0093 005D 


(EQU) DSV7X2 0045 002D 


(EQU) 




DSVX06 


0084 0054 


(EQU) DSVX20 


0093 005D 


(EQU) 




Assembler 


listinq of 


CHADSV 














LOCATION 


INSTRUCTION SOURCE 


INST OPER 


COMMENT 










2F 


00000 


CHADSV 


DSECT 
















• DSECT 


' FOR 


FORMATS A 


AND B ,VAM,DSCBS. 














* 






FORMAT A DSCB. 










2F 


00000 


DSVSTA 


EQU 


♦ 








2F 


00000 






DSVNME 


DS 


CL44 


DS NAME 






2F 


0002C 






DSVFID 


DS 


X 


FORMAT IDENTIFIER 






2F 


0002D 






DSVDLU 


DS 


XL3 


DATE LAST USED 






2F 


00030 






DSVROU 


DS 


XL3 


RATE OF USE 






2F 


00033 






DSWSQ 


DS 


XL2 


VOLUME SEQUENCE NUMBER 






2F 


00035 






DSVCRD 


DS 


XL3 


CREATION DATE 






2F 


00038 






DSVEXD 


DS 


XL3 


EXPIRATION DATE 






2F 


0003B 






DSVNEX 


DS 


X 


NUMBER OF EXTENTS 






2F 


0003C 






DSVLPB 


DS 


XL2 


NUMBER OF BYTES USED Ifc 
LAST PAGE 


I 




2F 


0003E 






DSVSCD 


DS 


XL13 


SYSTEM CODE 






2F 


0004B 






DSVXPD 


DS 


X 


PAD FOR INDEX SEQUENTIAL DS 




2F 


0004C 






DSVSP1 


DS 


XL6 


SPARE 






2F 


00052 






DSVFTP 


DS 


XL2 


FILE TYPE 










2F 


00052 


DSVX01 


EQU 


DSVFTP 


VAM SEQUENTIAL ORGANIZATION 








2F 


00052 


DSVX 02 


EQU 


DSVFTP 


VAM INDEX SEQUENTIAL 










2F 


00052 


DSVX 03 

* 


EQU 


DSVFTP 


VAM PARTITIONED INDEX 
SEQUENTIAL 










2F 


00052 


DSVX04 


EQU 


DSVFTP 


VAM PARTITIONED SEQUENTIAL 








2F 


00052 


DSVX 07 


EQU 


DSVFTP 


VAM PARTITIONED 
FILE TYPE 










00000072 


DSVM01 


EQU 


X , 72 i 


SEQUENTIAL ORGANIZATION 








00000071 


DSVM02 


EQU 


x*ii % 


INDEX SEQUENTIAL 










00000073 


DSVM03 


EQU 


X , 73 r 


PARTITIONED INDEX 














* 






SEQUENTIAL 










00000074 


DSVM04 


EQU 


X f 74 - 


PARTITIONED SEQUENTIAL 










00000075 


DSVM24 


EQU 


X f 75' 


PARTITIONED 






2F 


00054 






DSVRFM 


DS 


X 


RECORD FORMAT 










2F 


00054 


DSVX06 


EQU 


DSVRFM 


FIXED, VARIABLE OR UNDEFINED 












♦ 






LENGTH 










2F 


00054 


DSVX09 


EQU 


DSVRFM 


TRACK OVERFLOW FEATURE 
REQUIRED 










2F 


00054 


DSVX10 


EQU 


DSVRFM 


BLOCKED 










2F 


00054 


DSVX11 


EQU 


DSVRFM 


TRUNCATED RECORDS 










2F 


00054 


DSVX12 


EQU 


DSVRFM 


ASA OR MACHINE CODE CONTROL 












* 






CHARACTE- 










00000080 


DSVM06 


EQU 


X'SO 1 


FIXED LENGTH RECORD 










00000040 


DSVM07 


EQU 


X'40 f 


VARIABLE LENGTH RECORD 










OOOOOOCO 


DSVM08 


EQU 


X'CO* 


UNDEFINED RECORD LENGTH 








00000020 


DSVM09 


EQU 


X'20 f 


TRACK OVERFLOW FEATURE 


MUST 












♦ 






BE USED 










00000010 


DSVM10 


EQU 


X'lO 1 


BLOCKED 










00000008 


DSVM11 


EQU 


X f 08 f 


TRUNCATED RECORDS IN FILE 








00000004 


DSVM12 


EQU 


X , 04 f 


CONTROL CHARACTER ASA CODE 








00000002 


DSVM13 


EQU 


X , 02' 


CONTROL CHARACTER MACHINE 












♦ 






CODE 






2F 


00055 






DSVOPC 


DS 


X 


OPTION CODES 










2F 


00055 


DSVX14 


EQU 


DSVOPC 


DATA SET CREATED USING 
VLDTY CHK 
OPTION CODES, 


WRT 








00000080 


DSVM14 


EQU 


X'SO' 


DATA SET CREATED WITH WRT 




(Listing 


of 


CHADSV 


continued 


on page 169) 






168 CHADSV 





















(Listing of CHADS V continued from page 168) 



LOCATION INSTRUCTION SOURCE 



INST OPER 



COMMENT 



2F 00056 
2F 0005A 
2F 0005B 
2F 0005D 



2F 0005E 



2F 0005D 

2F 0005D 

2F 0005D 
2F 0005D 

00000080 

00000020 

00000010 
00000008 

2F 0005E 
00000040 



2F 00062 
2F 00064 
2F 00066 
2F 00067 



2F 00069 



2F 00069 

ooooooco 

00000040 



2F 0006B 
2F 0006D 
2F 0006F 
2F 00087 



2F 0008C 
0000008C 
00000006 



2F 00000 
2F 00002 
2F 0002C 
2F 0002D 
2F 00087 



* 

DSVRCL DS 

DSVKYL DS 

DSVKLC DS 

DSVDSI DS 

DSVX17 EQU 

* 

DSVX19 EQU 

DSVX20 EQU 

DSVX21 EQU 

* 

DSVM17 EQU 

DSVM19 EQU 

* 

DSVM20 EQU 

DSVM21 EQU 

DSVSAL DS 

DSVX24 EQU 

DSVM26 EQU 
* 

DSVNDP DS 

DSVDOP DS 

DSVNOP DS 

DSVTNP DS 

DSVNXP DS 

DSVX25 EQU 

DSVM22 EQU 

* 

DSVM23 EQU 

DSVFXP DS 

DSVFVN DS 

DSVXP2 DS 

DSVNXT DS 

DSVEND EQU 

DSVSIZ EQU 

DSVXSZ EQU 

* FORMAT B 

* SET, 
DSV7KY EQU 
DSV7X1 EQU 
DSV7ID EQU 
DSV7X2 EQU 
DSV7NX EQU 



VLDTY CHK 
RECORD LENGTH 
KEY LENGTH 
KEY LOCATION 
DATA SET INDICATORS 
LAST VOLUME CONTAINING DATA 
SET 

BLOCK LENGTH MULTIPLE OF 8 
BYTES 

DATA SET SECURITY PROTECTED 
INTEGRITY BIT 
DATA SET INDICATORS. 
LAST VOLUME CONTAINING DATA 
SET 

BLOCK LENGTH MULTIPLE OF 8 
BYTES 

DATA SET SECURITY PROTECTED 
INTEGRITY BIT 
SECONDARY ALLOCATION 
SECONDARY ALLOCATION FLAG 
1-SEC ALLOCATION IN PAGES 
0-NO SEC ALLOCATION 
NUMBER OF DATA PAGES 
NUMBER OF DIRECTORY PAGES 
NUMBER OF OVERFLOW PAGES 
TOTAL NUMBER OP PAGES 
ASSIGNED 
EXTENTS FIELD. 
EXTENT FLAG AND NUMBER 
XTRNL PAGES 
FIRST 2 BITS ARE FLAGS 
AFTER TM CC8 MEANS PAGES 
ASSIGNED AND IN USE 
PAGES AVAILABLE FOR USE 
FIRST EXTERNAL PAGE NUMBER 
FIRST VIRTUAL PAGE NUMBER 
4 MORE EXTENTS 
CONTINUATION DSCB CCHHR 
END OF DSCB 
DSVEND-DSVNME SIZE OF DSCB 
DSVXP2-DSVNXP SIZE OF EXTENT FIELD 
DSCB. CONTINUATION DSCB FOR VAM DATA 

DSVNME FORMAT 7 KEY FIELD 

DSVNME+2 ADDRESS OF FIRST 7 EXTENTS 

DSVFID FORMAT ID # X , FB t 

DSVDLU ADDRESS OF NEXT 15 EXTENTS 

DSVNXT NEXT DSCB 



XL4 

X 

XL2 

X 

DSVDSI 

DSVDSI 

DSVDSI 
DSVDSI 

X^O' 

X^O* 

X , 10 i 

X'08' 

XL4 

DSVSAL 

X'40' 

XL2 
XL2 
X 
XL2 



XL2 

DSVNXP 
X'CO' 

XL2 
XL2 
XL24 
XLS 

* 



CHADAS Storage map 



DEC 




HEX 
01 



I 

8JDASE13 



DASKEY 



DASE11 



DAS El 2 



(CHADAS continued on page 170) 



CHADAS 169 



DEC 



HEX 



C CHADAS continued from page 169) 



40 



128 



136 



28 



80 



88 



DASE2 



| DASFID 



DASE9 



j DASCHA 



DASCHA (CONT) 



Fields in CHADAS — by displacement 

DEC HEX FIELD 

0000 0000 DASKEY 

0004 0004 DASE11 

0004 0004 DASE1 



DEC HEX FIELD 
0006 0006 DASE12 

0008 0008 DASE13 

0009 0009 DASE2 



DEC HEX FIELD 

0044 002C DASFID 

0045 002D DASE9 
0135 0087 DASCHA 



Alphabetical list of fields in CHADAS 



FIELD 
DASCHA 


DEC 
0135 


HEX 
0087 


FIELD 
DAS El 2 


DEC HEX 
0006 0006 


DAS El 


0004 


0004 


DASE13 


0008 0008 


DASE11 


0004 


0004 


DASE2 


0009 0009 


.stinq Of 


CHADAS 


SOURCE 


INS 




LOCATION 


INSTRUCTION 


T OPER 




22 00000 


CHADAS 


DSECT 


22 00000 








DS 


OF 


22 00000 






DASKEY 


DS 


XL4 


22 00004 






DASE1 


DS 


0XL5 


22 00004 






DAS Ell 


DS 


XL2 


22 00006 






DASE12 


DS 


XL2 


22 00008 






DASE13 


DS 


XL1 


22 00009 






DASE2 


DS 


7XL5 


22 0002C 






DASFID 


DS 


XL1 


22 0002D 






DASE9 


DS 


18XL5 


22 00087 






DASCHA 

* 


DS 


XL5 



FIELD DEC HEX 

DASE9 0045 002D 

DASFID 0044 002C 

DASKEY 0000 0000 



COMMENT 

SAM DADSM DSCB - FORMAT 5 

KEY X» 05050505' 

1ST EXTENT 

RELATIVE TRACK ADDRESS - 2 

BYTES 

NUMBER OF FULL CYLINDERS - 

2 BYTES 

NUMBER OF TRACKS IN 

ADDITION TO CYLS - 1 BYTE 

2ND-8TH EXTENTS 

FORMAT IDENTIFIER - X f F5 f 

9TH-26TH EXTENTS 

POINTER TO NEXT FORMAT 5 

DSCB - CCHHR 



CHAVTC Storage map 



DEC 




40 
48 
56 



HEX 




28 



30 



38 





VTCKEY 


= 




|VTCFID | 
i 1 


VTCHPC | 


VTCHPC (CONT) 


I VTCHCT | 
I 1 


VTCHCA | 


VTCNAT 


[VTCFL1 (VTCNEX | UNNAMED 
1 1 1 


| VTCNLC | 
1 1 



(CHAVTC continued on page 171) 



17 CHAVTC 



DEC 
64 

72 



88 

96 

104 

112 



136 



HEX 



(CHAVTC continued from page 170) 



40| 

I 


VTCLCS 




1 
i 


VTCTRL 


IVTCOHI (VTCOHL |VTCOHK 
\ 1 I 


(VTCDFL | 


48 | 
1 


VTCTOL 




| VTCDPT | VTCDBT | 
i 1 1 






1 
I 










UNNAMED 




58 | 
1 


(VTCGSC | 
i 1 


60 | 
1 


VTCGSA 




i 
i 


VTCGSB 


1 

1 


VTCPTR 




68| 
1 


VTCPTR (VTCEX1 
I 


|VTCEX2 J 
1 1 




VTCEX3 


(VTCEX4 | 
i 1 


70 1 
1 


VTCEX4 


(CONT) 


1 

1 


UNNAMED 






i 
I 
1 
i 













88 | 



Fields in CHAVTC — by displacement 



DEC 

0000 

0000 

0044 

0045 

0050 

0052 

0056 

0058 

0058 

0058 

0058 

0059 



HEX 

0000 

0000 

002C 

002D 

0032 

0034 

0038 

003A 

003A 

003A 

003A 

003B 



FIELD 

VTCKEY 

VTCSTA 

VTCFID 

VTCHPC 

VTCHCT 

VTCHCA 

VTCNAT 

VTCX03 

VTCX02 

VTCX01 

VTCFL1 

VTCNEX 



DEC 

0062 

(EQU) 0064 

0066 

0068 

0069 

0070 

0071 

(EQU) 0071 

(EQU) 0071 

(EQU) 0071 

0072 

0074 



HEX 

003E 

0040 

0042 

0044 

0045 

0046 

0047 

0047 

0047 

0047 

0048 

004A 



FIELD 

VTCNLC 

VTCLCS 

VTCTRL 

VTCOHI 

VTCOHL 

VTCOHK 

VTCX07 

VTCX06 

VTCX05 

VTCDFL 

VTCTOL 

VTCDPT 



DEC 

0075 

0095 

0096 

0098 

0100 

0105 

(EQU) 0106 

(EQU) 0107 

(EQU) 0111 

0140 



HEX 

004B 

005F 

0060 

0062 

0064 

0069 

006A 

006B 

006F 

008C 



FIELD 

VTCDBT 

VTCGSC 

VTCGSA 

VTCGSB 

VTCPTR 

VTCEX1 

VTCEX2 

VTCEX3 

VTCEX4 

VTCEND 



(EQU) 



Alphabetical list of fields in CHAVTC 



FIELD DEC HEX 

VTCDBT 0075 004B 

VTCDFL 0071 0047 

VTCDPT 0074 004A 

VTCEND 0140 008C (EQU) 

VTCEX1 0105 0069 

VTCEX2 0106 006A 

VTCEX3 0107 006B 

VTCEX4 0111 006F 

VTCFID 0044 002C 

VTCFL1 0058 00 3A 

VTCGSA 0096 0060 

VTCGSB 0098 0062 



FIELD 

VTCGSC 

VTCHCA 

VTCHCT 

VTCHPC 

VTCKEY 

VTCLCS 

VTCNAT 

VTCNEX 

VTCNLC 

VTCOHI 

VTCOHK 

VTCOHL 



DEC 

0095 

0052 

0050 

0045 

0000 

0064 

0056 

0059 

0062 

0068 

0070 

0069 



HEX 

005F 

0034 

0032 

002D 

0000 

0040 

0038 

003B 

003E 

0044 

0046 

0045 



FIELD 


DEC 


HEX 




VTCPTR 


0100 


0064 




VTCSTA 


0000 


0000 


(EQU) 


VTCTOL 


0072 


0048 




VTCTRL 


0066 


0042 




VTCX01 


0058 


003A 


(EQU) 


VTCX02 


0058 


003A 


(EQU) 


VTCX03 


0058 


003A 


(EQU) 


VTCX05 


0071 


0047 


(EQU) 


VTCX06 


0071 


0047 


(EQU) 


VTCX07 


0071 


0047 


(EQU) 



Assembler listing of CHAVTC 



LOCATION INSTRUCTION SOURCE 



B6 00000 



INST OPER 
DSECT 



COMMENT 



B6 00000 



CHAVTC 

* DSECT FOR VTOC DSCB, FORMAT 4. 



B6 00000 
B6 0002C 
B6 0002D 
B6 00032 
B6 00034 

B6 00038 

B6 0003A 

( Listing 



B6 
of 



0003A 



VTCSTA 
VTCKEY 
VTCFID 
VTCHPC 
VTCHCT 
VTCHCA 
* 

VTCNAT 
* 

VTCFL1 
VTCX01 



EQU 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

EQU 



XL44 

C 

XL5 

XL2 

XL4 

XL2 

X 

VTCFL1 



KEY FIELD 

FORMAT ID 

HIGHEST PRIME CCHHR 

AVAILABLE DSCB RECORDS 

HIGHEST CCHH OR ALTERNATE 

TRACKS 

NUMBER OF ALTERNATE TRACKS 

AVAILABLE 

VTOC INDICATORS 

NO FORMAT 5 OR C DSCBS 



CHAVTC continued on page 172) 



CHAVTC 171 



(Listing of CHAVTC continued from page 171) 



LOCATION INSTRUCTION SOURCE 



B6 0003A 
B6 0003A 

00000080 
00000040 
00000020 



B6 0003B 

B6 0003C 
B6 0003E 

B6 00040 

B6 00042 

B6 00044 
B6 00045 

B6 00046 

B6 00047 



B6 00047 
B6 00047 
B6 00047 

00000004 
00000002 
00000001 



B6 00048 

B6 0004A 
B6 0004B 
B6 0004C 
B6 0005F 
B6 00060 

B6 00062 

B6 00064 

B6 00069 



00000001 



B6 0006A 
B6 0006B 
B6 0006F 
B6 00073 



B6 0008C 
0000008C 



VTCX02 
VTCX03 

* MASKS 
VTCM01 
VTCM02 
VTCM0 3 
VTCNEX 

♦ 

VTCNLC 

VTCLCS 

* 

VTCTRL 

VTCOHI 
VTCOHL 
* 
VTCOHK 

* 

VTCDFL 

VTCX05 

VTCX06 

VTCX07 

* 

VTCM05 

VTCM06 

VTCM07 

* 

VTCTOL 

VTCDPT 
VTCDBT 

VTCGSC 
VTCGSA 

VTCGSB 

* 

VTCPTR 

* 

VTCEX1 

* MASK 
VTCM08 

* 

VTCEX2 
VTCEX3 
VTCEX4 

VTCEND 
VTCSIZ 



INST 

EQU 

EQU 



OPER, 



COMMENT 



VTCFL1 FORMAT C DADSM IN USE 
VTCFL1 SYSTEM VOLUME 
TO TEST VTOC INDICATORS. 



EQU 
EQU 
EQU 
DS 

DS 
DS 

DS 

DS 

DS 
DS 

DS 

DS 
EQU 
EQU 
EQU 

EQU 

EQU 
EQU 

DS 

DS 
DS 
DS 
DS 
DS 

DS 

DS 

DS 



x'80' 

X^O' 
X 9 2Q* 
X 

XL2 
XL2 

XL2 

XL2 

X 
X 



X 

VTCDFL 
VTCDFL 
VTCDFL 

X'04' 
X'02' 
X'Ol" 

XL2 

X 

X 

XL19 

X 

XL2 

XL2 

XLS 



NO FORMAT 5 OR C 

FORMAT C DADSM 

SYSTEM VOLUME 

NUMBER OF EXTENTS SET TO 

X'Ol 1 

SPARE 

NUMBER OF LOGICAL 

CYLINDERS/VOLUME 

NUMBER OF TRACKS /LOGICAL 

CYLINDER 

NUMBER OF AVAILABLE 

BYTES/TRACK 

OVERHEAD FOR KEYED RECORD 

OVERHEAD FOR LAST KEYED RCD 

ON TRACK 

OVH BYTES TO BE SUBTRACTED 

IF NO KEY 

FLAG FIELD 

CCHH USED AS IN 2301 

CCHH USED AS IN 2321 

TOLERANCE MUST BE APPLIED 

MASKS FOR DEVICE CONSTANTS. 

CCHH IS USED AS IN 2301 

CCHH IS USED AS IN 2321 

TOLERANCE FACTOR MUST BE 

APPLIED 

TOLERANCE/512 GIVES EFF 

LNGTH OF RCD 

DSCBS/TRACK 

DIRECTORY BLOCKS/TRACK 

SPARE 

SET TO X f FF f IF TSS VOLUME 

GROSS SPACE AVAILABLE. FIRST 

2 BYTES 

GROSS SPACE 

AVAILABLE. SECOND 2 BYTES 

POINTER TO FORMAT 6 DSCB, IF 

ANY. 

EXTENT TYPE INDICATOR 



FOR EXTENT TYPE INDICATOR. 



EQU 

DS 
DS 
DS 
DS 

EQU 
EQU 



X f 01 f VTOC EXTENTS MUST BE TYPE 

1. 
X EXTENT SEQUENCE NUMBER 

XL4 LOWER LIMIT CCHH 
XL4 UPPER LIMIT CCHH 
XL25 SPARE 
* END OF DSCB 

VTCEND-VTCKEY SIZE OF DSCB 



172 CHAVTC 



Page Assignment Table (PAT) Oriented DSCBs (CHADSE S CHADSF) 

CHADSE (format E DSCB) and CHADSF (format F DSCB) define the particular pages 
occupied by a VAM2 data set. Each VAM2 data set has one associated format E DSCB, A 
variable number of format F DSCBs are used to accept overflow from the format E DSCB. 
A data set's residence is defined by a chain of DSCBs for that data set. The chain 
consists of one format E DSCB, followed by a series of format F DSCBs, when required. 

Each data set page is assigned a fullword entry in that data set's DSCB. This 
entry describes the physical location of the page as follows: 
1 3 4 15 16 31 



r t 

I 1 

| AF | unused | 



I 



"T T 

| REL | 

VOL | PAGE IN | 
I NO | VOL I 

"AF" is a one bit assignment flag where: 

0=page is assigned and used 

l=page is assigned and unused 
CHADSE and CHADSF are each 256 bytes in length, reside in virtual storage, and are 
aligned on word boundaries. 

CHADSE Storage map 



DEC 




40 

56 
64 
72 
80 
88 
96 



HEX 




28 

38 
40 
48 
50 
58 
60 



248 F8 
ORG DSEENT 



= 








DSENME 






= 




i 

I 
















DSESCD 






DSEXPD 


I 

I 


DSELPB 


I DSERFM 


| UNNAMED 
1 


DSEFTP 1 


I UNNAMED 




DSERCL 


(UNNAMED 
1 


| DSEKYL 


DSEKLC | 


I DSESAI 




DSESAL 


| DSENDP 


DSEDOP | 


| DSENOP 


DSENVL 


1 

i 


DSETNP 


(UNNAMED 
i 


i 
i 


DSECRD 






DSEEXD 




I 

I 




UNNAMED 






DSEENT 




DSECHN 




I DSETYP 
1 


| UNNAMED 
1 


| DSECKS 

1 





96 601 



DSEVOL 



(CHADSE continued on page 174) 



CHADSE 173 



DEC HEX 
ORG DSEENT 



(CHADSE continued from page 173) 



96 60| 



DSEEPE 



ORG DSEEPE 



96 



601 



DSERVN 



DSERPN 



Fields in CHADSE — by displacement 



DEC 

0000 

0000 

004a 

0057 

0058 

0060 

0060 

0060 

0060 

0062 

0062 

0062 

0062 



HEX 

0000 

0000 

002C 

0039 

003A 

003C 

003C 

003C 

003C 

003E 

003E 

003E 

003E 



FIELD 

DSENME 

DSESTA 

DSESCD 

DSEXPD 

DSELPB 

DSEX08 

DSEX07 

DSEX06 

DSERFM 

DSEX05 

DSEX04 

DSEX03 

DSEX02 



(EQU) 



(EQU) 

CEQU) 
CEQU) 

(EQU) 
(EQU) 
(EQU) 
(EQU) 



DEC 

0062 

0062 

0065 

0069 

0070 

0072 

0073 

0076 

0078 

0080 

0081 

0082 

0085 



HEX 

003E 

003E 

0041 

0045 

0046 

0048 

0049 

004C 

004E 

0050 

0051 

0052 

0055 



FIELD 

DSEX01 

DSEFTP 

DSERCL 

DSEKYL 

DSEKLC 

DSESAI 

DSESAL 

DSENDP 

DSEDOP 

DSENOP 

DSENVL 

DSETNP 

DSECRD 



DEC HEX FIELD 

(EQU) 0088 0058 DSEEXD 

0096 0060 DSERVN 

0096 0060 DSEEPE 

0096 0060 DSEVOL 

0096 0060 DSEASF 

0096 0060 DSEENT 

0098 0062 DSERPN 

024 8 00F8 DSECHN 

25 2 00FC DSETYP 

0254 00FE DSECKS 

0256 0100 DSEEND 



Alphabetical list of fields in CHADSE 



Assembler listing of CHADSE 



LOCATION 



INSTRUCTION 
2D 00000 

2D 00000 



2D 00000 
2D 0002C 
2D 00039 
2D 0003A 
2D 0003C 



2D 0003C 
00000080 
2D 0003C 
00000040 
2D 0003C 

000O00CO 



SOURCE 
CHADSE 

* 

DSESTA 
DSENME 
DSESCD 
DSEXPD 
DSELPB 
DSERFM 
DSEX06 
DSEM06 
DSEX07 
DSEM07 
DSEX08 

DSEM08 

* 



INST OPER 
DSECT 



EQU 

DS 

DS 

DS 

DS 

DS 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 



* 

CL44 

CL13 

CL1 

CL2 

XL1 

DSERFM 

x'so* 

DSERFM 

X^O' 

DSERFM 

X f C0 - 



2D 0003D 
2D 0003E 



DSEFTP 
2D 0003E DSEX01 
(Listing of CHADSE continued 



DS XL1 
DS XL2 
EQU DSEFTP 
on page 175) 



(EQU) 



FIELD DEC HEX FIELD DEC HEX 

DSEASF 0096 0060 (EQU) DSENDP 0076 004C 

DSECHN 0248 00F8 DSENME 0000 0000 

DSECKS 0254 O0FE DSENOP 0080 0050 

DSECRD 0085 0055 DSENVL 0081 0051 

DSEDOP 0078 004E DSERCL 0065 0041 

DSEEND 0256 0100 DSERFM 0060 003C 

DSEENT 0096 0060 DSERPN 0098 0062 

DSEEPE 0096 0060 DSERVN 0096 0060 

DSEEXD 0088 0058 DSESAI 0072 0048 

DSEFTP 0062 003E DSESAL 0073 0049 

DSEKLC 0070 0046 DSESCD 0044 002C 

DSEKYL 0069 0045 DSESTA 0000 0000 

DSELPB 0058 003A DSETNP 0082 0052 



FIELD 


DEC 


HEX 




DSETYP 


0252 


00FC 




DSEVOL 


0096 


0060 




DSEXPD 


0057 


0039 




DSEX01 


0062 


003E 


(EQU) 


DSEX02 


0062 


003E 


(EQU) 


DSEX03 


0062 


003E 


(EQU) 


DSEX04 


0062 


003E 


(EQU) 


DS EX05 


0062 


003E 


(EQU) 


DSEX06 


0060 


003C 


(EQU) 


DSEX07 


0060 


003C 


(EQU) 


DSEX08 


0060 


003C 


(EQU) 



(EQU) 



COMMENT 

- DSECT FOR FORMAT E DSCB - 

DATA SET NAME. 

SYSTEM CODE. 

INDEX SEQUENTIAL PAD. 

BYTES IN LAST DATA PAGE. 

RECORD FORMAT. 

FIXED LENGTH RECORD FLAG 

FIXED LENGTH RECORD MASK 

VARIABLE LENGTH RECORD FLAG 

VARIABLE LENGTH RECORD MASK 

UNDEFINED RECORD LENGTH 

FLAG 

UNDEFINED RECORD LENGTH 

MASK 

RESERVED 

DATA SET ORGANIZATION. 

VAM SEQUENTIAL 



174 CHADSE 



(Listing of CHADSE continued from page 174) 



LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 




2D 


0003E 


DSEX02 


EQU 


DSEFTP 




2D 


0003E 


DSEX03 


EQU 


DSEFTP 




2D 


0003E 


DSEX04 


EQU 


DSEFTP 




2D 


0003E 


DSEX05 


EQU 


DSEFTP 




00000072 


DSEM01 


EQU 


X , 72" 




00000071 


DSEM02 


EQU 


X , 71 f 




00000073 


DSEM03 


EQU 


X'73 f 




00000074 


DSEM04 


EQU 


X'74" 




00000075 


DSEM05 


EQU 


X § 75* 


2D 00040 








DS 


CL1 


2D 00041 






DSERCL 


DS 


CL3 


2D 00044 








DS 


XL1 


2D 00045 






DSEKYL 


DS 


CL1 


2D 00046 






DSEKLC 


DS 


CL2 


2D 00048 






DSESAI 
DSESAL 


DS 


XL1 


2D 00049 






DS 


CL3 


2D 0004C 






DSENDP 


DS . 


H 


2D 0004E 






DSEDOP 


DS 


H 


2D 00050 






DSENOP 


DS 


CL1 


2D 00051 






DSENVL 


DS 


CL1 


2D 00052 






DSETNP 


DS 


H 


2D 00054 








DS 


CL1 


2D 00055 






DSECRD 


DS 


CL3 


2D 00058 






DSEEXD 


DS 


CL3 


2D 0005B 








DS 


CL5 


2D 00060 






DSEENT 

* 
* 
* 
* 
* 
* 
* 


DS 


38F 


2D 000F8 






* 
* 

* 
DSECHN 


DS 


F 


2D 000FC 






DSETYP 


DS 


XL1 


2D 000FD 








DS 


C 


2D 000FE 






DSECKS 


DS 


H 




0000003F 


DSEWDCT 


EQU 


(DSETYP- 


2D 00100 






DSEEND 

♦ 


DS 


OX 




00000100 


DSELNGTE 

♦ 


1 EQU 


DSEENDH 




2D 


00060 




[ORG1 


DSEENT 


(Listing 


Of 


CHADSE 


continued 


on page 176) 



COMMENT 

ORGANIZATION, 

VAM INDEX SEQUENTIAL, 

VAM PARTITIONED INDEX 

SEQUENTIAL. 

VAM PARTITIONED SEQUENTIAL. 

VAM PARTITIONED 

FILE TYPE 

SEQUENTIAL ORGANIZATION. 

INDEX SEQUENTIAL. 

PARTITIONED INDEX SEQ. 

PARTITIONED SEQUENTIAL. 

PARTITIONED 

SPARE 

RECORD LENGTH. 

RESERVED 

KEY LENGTH. 

KEY LOCATION. 

SECONDARY ALLOCATION 

INDICATOR. 

SECONDARY ALLOCATION. 

NUMBER OF DATA PAGES. 

NUMBER OF DIRECTORY PAGES. 

NUMBER OF OVERFLOW PAGES. 

NUMBER OF PRIVATE VOLUMES. 

TOTAL NUMBER OF ASGD. PAGES 

AT CLOSE. 

SPARE . 

REFERENCE DATE 

CHANGE DATE 

SPARE 

FIELD FOR VOLUME ENTRIES 

AND EXTERNAL 

PAGE ENTRIES. FOR PRIVATE 

DATA SETS A LIST 

OF 6 BYTE VOLUME ID 

ENTRIES WILL PRECEDE THE 

LIST OF PAGE ENTRIES. THE 

NUMBER OF VOLUME 

ENTRIES IS CONTAINED IN 

DSENVL. THE PAGE 

ENTRIES WILL BEGIN ON THE 

NEXT FULL-WORD 

BOUNDARY FOLLOWING THE 

VOLUME ID LIST. 

FOR PUBLIC DATA SETS, ONLY 

PAGE ENTRIES 

OCCUPY THIS FIELD. 

POINTER TO FORMAT F DSCB 

(NEXT IN CHAIN) . 

DSCB TYPE 

SPARE 

CHECKSUM 
-CHADSE) /4 NUMBER WORDS IN 

CHECKSUM 16478 

END OF FORMAT- E DSCB 
16478 
CHADSE LENGTH OF FORMAT-E 

DSCB 16478 



CHADSE 175 



( Listing of CHADSE continued from page 175) 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 


2D 00060 




DSEVOL 


DS 


CL6 




00000019 


DSEMXVE 

4t 


EQU 


(DSECHN- 




2D 00060 




|ORG| 


DSEENT 


2D 00060 




DSEEPE 


DS 


F 




2D 00060 


DSEASF 


EQU 


DSEEPE 




00000080 


DSEASFM 


EQU 


X - 80' 




00000026 


DSEMXPE 


EQU 


(DSECHN- 




2D 00060 


* 


|ORG| 


DSEEPE 


2D 00060 




DSERVN 


DS 


XL2 


2D 00062 




DSERPN 


DS 


XL2 



COMMENT 

VOLUME SERIAL NUMBER 
-DSEENT)/L f DSEVOL MAX VOLUME 
ENTRIES 16478 

EXTERNAL PAGE ENTRIES 
EXTERNAL PAGE ASSIGNMENT 
FLAG 

1=EXTERNAL PAGE NOT IN USE 
-DSEENT)/L f DSEEPE MAX PAGE 
ENTRIES 16478 

0=EXTERNAL PAGE IN USE 

RELATIVE VOL, NO. (LOW 
ORDER 12 BITS) 
RELATIVE PAGE NUMBER 



176 CHADSE 



CriADSF Storage map 



DEC 




HEX 
01 



DSFENT 



248 



F8| 



DSFCHN 



| DSFTYP | UNNAMED 



DSFCKS 



ORG DSFENT 



ORG DSFENT 



ORG DSFEPE 



DSFVOL 



DSFEPE 



DSFRVN 



DSFRPN 



Fields in CHADSF — by displacement 

DEC HEX FIELD 

0000 0000 DSFRVN 

0000 0000 DSFEPE 

0000 0000 DSFVOL 

0000 0000 DSFASF (EQU) 



DEC HEX FIELD 
0000 0000 DSFENT 
0002 0002 DSFRPN 
0248 0OF8 DSFCHN 
025 2 00FC DSFTYP 



Alphabetical list of fields in CHADSF 

FIELD DEC HEX FIELD 

DSFASF 0000 0000 (EQU) DSFENT 

DSFCHN 0248 00F8 DSFEPE 

DSFCKS 0254 00FE DSFRPN 

DSFEND 0256 0100 DSFRVN 



DEC HEX 
0000 0000 
0000 0000 
0002 0002 
0000 0000 



DEC HEX FIELD 
0254 00FE DSFCKS 
0256 0100 DSFEND 



FIELD DEC HEX 
DSFTYP 0252 00FC 
DSFVOL 0000 0000 



Assembler listing of CHADSF 



LOCATION INSTRUCTION SOURCE INST OPER COMMENT 
2E 00000 CHADSF DSECT 

FORMAT F DSCB. 
THIS IS THE FORMAT OF ALL DSCB f S FOR ANY PAT 
ORGANIZED 
VAM DATA SET FOLLOWING THE FORMAT E DSCB. 



2E 00000 



2E O0OF8 



2E 000FC 
2E 000FD 
2E 000FE 
2E 00100 
(Listing 



DSFENT 



DS 



62F 



DSFCHN 



DS 



DSFTYP 


DS 


XL1 




DS 


C 


DSFCKS 


DS 


H 


DSFEND 


DS 


OX 



FIELD FOR 62 EXTERNAL PAGE 

ENTRIES OR 41 VOLUME ENTRIES 

OR BOTH. FOR PRIVATE DATA 

SETS A LIST OF 6 BYTE VOLUME 

ENTRIES MAY EXTEND FROM THE 
PREVIOUS DSCB. THE PAGE ENTRIES 

WILL BEGIN ON THE FIRST FULL 
WORD AFTER THE VOLUME ENTRIES. 

PTR TO FORMAT F DSCB (NEXT 

IN 

CHAIN) (ZERO IN LAST DSCB). 

DSCB TYPE. 

SPARE. 

CHECKSUM. 

END OF FORMAT-F DSCB 



of CHADSF continued on page 178) 



CHADSF 177 



(Listing of CHADSF continued from page 177) 
LOCATION INSTRUCTION SOURCE INST OPER 



COMMENT 



00000100 DSFLNGTH EQU 

* 

2E 00000 [ ORG 

2E 00000 DSFVOL DS 

00000029 DSFMXVE EQU 

* 

2E 00000 t ORG j DSFENT 

2E 00000 DSFEPE DS T 

2E 00000 DSFASF EQU DSFEPE 

* 

00000080 DSFASFM EQU X'BO 1 

* 

2E 00000 1 QRG I DSFEPE 

2E 00000 DSFRVN DS XL2 

* 

2E 00002 DSFRPN DS XL2 



16 47 8 
DSFEND-CHADSF LENGTH OF FORMAT-F 

DSCB 16478 
DSFENT 

CL6 VOLUME SERIAL NUMBER 
(DSFCHN-DSFENT)/L' DSFVOL MAX VOLUME 

ENTRIES 16478 



EXTERNAL PAGE ENTRIES 

EXTERNAL PAGE ASSIGNMENT 

FLAG 

1=EXTERNAL PAGE NOT IN USE 

0=EXTERNAL PAGE IN USE 

RELATIVE VOL. NO. (LOW 
ORDER 12 BITS) 
RELATIVE PAGE NUMBER 
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Support System Input/Output Request Block (CHAECW) 



CHAECW defines the Support System I/O Request Block used as the SIORCB 
by both RSS and VSS. It serves both as the communications area between modules 
requesting I/O service and the I/O system, and it serves as the I/O system 
PSECT used for internal communication. The paramters for an I/O request are 
passed in the SIORCB, 

CHAECW Storage map 



DEC 




HEX 




72 


48 


80 


50 


88 


58 


96 


60 


104 


68 



168 


A8 


176 


B0 


184 


B8 


192 


CO 


200 


C8 


208 


DO 


216 


D8 


224 


E0 


232 


E8 


240 


F0 


248 


F8 


256 


100 


264 


108 



288 
296 



120 
128 



= 


ECWASAVE 






= 


| ECWAPSCT 




ECWASDA 


| ECWAUFL1 I ECWAUFL2 | 
1 1 1 


| ECWABFFR 


| ECWAOPCD | 

1 1 


ECWAACMDI ECWALEN | 


| ECWALRCL 




ECWASLEN 


| ECWARES1 | 


| ECWASEEK | 


ECWASCSV 


| ECWASDAT | ECWAPHP 
i I 


I 
I 


ECWAPHP 2 


|ECWAFL1 |ECWAFL2 | 
I t 1 


| ECWADEV 


I 

I 






ECWACAW | 


| ECWASAPT 


! 

1 






ECWACSW | 


| ECWACSW (CONT) 


1 

i 






ECWAPSW | 


| ECWAPSW (CONT) 


1 

I 


ECWAIC01 


| ECWAERCT | 
I 1 


1 ECWASENS | 


| ECWARTN 


1 

l 






ECWARAM | 


| ECWAACSW | 


| ECWAAPSW | 


| ECWAIC0 2 | ECWALENV 

1 I 


I 

1 






ECWAACAW | 


| ECWASFRS 


! 

1 






ECWASLST | 


| ECWAREC | 


| ECWACLOA | 


| ECWABFFV 


| ECWAAAOP 
1 


[ECWAAOP | ECWAXSAV | 
1 1 1 


| ECWASFL1 | ECWASFL2 | ECWASFL3 | ECWASFL4 ( 
1 I I i 1 






ECWARES2 1 



(CHAECW continued on page 180) 
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(CHAECW continued from page 179) 



DEC 
30*4 



560 



640 



704 



784 



1504 
1512 
1520 
1528 
1536 
1544 
1552 
1560 
1568 
1576 
1584 
1592 
1600 
1608 
1616 



HEX 



130 




ECWATRIN 




= 


230 




ECWAIORF 




= 


280| 




ECWAPGLS 




= 


2C0 


ECWACCWS 


310| 




ECWACCWF 




= 


5E0 


ECWAFRST 




ECWALAST 




5E8 


ECWAIOCA 




ECWAIOCB 




5F0 


ECWACAM 




ECWADAM 




5F8 


ECWASAM 




ECWATAM 




600 


ECWAIOCP 




ECWAEDIT 




608 


ECWASSDT 




ECWATSSV 




610 


ECWAMSGA 




ECWAMSGB 




618 


ECWATAB 




ECWAERSC 




620 


ECWADERA 




ECWADERB 




628 


ECWADERC 




ECWASERB 




630 


ECWASERA 




ECWASERD 




638 


ECWADERE 




ECWACERA 




640 


| ECWACERB 




ECWAIOIN 




648 


ECWASERE 




ECWATERA 




650 


| ECWATERB 




ECWAERSD 





(CHAECW continued on page 181) 
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(CHAECW continued from page 18 0> 



DEC HEX 






















1624 658| 
» 




ECWASERC 






i 

i 




ECWADERD 


I 

i 


1632 6601 




ECWACERD 






1 

i 










ORG ECWADEV 
















176 B0|ECWADEA | 
I I 


ECWADEB | 

I 


ECWADEC 1 ECWADED | 
I I 




Fields in CHAECW 


— by displacement 










DEC 


HEX 


FIELD 




DEC 


HEX 


FIELD 




DEC 


HEX 


FIELD 


0000 


0000 


ECWASAVE 




0224 


O0E0 


ECWAACSW 




0299 


012B 


ECWAADC (EQU) 


0000 


0000 


ECWALDA 




0232 


00E8 


ECWAAPSW 




0299 


012B 


ECWASFL4 


0072 


0048 


ECWAPSCT 




0240 


O0F0 


ECWAIC02 




0300 


01 2C 


ECWARES2 


0076 


004C 


ECWASDA 




0242 


00F2 


ECWALENV 




0304 


0130 


ECWATRIN 


0076 


004C 


ECWAUBEG 




0244 


00F4 


ECWAACAW 




0560 


0230 


ECWAIORF 


0078 


004E 


ECWAUBF 


(EQU) 


0248 


00F8 


ECWASFRS 




0640 


0280 


ECWAPGLS 


0078 


004E 


ECWAUAP 


CEQU) 


0252 


OOFC 


ECWASLST 




0704 


02C0 


ECWACCWS 


0078 


004E 


ECWACAL 


(EQU) 


0256 


0100 


ECWAREC 




0784 


0310 


ECWACCWF 


0078 


004E 


ECWASAV 


(EQU) 


0264 


0108 


ECWACLOA 




1504 


05E0 


ECWAFRST 


0078 


004E 


ECWAUFL1 




0288 


0120 


ECWABFFV 




1508 


05E4 


ECWALAST 


0079 


004F 


ECWAUFL2 




0292 


0124 


ECWAAAOP 




1512 


05E8 


ECWAIOCA 


0080 


0050 


ECWABFFR 




0293 


0125 


ECWAAOP 




1512 


05E8 


ECWAVCON 


0080 


0050 


ECWAUCCW 




0294 


0126 


ECWAXSAV 




1516 


05EC 


ECWAIOCB 


0084 


0054 


ECWAOPCD 




0296 


0128 


ECWASBI 


(EQU) 


1520 


05F0 


ECWACAM 


0085 


0055 


ECWAMODE 


(EQU) 


0296 


0128 


ECWARDC 


(EQU) 


1524 


05F4 


ECWADAM 


0085 


0055 


ECWAACMD 




0296 


0128 


ECWAADM 


(EQU) 


1528 


05F8 


ECWASAM 


0086 


0056 


ECWALEN 




0296 


0128 


EC WATS 


(EQU) 


1532 


05FC 


ECWATAM 


0088 


0058 


ECWALRCL 




0296 


0128 


ECWANIE 


(EQU) 


1536 


0600 


ECWAIOCP 


0092 


005C 


ECWASLEN 




0296 


0128 


ECWARTA 


(EQU) 


1540 


0604 


ECWAEDIT 


0094 


005E 


EC WARES 1 




0296 


0128 


ECWAERC 


(EQU) 


1544 


0608 


ECWASSDT 


0096 


0060 


ECWASEEK 




0296 


0128 


ECWACCS 


(EQU) 


1548 


06 OC 


ECWATSSV 


0104 


0068 


ECWASCSV 




0296 


0128 


ECWASFL1 




1552 


0610 


ECWAMSGA 


0104 


0068 


ECWAUEND 


(EQU) 


0296 


0128 


ECWASFLA 




1556 


0614 


ECWAMSGB 


0168 


00A8 


ECWASDAT 




0297 


0129 


ECWAPLO 


(EQU) 


1560 


0618 


ECWATAB 


0168 


00A8 


ECWAGDE 




0297 


0129 


ECWANAP 


(EQU) 


1564 


061C 


ECWAERSC 


0170 


00AA 


ECWAPHP 




0297 


0129 


ECWAPA 


(EQU) 


1568 


0620 


ECWADERA 


0172 


00 AC 


ECWAPHP2 




0297 


0129 


ECWAPDL 


(EQU) 


1572 


0624 


ECWADERB 


0174 


00 AE 


ECWACBC 


(EQU) 


0297 


0129 


ECWAPSN 


(EQU) 


1576 


0628 


ECWADERC 


0174 


00AE 


ECWAVAM 


(EQU) 


0297 


0129 


ECWAPPS 


(EQU) 


1580 


062C 


ECWASERB 


0174 


OOAE 


ECWAFL1 




0297 


0129 


ECWAPCS 


(EQU) 


1584 


0630 


ECWASERA 


0175 


OOAF 


ECWAFL2 




0297 


0129 


ECWASFL2 




1588 


0634 


ECWASERD 


0176 


00 BO 


ECWADEA 




0298 


012A 


ECWARDA 


(EQU) 


1592 


0638 


ECWADERE 


0176 


00B0 


ECWADEV 




0298 


012A 


ECWATAMB 


(EQU) 


1596 


063C 


ECWACERA 


0177 


00 Bl 


ECWADEB 




0298 


012A 


ECWASAMB 


(EQU) 


1600 


0640 


ECWACERB 


0178 


O0B2 


ECWADEC 




0298 


012A 


ECWADAMB 


(EQU) 


1604 


0644 


ECWAIOIN 


0179 


00B3 


ECWADED 




0298 


012A 


ECWACAMB 


(EQU) 


1608 


0648 


ECWASERE 


0180 


00B4 


ECWACAW 




0298 


012A 


ECWAEOS 


(EQU) 


1612 


064C 


ECWATERA 


0184 


O0B8 


ECWASAPT 




0298 


012A 


ECWACON 


(EQU) 


1616 


0650 


ECWATERB 


0188 


00 BC 


ECWACSW 




0298 


012A 


ECWADSB 


(EQU) 


1620 


0654 


ECWAERSD 


0196 


00C4 


ECWAPSW 




0298 


012A 


ECWASFL3 




1624 


0658 


ECWASERC 


0204 


00 CC 


ECWAIC01 




0299 


012B 


ECWATOI 


(EQU) 


1628 


065C 


ECWADERD 


0206 


OOCE 


ECWAERCT 




0299 


012B 


ECWAMCW 


(EQU) 


1632 


0660 


ECWACERD 


0208 


O0D0 


ECWASENS 




0299 


012B 


ECWARIR 


(EQU) 


1636 


0664 


ECWALDB 


0216 


00D8 


ECWARTN 




0299 


012B 


ECWAINR 


(EQU) 








0220 


OODC 


ECWARAM 




0299 


012B 


ECWAWDC 


(EQU) 
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Alphabetical list of fields in CHAECW 



FIELD 


DEC 


HEX 




FIELD 


DEC 


HEX 




FIELD 


DEC 


HEX 




ECWAAAOP 


0292 


0124 




ECWAFRST 


1504 


05E0 




ECWASAPT 


0184 


00B8 




ECWAACAW 


02*44 


00F4 




ECWAGDE 


0168 


00A8 




ECWASAV 


0078 


004E 


(EQU) 


ECWAACMD 


0085 


0055 




ECWAIC01 


0204 


oocc 




ECWASAVE 


0000 


0000 




ECWAACSW 


0224 


00E0 




ECWAIC02 


0240 


00F0 




ECWASBI 


0296 


0128 


(EQU) 


ECWAADC 


0299 


012B 


(EQU) 


ECWAINR 


0299 


012B 


(EQU) 


ECWASCSV 


0104 


0068 




ECWAADM 


0296 


0128 


(EQU) 


ECWAIOCA 


1512 


05E8 




ECWASDA 


0076 


004C 




ECWAAOP 


0293 


0125 




ECWAIOCB 


1516 


05EC 




ECWASDAT 


0168 


00A8 




ECWAAPSW 


0232 


00E8 




ECWAIOCP 


1536 


0600 




ECWASEEK 


0096 


0060 




ECWABFFR 


0080 


0050 




ECWAIOIN 


1604 


0644 




ECWASENS 


0208 


00D0 




ECWABFFV 


0288 


0120 




ECWAIORF 


0560 


0230 




ECWASERA 


1584 


0630 




ECWACAL 


0078 


004E 


(EQU) 


ECWALAST 


1508 


05E4 




ECWASERB 


1580 


062C 




ECWACAM 


1520 


05FO 




ECWALDA 


0000 


0000 




ECWASERC 


1624 


0658 




ECWACAMB 


0298 


012A 


(EQU) 


ECWALDB 


1636 


0664 




ECWASERD 


1588 


0634 




ECWACAW 


0180 


00B4 




ECWALEN 


0086 


0056 




ECWASERE 


1608 


0648 




ECWACBC 


0174 


00AE 


(EQU) 


ECWALENV 


0242 


00F2 




ECWASFLA 


0296 


0128 




ECWACCS 


0296 


0128 


(EQU) 


ECWALRCL 


0088 


0058 




ECWASFLl 


0296 


0128 




ECWACCWF 


0784 


0310 




ECWAMCW 


0299 


012B 


(EQU) 


ECWASFL2 


0297 


0129 




ECWACCWS 


0704 


02C0 




ECWAMODE 


0085 


0055 


(EQU) 


ECWASFL3 


0298 


012A 




ECWACERA 


1596 


063C 




ECWAMSGA 


1552 


0610 




ECWASFL4 


0299 


012B 




ECWACERB 


1600 


0640 




ECWAMSGB 


1556 


0614 




ECWASFRS 


0248 


00F8 




ECWACERD 


1632 


0660 




ECWANAP 


0297 


0129 


(EQU) 


ECWASLEN 


0092 


005C 




ECWACLOA 


0264 


0108 




ECWANIE 


0296 


0128 


(EQU) 


ECWASLST 


0252 


OOFC 




ECWACON 


0298 


012A 


(EQU) 


ECWAOPCD 


0084 


0054 




ECWASSDT 


1544 


0608 




ECWACSW 


0188 


00BC 




ECWAPA 


0297 


0129 


(EQU) 


ECWATAB 


1560 


0618 




ECWADAM 


1524 


05F4 




ECWAPCS 


0297 


0129 


(EQU) 


ECWATAM 


1532 


05FC 




ECWADAMB 


0298 


01 2 A 


(EQU) 


ECWAPDL 


0297 


0129 


(EQU) 


ECWATAMB 


0298 


012A 


(EQU) 


ECWADEA 


0176 


00B0 




ECWAPGLS 


0640 


0280 




ECWATERA 


1612 


064C 




ECWADEB 


0177 


00B1 




ECWAPHP 


0170 


OOAA 




ECWATERB 


1616 


0650 




ECWADEC 


0178 


00B2 




ECWAPHP2 


0172 


00 AC 




ECWATOI 


0299 


012B 


(EQU) 


ECWADED 


0179 


00B3 




ECWAPLO 


0297 


0129 


(EQU) 


ECWATRIN 


0304 


0130 




ECWADERA 


1568 


0620 




ECWAPPS 


0297 


0129 


(EQU) 


ECWATS 


0296 


0128 


(EQU) 


ECWADERB 


1572 


0624 




ECWAPSCT 


0072 


0048 




ECWATSSV 


1548 


060C 




ECWADERC 


1576 


0628 




ECWAPSN 


0297 


0129 


(EQU) 


ECWAUAP 


0078 


004E 


(EQU) 


ECWADERD 


1628 


065C 




ECWAPSW 


0196 


00C4 




ECWAUBEG 


0076 


004C 




ECWADERE 


1592 


0638 




ECWARAM 


0220 


00 DC 




ECWAUBF 


0078 


004E 


(EQU) 


ECWADEV 


0176 


00B0 




ECWARDA 


0298 


01 2A 


(EQU) 


ECWAUCCW 


0080 


0050 




ECWADSB 


0298 


01 2 A 


(EQU) 


ECWARDC 


0296 


0128 


(EQU) 


ECWAUEND 


0104 


0068 


(EQU) 


ECWAEDIT 


1540 


0604 




ECWAREC 


0256 


0100 




ECWAUFL1 


0078 


004E 




ECWAEOS 


0298 


012A 


(EQU) 


ECWARES1 


0094 


005E 




ECWAUFL2 


0079 


004F 




ECWAERC 


0296 


0128 


(EQU) 


ECWARES2 


0300 


012C 




ECWAVAM 


0174 


OOAE 


(EQU) 


ECWAERCT 


0206 


00CE 




ECWARIR 


0299 


012B 


(EQU) 


ECWAVCON 


1512 


5E8 




ECWAERSC 


1564 


061C 




ECWARTA 


0296 


0128 


(EQU) 


ECWAWDC 


0299 


012B 


(EQU) 


ECWAERSD 


1620 


0654 




ECWARTN 


0216 


00 D8 




ECWAXSAV 


0294 


0126 




ECWAFL1 


0174 


00AE 




ECWASAM 


1528 


05F8 












ECWAFL2 


0175 


OOAF 




ECWASAMB 


0298 


012A 


(EQU) 











p 



Assembler listing of CHAECW 



LOCATION INSTRUCTION SOURCE 
30 00000 



INST OPER 



COMMENT 



CHAECW DSECT 

♦TITLE: 'CHAECW- SUPPORT SYSTEM INPUT/OUTPUT REQUEST BLOCK (SIORCB) * 

♦STATUS: CHANGE LEVEL 000 ♦ 

♦FUNCTION/OPERATION: THE SIORCB IS A GENERAL PURPOSE TABLE USED IN ♦ 

♦ BOTH RSS AND VSS . IT SERVES BOTH AS THE ♦ 

♦ COMMUNICATIONS AREA BETWEEN MODULES DESIRING I/O * 

♦ SERVICE AND THE I/O SYSTEM, AND AS THE I/O SYSTEM* 

♦ PSECT USED FOR INTERNAL COMMUNICATION. THE ♦ 

♦ PARAMETERS FOR AN I/O REQUEST ARE PASSED IN THE * 

♦ SIORCB. ♦ 
♦ENTRY POINTS: CHAECW = PSECT NAME ♦ 

♦ CHAECW = DSECT NAME ♦ 
♦INPUT/ OUTPUT: NOT APPLICABLE ♦ 
♦EXITS: NOT APPLICABLE ♦ 
♦TABLES/WORK AREAS: NOT APPLICABLE ♦ 
♦ATTRIBUTES: RESIDENT ♦ 
(Listing of CHAECW continued on page 183) 
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(Listing of CHAECW continued from page 182) 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 


COMMENT 


*********************************************************************** 










* THE SUPPORT 


SYSTEM INPUT/OUTPUT REQUEST CONTROL 










* BLOCK i 


[SIORCB) 




30 


00000 








DS 


0D 




30 


00000 






ECWALDA 


DS 


0B 


BEGINNING OF LOAD AREA 


30 


00000 






ECWASAVE 


DS 


18F 


I/O SYSTEM SAVE AREA - 1ST 
LEVEL 


30 


00048 






ECWAPSCT 


DS 


IF 


POINTER TO SIORCB 










* THE FOLLOWING FIELDS ARE SET UP BY THE I/O USER 


30 


0004C 






ECWAUBEG 


DS 


OF 


BEGINING OF USER AREA 


30 


0004C 






ECWASDA 


DS 


1H 


SYMBOLIC DEVICE ADDRESS 


30 


0004E 






ECWAUFL1 


DS 


IB 


USER FLAG BYTE 1 






30 


0004E 


ECWASAV 


EQU 


ECWAUFL1 


•SKIP THE NUMBER OF DOUBLE 
WORDS IN 






00000080 


ECWASAVM 


EQU 


X'SQ 9 


•SKIP ECWASLEN* MASK 






30 


0004E 


ECWACAL 

* 


EQU 


ECWAUFL1 


•I/O REQUEST RESULT OF 
CALL 1 BYTE 






00000040 


ECWACALM 


EQU 


X'40' 


•I/O REQUEST RESULT OF 










* 






CALL' MASK 






30 


0004E 


ECWAUAP 


EQU 


ECWAUFL1 


•DON'T USE ALTERNATE PATH' 
BYTE 






00000020 


ECWAUAPM 


EQU 


X'20' 


•DON'T USE ALTERNATE PATH' 










♦ 






MASK 






30 


0004E 


ECWAUBF 


EQU 


ECWAUFL1 


•BLOCKED RECORDS USED' BYTE 






00000010 


ECWAUBFM 


EQU 


X'10' 


'BLOCKED RECORDS USED* MASK 


30 


0004F 






ECWAUFL2 


DS 


IB 


USER FLAG BYTE 2 


30 


00050 






ECWAUCCW 


DS 


OD 




30 


00050 






ECWABFFR 

* 


DS 


IF 


START ADDRESS OF CCW AND 
BUFFER AREA 
OR DATA FIELD 


30 


00054 






ECWAOPCD 

* 


DS 


IB 


OPERATION CODE AS REQUIRED 

BY ACCESS 

METHODS 


30 


00055 






ECWAACMD 

* 

* 
* 


DS 


IB 


ACTUAL COMMAND CODE - USED 

WHEN 

ECWAOPCD IS A CONTROL 

OPERATION 

CODE AS REQUIRED BY ACCESS 

METH. 






30 


00055 


ECWAMODE 


EQU 


ECWAACMD 


MODE SET OP FOR 7 TRK TAPE 


30 


00056 






ECWALEN 

* 


DS 


1H 


LENGTH IN BYTES OF DATA TO 
BE TRANSF, 


30 


00058 






ECWALRCL 


DS 


IF 


LOGICAL RECORD LENGTH 


30 


0005C 






ECWASLEN 

* 


DS 


1H 


NUMBER OF DOUBLE WORDS TO 
BE SKIPPED 


30 


0005E 






ECWARES1 


DS 


1H 


RESERVED FOR FUTURE USE 
BEFORE READING DATA 


30 


00060 






ECWASEEK 

* 


DS 


2F 


SEEK ADDRESS - BBCCHHRX 
X=UNUSED 






30 


00068 


ECWAUEND 


EQU 


♦ 


END OF USER AREA 










* THE FOLLOWING FIELDS ARE USED OR SET UP BY THE 










♦ I/O SYSTEM 






30 


00068 








DS 


OD 




30 


00068 






ECWASCSV 


DS 


16F 


ERROR SCAN SAVE AREA 


30 


000A8 






ECWAGDE 


DS 


0CL12 


SSDAT ENTRY 


30 


000A8 






ECWASDAT 


DS 


1H 


SYMBOLIC DEVICE ADDRESS 


30 


000AA 






ECWAPHP 


DS 


1H 


PHYSICAL PATH 


30 


000AC 






ECWAPHP2 


DS 


1H 


ALTERNATE PHYSICAL PATH 


30 


O0OAE 






ECWAFL1 


DS 


1C 


FLAG BYTE 1 






30 


000AE 


ECWAVAM 

* 


EQU 


ECWAFL1 


•DEVICE IS VAM FORMATED' 
FLAG BYTE 






00000080 


ECWAVAMM 


EQU 


X'80' 


•DEVICE IS VAM FORMATED' 










* 






;LAG MASK 






30 


0O0AE 


ECWACBC 

* 


EQU 


ECWAFL1 


•DEVICE CAN BE CALLED' FLAG 
BYTE 






00000040 


ECWACBCM 


EQU 


X'40' 


•DEVICE CAN BE CALLED" FLAG 










* 






MASK 


30 


000AF 






ECWAFL2 


DS 


1C 


FLAG BYTE 2 


(Listing 


of 


CHAECW c 


ontinued on page 184) 
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(Listing of CHAECW continued from page 183) 



LOCATION INSTRUCTION SOURCE INST OPER 



30 000B0 
30 OO0B0 



30 000B1 



30 000B2 



30 0O0BO 

00000000 
00000001 
00000002 
00000003 
00000004 
00000005 

00000008 
00000020 
00000080 
00000001 
00000002 
00000004 

00000001 
00000002 
00000008 
00000010 
00000001 
00000002 
00000003 
00000004 
00000008 
00000001 

00000010 

00000020 

00000030 

00000040 

00000050 

00000060 

00000070 

00000080 

00000001 
00000002 
00000003 
00000004 
00000005 
00000006 



30 OO0B3 



(Listing 



00000080 
00000040 
00000080 

00000080 
00000040 
O00O0OEO 

000000A0 

00000000 
000000C0 
00000080 
00000000 
00000001 
00000002 
of CHAECW 



ECWADEV PS 

|ORG| 
ECWADEA DS 
ECWAMCNM EQU 
ECWAMCAM EQU 
ECWAMCBM EQU 
ECWAMCCM EQU 
ECWAMCDM EQU 
ECWAMCEM EQU 
ECWADEB DS 
ECWADCAM EQU 
ECWADCBM EQU 
ECWADCCM EQU 
ECWADCDM EQU 
ECWADCEM EQU 
ECWADCFM EQU 
ECWADEC DS 
ECWAUTAM EQU 
ECWAUTBM EQU 
ECWAUTCM EQU 
ECWAUTDM EQU 
ECWAUTEM EQU 
ECWAUTFM EQU 
ECWAUTGM EQU 
ECWAUTHM EQU 
ECWAUTIM EQU 
ECWAUTJM EQU 
* 

ECWAUTKM EQU 

ECWAUTLM EQU 

ECWAUTMM EQU 

ECWAUTNM EQU 

ECWAUTOM EQU 

ECWAUTPM EQU 

* 

ECWAUTQM EQU 

ECWAUTRM EQU 

* 

ECWAUTSM EQU 

ECWAUTTM EQU 

ECWAUTUM EQU 

ECWAUTVM EQU 

ECWAUTWM EQU 

ECWAUTXM EQU 

* 

ECWADED DS 

ECWAOFAM EQU 

ECWAOFBM EQU 

ECWAOFCM EQU 

* 

ECWAOFDM EQU 

ECWAOFEM EQU 

ECWAOFFM EQU 

ECWAOFGM EQU 

ECWAOFHM EQU 
ECWAOFIM EQU 
ECWAOFJM EQU 
ECWAOFKM EQU 
ECWAOFLM EQU 
ECWAOFMM EQU 



IF 

ECWADEV 
IB 
X'OO* 

x-oi 1 

X , 02 i 
X'03 # 
X'04' 
X'05 f 

IB 

x'os 1 

X^O" 

X 9 B0 9 

X'Ol' 

X f 02' 

X'04 1 

IB 

X'01' 

X'02' 

X'08' 

X'10 - 

X'Ol 1 

X f 02 i 

X , 03 i 

X , 04 f 

x , 08 f 

X'Ol 1 
X'lO' 
X^O 1 
X , 30 f 

X^O' 
X f 50' 

x , 60 f 
xno* 
x'so 1 

X'Ol 1 
X , 02" 
X'OS' 
X , 04« 

x^s 1 

X'06' 

IB 

X^O' 
X , 40 f 
X - 80 f 

X^O' 
X^O' 
X'EO f 

X 9 h0* 

X^O' 
X^O' 
X^O' 

x f oo f 

X'Ol 1 
X f 02' 



COMMENT 

DEVICE DEFINING INFORMATION 

MODEL CODE 

NON-TERMINAL DEVICE 

1050 MASK 

2741 MASK 

TTY MOD 35 MASK 

1052-7 MASK 

2260 MASK 

DEVICE CLASSES 

UNIT RECORD MASK 

DIRECT ACCESS MASK 

MAGNETIC TAPE MASK 

DIAL LINE MASK 

DEDICATED LINE MASK 

AUTOMATIC CALL FEATURE MASK 

UNIT TYPE 

2540 CARD READER MASK 

2540 CARD PUNCH MASK 

1403 PRINTER MASK 

2671 PPT READER MASK 

2311 MASK 

2301 MASK 
2321 MASK 

2302 MASK 
2314 MASK 

2400 SERIES MAGNETIC TAPE 

MASK 

IBM TERMINAL ADAPTER TYPE I 

MASK 

IBM TERMINAL ADAPTER TYPE 

II MASK 

IBM TELEGRAPH ADAPTER TYPE 

I MASK 

TELEGRAPH ADAPTER TYPE I 

MASK 

TELEGRAPH ADAPTER TYPE II 

MASK 

WORDL TRADE TELEGRAPH 

ADAPTER MASK 

SYNCHRONOUS ADAPTER TYPE I 

MASK 

IBM TERMINAL ADAPTER TYPE 

III MASK 
270 2 MASK 

2701 ON MULTIPLEXOR MASK 
1052-7 ON MULTIPLEXOR MASK 
1052-7 ON SELECTOR MASK 
2701 ON SELECTOR MASK 
2703 TRANSMISSION CONTROL 

15542 
OPTIONAL FEATURES 
CARD IMAGE MASK-SAM 
PUNCH FEED MASK-SAM 
UNIVERSAL CHARACTER 
MASK-SAM 
SCAN MASK- DAS DAM 
TRACK OVERFLOW MASK-DASDAM 
7 TRACK WITH DATA 
CONVERSION MASK- SAM 
7 TRACK WITHOUT DATA 
CONVERSION- SAM 
9 TRACK-SAM 
9 TRACK-SAM 
9 TRACK-SAM 
SAD ZERO MASK-TAM 
SAD ONE MASK-TAM 
SAD TWO MASK-TAM 



P 



continued on page 185) 



18 4 CHAECW 



(Listing of CHAECW continued from page 184) 



LOCATION INSTRUCTION SOURCE 



INST OPER 



COMMENT 

SAD THREE MASK-TAM 



00000003 ECWAOFNM EQU X f 3' 
30 000B4 1 QRG I 

♦♦♦♦♦♦♦♦♦♦^♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦^♦♦♦♦^♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦^ 

ECWADEA = MODEL CODE 

ECWADEB = DEVICE CLASSES 

ECWADEC = UNIT TYPE 

ECWADED = OPTIONAL FEATURES 
ECWADEA 
00 



ECWADEB 


ECWADEC 




ECWADED 


08=UNIT 


01=2540 


READER 


80=CARD IMAGE 


RECORD 


02=2540 


PUNCH 


40=PUNCH FEED 




08=1403 


PRINTER 


80=UNIVERSAL 
CHARACTERS 




10=2671 


PPT READER 


20=DIRECT 


01=2311 




8 0=SCAN 


ACCESS 


02=2301 
03=2321 
04=2302 
08=2314 




4 0=TRACK OVERFLOW 


80=MAGNETIC 


01=2400 


SERIES 


E0=7 TRACK WITH 


TAPE 






DATA CONVERSIO 



A0=7 TRACK WITHOUT 
DATA CONVERSION 
C0 f 80 = 9 TRACK 
**************** ************************** *************************** 

* THE FOLLOWING CONTINUES THE I/O SYSTEM FIELDS 

CHANNEL ADDRESS WORD 
SUPPORT SYSTEM ACTIVE DEV. 
TABLE PTR. 
CHANNEL STATUS WORD 
PROGRAM STATUS WORD 
EXTENDED PSW INTERRUPTION 
CODE 

ERROR RETRY COUNTER 
SENSE DATA 

ERROR ROUTINE RETURN 
ADDRESS 

ACCESS METHOD RETURN 
ADDRESS 
CSW SAVE AREA 
PSW SAVE AREA 
EXTENDED PSW INTERRUPTION 
CODE 

EC WALE N SAVE AREA 
CAW SAVE AREA 
ECWAFRST ADDRESS SAVE 
ECWALAST ADDRESS SAVE 
I/O WORK AREA 
CHANNEL LOG OUT AREA 
ECWABFFR SAVE AREA 
ACTUAL COMMAND CODE SAVE 
AREA 

OP CODE SAVE AREA 
SAVE AREA FOR RESIDUAL 
COUNT 

SYSTEM FLAGS 
FLAG BYTE 1 

•CSW STORED ON SIO' FLAG 
BYTE 

f CSW STORED ON SIO' MASK 
•ERROR ROUTINE IN CONTROL' 
FLG BYTE 

•ERROR ROUTINE IN CONTROL' 
MASK 

•RETURN TO ACCESS METHOD' 
FLAG BYTE 

•RETURN TO ACCESS METHOD' 
MASK 

•NO INTERRUPT EXPECTED' 
(Listing of CHAECW continued on page 18 6) 



30 O00B4 






ECWACAW 


DS 


IF 


30 000B8 






ECWASAPT 

* 


DS 


IF 


30 0O0BC 






ECWACSW 


DS 


2F 


30 OO0C4 






ECWAPSW 


DS 


2F 


30 000CC 






ECWAIC0 1 

* 


DS 


1H 


30 000CE 






ECWAERCT 


DS 


1H 


30 000D0 






ECWASENS 


DS 


2F 


30 000D8 






ECWARTN 
* 


DS 


IF 


30 000DC 






ECWARAM 

* 


DS 


IF 


30 000E0 






ECWAACSW 


DS 


2F 


30 000E8 






ECWAAPSW 


DS 


2F 


30 000F0 






ECWAIC0 2 

* 


DS 


1H 


30 000F2 






ECWALENV 


DS 


1H 


30 000F4 






ECWAACAW 


DS 


IF 


30 000F8 






ECWASFRS 


DS 


IF 


30 000FC 






ECWASLST 


DS 


IF 


30 00100 






ECWAREC 


DS 


2F 


30 00108 






ECWACLOA 


DS 


6F 


30 00120 






ECWABFFV 


DS 


IF 


30 00124 






ECWAAAOP 

* 


DS 


IB 


30 00125 






ECWAAOP 


DS 


IB 


30 00126 






ECWAXSAV 

* 


DS 


1H 


30 00128 






ECWASFLA 


DS 


OF 


30 00128 






ECWASFL1 


DS 


IB 




30 


00128 


ECWACCS 

* 


EQU 


ECWASFL1 




00000080 


ECWACCSM 


EQU 


X"80' 




30 


00128 


ECWAERC 

* 


EQU 


ECWASFL1 




00000040 


ECWAERCM 

* 


EQU 


X'40' 




30 


00128 


ECWARTA 

* 


EQU 


ECWASFL1 




00000020 


ECWARTAM 

* 


EQU 


X f 20 f 




30 


00128 


ECWANIE 


EQU 


ECWASFL1 



CHAECW 185 



(Listing of CHAECW continued from page 185) 



LOCATION INSTRUCTION SOURCE INST OPER 





00000010 


ECWANIEM 


EQU 


X'10' 




30 00128 


ECWATS 


EQU 


ECWASFL1 




00000008 


ECWATSM 


EQU 


x*08 f 




30 00128 


ECWAADM 


EQU 


ECWASFL1 




00000004 


ECWAADMM 


EQU 


X , 04 i 




30 00128 


ECWARDC 


EQU 


ECWASFL1 




00000002 


ECWARDCM 


EQU 


X , 02 - 




30 00128 


ECWASBI 


EQU 


ECWASFL1 




00000001 


ECWASBIM 


EQU 


X'01' 




30 00129 


ECWASFL2 


DS 


IB 




30 00129 


ECWAPCS 


EQU 


ECWASFL2 




00000080 


ECWAPCS M 


EQU 


X'80' 




30 00129 


ECWAPPS 


EQU 


ECWASFL2 




00000040 


ECWAPPSM 


EQU 


X^O' 




30 00129 


ECWAPSN 


EQU 


ECWASFL2 




00000020 


ECWAPSNM 


EQU 


X^O 1 




30 00129 


ECWAPDL 


EQU 


ECWASFL2 




00000010 


ECWAPDLM 


EQU 


X'lO 1 




30 00129 


ECWAPA 


EQU 


ECWASFL2 




00000008 


ECWAPAM 


EQU 


X f 08* 




30 00129 


ECWANAP 


EQU 


ECWASFL2 




00000004 


ECWANAPM 


EQU 


X , 04 i 




30 00129 


ECWAPLO 

♦ 


EQU 


ECWASFL2 




00000002 


ECWAPLOM 


EQU 


X , 02 i 




30 0012A 


ECWASFL3 


DS 


IB 




30 0012A 


ECWADSB 


EQU 


ECWASFL3 




00000080 


ECWADSBM 


EQU 


X , 80 i 




30 0012A 


ECWACON 


EQU 


ECWASFL3 




00000040 


ECWACONM 


EQU 


X f 40 f 




30 0012A 


ECWAEOS 


EQU 


ECWASFL3 




00000020 


ECWAEOSM 


EQU 


X^O* 




30 0012A 


ECWACAMB 


EQU 


ECWASFL3 




00000010 


ECWACAMM 


EQU 


X'lQ* 




30 0012A 


ECWADAMB 


EQU 


ECWASFL3 




00000008 


ECWADAMM 


EQU 


x'os* 




30 0012A 


ECWASAMB 


EQU 


ECWASFL3 




00000004 


ECWASAMM 


EQU 


X'04' 




30 0012A 


ECWATAMB 


EQU 


ECWASFL3 




00000002 


ECWATAMM 


EQU 


X'02' 




30 0012A 


ECWARDA 

♦ 


EQU 


ECWASFL3 




00000001 


ECWARDAM 

♦ 


EQU 


X^l' 




30 0012B 


ECWASFL4 


DS 


IB 




30 0012B 


ECWAADC 


EQU 


ECWASFL4 




00000004 


ECWAADCM 


EQU 


X'04* 




30 0012B 


ECWAWDC 


EQU 


ECWASFL4 




00000008 


ECWAWDCM 


EQU 


x^os" 




(Listing of CHAECW 


continued < 


on page 187) 


186 CHAECW 











COMMENT 
FLAG BYTE 

•NO INTERRUPT EXPECTED' 
MASK 

•ISSUE TERMINAL HIO 
SEQUENCE' BYTE 
•ISSUE TERMINAL HIO 
SEQUENCE' MASK 
•ADDRESS MARKER MISSING* 
FLAG BYTE 

•ADDRESS MARKER MISSING' 
MASK 

'READ DATA CHECK* FLAG BYTE 
'READ DATA CHECK 1 MASK 
•SENSE BYTE INFO' FLAG BYTE 
•SENSE BYTE INFO 1 MASK 
FLAG BYTE 2 

•PRINT CSW ON ERROR 1 FLAG 
BYTE 

•PRINT CSW ON ERROR" MASK 
•PRINT PSW ON ERROR' FLAG 
BYTE 

•PRINT PSW ON ERROR* MASK 
•PRINT SENSE INFO ON ERROR 1 
BYTE 

•PRINT SENSE INFO ON ERROR 1 
MASK 

•PRINT SYMBOLIC DEVICE 
ADDRESS 1 BYTE 
'PRINT SYMBOLIC DEVICE 
ADDRESS 1 MASK 
•PRINT ACTUAL PATH' BYTE 
•PRINT ACTUAL PATH 1 MASK 
•PRINT ALTERNATE PATH USED 1 
BYTE 

•PRINT ALTERNATE PATH USED 1 
MASK 

•PRINT CHANNEL LOG OUT 
AREA' BYTE 

•PRINT CHANNEL LOG OUT 
AREA 1 BYTE 
FLAG BYTE 3 
•DON'T SAVE ECWABFFR £ 
ECWALEN' BYTE 
•DON'T SAVE ECWABFFR & 
ECWALEN' MASK 
•CONTINUTAION CHARACTER • 
BYTE 

•CONTINUTAION CHARACTER* 
MASK 

•END OF SCAN' FLAG 
•END OF SCAN 1 MASK 
•CAM IN CONTROL 1 BYTE 
•CAM IN CONTROL 1 MASK 
•DASDAM IN CONTROL' BYTE 
•DAS DAM IN CONTROL* MASK 
•SAM IN CONTROL' BYTE 
•SAM IN CONTROL 1 MASK 
•TAM IN CONTROL* BYTE 
*TAM IN CONTROL* MASK 
'EDITOR RETURN TO ACCESS 
METHOD* FLAG 
•EDITOR RETURN TO ACCESS 
METHOD* MASK 
FLAG BYTE 4 
DC 1ST PASS FLAG 
DC 1ST PASS MASK 
UCS DATA CHECK FLAG 
UCS DATA CHECK MASK 



p 



LOC 


NATION 


INSTRUCT 10 
30 0012B 


N SOURCE 
ECWAINR 


INST 


OPER 






EQU 


ECWASFL4 






00000080 


ECWAINRM 


EQU 


X f 80 f 






30 0012B 


ECWARIR 

* 


EQU 


ECWASFL4 






00000040 


ECWARIRM 

* 


EQU 


X^O' 






30 0012B 


ECWAMCW 


EQU 


ECWASFL4 






00000020 


ECWAMCWM 


EQU 


X«20 f 






30 0012B 


ECWATOI 


EQU 


ECWASFL4 






00000010 


ECWATOIM 


EQU 


X^O' 


30 


0012C 




ECWARES2 


DS 


IF 


30 


00130 




ECWATRIN 


DS 


3 2D 


30 


00230 




ECWAIORF 


DS 


10D 


30 


00280 




ECWAPGLS 


DS 


8D 



(Listing of CHAECW continued from page 186) 

COMMENT 

INTERVENTION REQUIRED IN 

PROCESS 

INTERVENTION REQ. IN 

PROCESS MASK 

RESET INTERVENTION REQUIRED 

FLAGS 

RESET INTERVENTION REQUIRED 

MASK 

MODIFY CAW FLAG 

MODIFY CAW MASK 

CLEAR STATUS SAVE AREA FLAG 

CLEAR STATUS SAVE AREA MASK 

I/O WORK AREA 

TERMINAL READ IN AREA 

IORCB FLAGS 

IORCB PAGE LIST 

* THE FOLLOWING ARE CCW'S SET UP BY THE ACCESS 

* METHODS 

* AND BY ERROR RECOVERY MODULES 

ECWACCWS DS 10D ERROR RECOVERY CCW'S 

ECWACCWF DS 90D ACCESS METHOD CCW f S 

ECWAFRST DS IF POINTER TO FIRST ACTIVE CCW 

ECWALAST DS IF POINTER TO LAST ACTIVE CCW 
*********************************************************************** 

* THE FOLLOWING IS THE FORMAT OF THE CCW'S BUILT BY THE * 

* ACCESS METHODS AND THE ERROR RECOVERY MODULES * 

* * * * 31*32 39*40 47*48 * 63 * 

* *************************************************************** * 

* * * ** * * ** * * 

* * VM OR RM ADDRESS * FLAGS *OP CODE* BYTE COUNT * * 

* * * ** * * ** ** 

* *************************************************************** * 
*********************************************************************** 

* THE FOLLOWING ARE THE VCONS USED BY THE I/O 

* SYSTEM 



30 002CO 
30 00310 
30 005E0 
30 005E4 



30 005E8 
30 005E8 

30 005EC 

30 005F0 
30 005F4 
30 005F8 
30 005FC 
30 00600 
30 00604 
30 00608 
30 0060C 
30 00610 

30 00614 

30 00618 

30 0061C 

30 00620 

30 00624 

30 00628 

30 0062C 
30 00630 
30 00634 
30 00638 

30 0063C 

(Listing of CHAECW continued on page 188) 



ECWAVCON 


DS 


OF 


ECWAIOCA 

* 


DS 


IF 


ECWAIOCB 

* 


DS 


IF 


ECWACAM 


DS 


IF 


ECWADAM 


DS 


IF 


ECWASAM 


DS 


IF 


ECWATAM 


DS 


IF 


ECWAIOCP 


DS 


IF 


ECWAEDIT 


DS 


IF 


ECWASSDT 


DS 


IF 


ECWATSSV 


DS 


IF 


ECWAMSGA 

* 


DS 


IF 


ECWAMSGB 

* 


DS 


IF 


ECWATAB 

* 


DS 


IF 


ECWAERSC 

* 

ECWADERA 

* 


DS 


IF 


DS 


IF 


ECWADERB 

* 


DS 


IF 


ECWADERC 

* 


DS 


IF 


ECWASERB 


DS 


IF 


ECWASERA 


DS 


IF 


ECWASERD 


DS 


IF 


ECWADERE 

* 


DS 


IF 


ECWACERA 


DS 


IF 



TABLE OF VCONS 

POINTER TO I/O CONTROL MAIN 

ENTRY 

POINTER TO I/O CONTROL 

SECONDARY NTRY 

POINTER TO CAM 

POINTER TO DASDAM 

POINTER TO SAM 

POINTER TO TAM 

POINTER TO I/O COMPLETION 

POINTER TO I/O EDITOR 

POINTER TO SSDAT 

TSS STATUS SAVE AREA 

ENTRY TO MESSAGE FOR 

INTERVENTION REQUIRED 

ENTRY TO MESSAGE FOR 

UNRECOVERABLE I/O ERROR 

POINTER TO TABLE CONTAIN, 

SADT 

POINTER TO ERROR SCAN AND 

RECOVERY 

ENTRY TO DASDAM ERROR 

RECOVERY 

ENTRY TO DASDAM ERROR 

RECOVERY 

ENTRY TO DASDAM ERROR 

RECOVERY 

ENTRY TO SAM ERROR RECOVERY 

ENTRY TO SAM ERROR RECOVERY 

ENTRY TO SAM ERROR RECOVERY 

ENTRY TO ERROR SCAN-UNIT 

EXE 

ENTRY TO CAM ERROR RECOVERY 
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LOCATION 
30 00640 
30 00644 



30 00648 
30 0064C 
30 00650 
30 00654 

30 00658 
30 0065C 

30 00660 
30 00664 



SOURCE 


INST 


OPER 


ECWACERB 


DS 


IF 


ECWAIOIN 

* 


DS 


IF 


* 
ECWASERE 


DS 


IF 


ECWATERA 


DS 


IF 


ECWATERB 


DS 


IF 


ECWAERSD 
ECWASERC 


DS 


IF 


DS 


IF 


ECWADERD 
ECWACERD 


DS 


IF 


DS 


IF 


ECWALDB 


DS 


0B 



COMMENT 

ENTRY TO CAM ERROR RECOVERY 

POINTER TO I/O INITIATION 

ALSO USED 

BY ERROR SC AN FOR UNIT 

EXCEPTION 

ON THE 1052-7 

ENTRY TO SAM ERROR RECOVERY 

ENTRY TO TAM ERROR RECOVERY 

ENTRY TO TAM ERROR RECOVERY 

ENTRY TO ERROR SCAN FOR 

INTERVENTION REQUIRED 

ENTRY TO SAM ERROR RECOVERY 

ENTRY TO DASDAM ERROR 

RECOVERY 

ENTRY TO CAM ERROR RECOVERY 

END OF LOAD AREA 



9 



188 CHAECW 



Support System Device Allocation Table (CHAECX) 

The Support System Device Allocation Table (SSDAT) maintains certain information 
about the system devices for TSSS I/O, The VSS copy of the SSDAT resides in IVM. 
The RSS copy is divided into a resident and a transient portion. 

The resident portion of the SSDAT comprises a 12 byte header and four twelve- byte 
entries. The first entry is contiguous to the header and defines the Main Operator's 
terminal. The next three device entries are contiguous to the first and define the 
RSS residence devices. 

The remainder of the SSDAT is nonresident, loaded by the RSS loader when RSS is 
activated. This portion of the SSDAT contains one device entry for every device in 
the system. 

The SSDAT is created by SYSGEN/STARTUP from information contained in CHASDA, and 
the Pathfinding tables. 

CHAECX Storage map 



DEC 




24 
32 

48 
56 

64 



HEX 



0| 

1 




ECXBFDE 


1 

1 


ECXBLDE 




8| 
1 
1 
1 




ECXBSADT 


1 

I 
ECXBMOT 






18 | 
1 






ECXBRRES 






20| 
1 


1 

1 






1 
1 






ECXBSRES 




30 | 

1 






ECXBTRES 






38| 
1 


| ECXBSDA 

1 


1 

1 


ECXBPHP | 


40| 
1 


ECXBPHP2 


| ECXBFL1 
1 


|ECXBFL2 | 
1 1 


ECXBDEV 





ORG ECXBDEV 



68 



44 



[ECXBDEA (ECXBDEB (ECXBDEC | ECXBDED | 
I I I I 1 



Fields in CHAECX 



by displacement 



DEC 

0000 

0000 

0004 

0008 

0012 

0024 

0036 



HEX 

0000 

0000 

0004 

0008 

000C 

0018 

0024 



FIELD 

ECXBFDE 

ECXBHEAD 

ECXBLDE 

ECXBSADT 

ECXBMOT 

ECXBRRES 

ECXBSRES 



DEC HEX FIELD DEC HEX FIELD 

0048 0030 ECXBTRES 0066 0042 ECXBFL1 

0060 003C ECXBSDA 0067 0043 ECXBFL2 

0060 003C ECXBGDE 0068 0044 ECXBDEA 

0062 003E ECXBPHP 0068 0044 ECXBDEV 

0064 0040 ECXBPHP2 0069 0045 ECXBDEB 

0066 0042 ECXBCAL CEQU) 0070 0046 ECXBDEC 

0066 0042 ECXBVAM CEQU) 0071 0047 ECXBDED 



Alphabetical list of fields in CHAECX 



FIELD DEC HEX FIELD DEC HEX 

ECXBCAL 0066 0042 CEQU) ECXBFL1 0066 0042 

ECXBDEA 0068 0044 ECXBFL2 0067 0043 

ECXBDEB 0069 0045 ECXBGDE 0060 003C 

ECXBDEC 0070 0046 ECXBHEAD 0000 0000 

ECXBDED 0071 0047 ECXBLDE 0004 0004 

ECXBDEV 0068 0044 ECXBMOT 0012 000C 

ECXBFDE 0000 0000 ECXBPHP 0062 003E 



FIELD 



DEC HEX 



ECXBPHP2 0064 0040 

ECXBRRES 0024 0018 

ECXBSADT 0008 0008 

ECXBSDA 0060 003C 

ECXBSRES 0036 0024 

ECXBTRES 0048 0030 

ECXBVAM 0066 0042 



CEQU) 



CHAECX 189 



Assembler listing of CHAECX 



LOCATION INSTRUCTION SOURCE 
31 00000 CHAECX 



INST OPER 



COMMENT 



DSECT 
*********************************************************************** 

♦TITLE , CHAECX f - SUPPORT SYSTEM DEVICE ALLOCATION TABLE ( SSDAT ) * 
♦STATUS: CHANGE LEVEL 000 ♦ 

♦FUNCTION/OPERATION: THE RESIDENT PORTION OF THE SSDAT CONSISTS OF A ♦ 



f 



12 BYTE HEADER AND 4-12 BYTE ENTRIES. THE FIRSTS 
DEVICE ENTRY IS CONTIGUOUS TO THE HEADER AND ♦ 
DEFINES THE MAIN OPERATOR' S TERMINAL. THE NEXT ♦ 
THREE DEVICE ENTRIES DEFINE TSSS RESIDENCE AND ♦ 
ARE CONTIGUOUS TO THE MOT ENTRY. THE REMAINDER OF^ 
THE TABLE IS NON-RESIDENT AND IS LOADED BY THE ♦ 
RSS LOADER WHEN RSS IS ACTIVATED. IT IS CREATED ♦ 
BY TSS SYSGEN/STARTUP FROM INFO CONTAINED IN THE ♦ 
SDAT AND PATH-FINDING TABLES AND STORED IN A ♦ 
PREDEFINED LOCATION ON THE RSS RESIDENCE DEVICES. ♦ 
IT CONSISTS OF ONE DEVICE ENTRY FOR EVERY DEVICE ♦ 
ON THE SYSTEM AT STARTUP IN ASCENDING ORDER BY ♦ 
SYMBOLIC DEVICE ADDRESS. ALL ENTRIES IN THE ♦ 
NON-RESIDENT PORTION OF THIS TABLE ARE CONTIGUOUS^ 
NOT APPLICABLE ♦ 

NOT APPLICABLE ♦ 

* 



* 

* 

* 
* 

* 

* 

* 

♦ENTRY POINTS 

♦INPUT/ OUTPUT 

♦EXITS: NOT APPLICABLE 

♦TABLES/WORK AREAS: NOT APPLICABLE 

♦ATTRIBUTES: 

# 

♦ NOTES 

* 

* 



PARTIALLY RESIDENT 

PARTIALLY NON-RESIDENT 

THE CSECT NAMES FOR THIS TABLE ARE AS FOLLOWS - 

RSS - CHBECXRA 

RESIDENT PORTION - CHBECXRA 
NON-RESIDENT PORTION - CHBECXRB 

VSS - CHBECXVA 



*********************************************************************** 



31 00000 



31 00000 
31 00000 



31 00004 



31 00008 



31 00O0C 



DS 0D 
THE FOLLOWING FIELDS REPRESENT THE HEADER 



ECXBHEAD DS 
ECXBFDE DS 

* 

ECXBLDE DS 

* 

ECXBSADT DS 



0CL12 
IF 



31 


00018 


31 


00024 


31 


00030 


* 




* 




* 




* 




* 




* 




♦ 




* 




♦ 




* 




* 




31 


0003C 


31 


0003C 


31 


0003E 


31 


00040 


31 


00042 



ECXBMOT DS 
* 

ECXBRRES DS 
ECXBSRES DS 
ECXBTRES DS 



POINTER TO THE FIRST 

NON-RESIDENT DEVICE ENTRY 
IF POINTER TO THE LAST 

NON-RESIDENT DEVICE ENTRY 
IF RESERVED FOR USE BY 

RSS/VSS. 

♦ THE FOLLOWING ENTRIES ARE RESIDENT AND CONTIGUOUS 

♦ WITH THE HEADER. 
3F MAIN OPERATORS TERMINAL 

ENTRY 
3F RSS RESIDENCE DEVICE ENTRY 
3F RESIDENCE DEVICE ENTRY 
3F RESIDENCE DEVICE ENTRY 
A RESIDENCE DEVICE ENTRY WHICH IS NON-EXISTENT ♦ 

WILL HAVE ALL BITS ON IN THE SYMBOLIC DEVICE ♦ 

ADDRESS, PHYSICAL PATH AND ALTERNATE PATH FIELDS ♦ 
OF THE ENTRY. ♦ 

♦ THE FOLLOWING IS A GENERAL DEVICE ENTRY 

THE ALTERNATE PHYSICAL PATH FIELD OF A DEVICE ♦ 

ENTRY WILL HAVE ALL BITS ON IF NO ALTERNATE ♦ 

PATH EXISTS. ♦ 

ONLY THE DEVICES READY AT STARTUP WILL HAVE ♦ 

ENTRIES GENERATED FOR THEM. THEREFORE, EVERY ♦ 

GENERAL DEVICE ENTRY WILL HAVE A VALID SYMBOLIC ♦ 
DEVICE ADDRESS AND PHYSICAL PATH. ♦ 

THIS LABEL SHOULD BE USED 
AS A BASE WHEN 
ADDRESSING ANY GENERAL 
DEVICE ENTRY 
SYMBOLIC DEVICE ADDRESS 
PHYSICAL PATH 
ALTERNATE PHYSICAL PATH 
FLAG BYTE 1 
"DEVICE IS VAM 



ECXBGDE 

* 


DS 


0CL12 


# 
ECXBSDA 


DS 


1H 


ECXBPHP 


DS 


1H 


ECXBPHP2 


DS 


1H 


ECXBFL1 


DS 


1C 


ECXBVAM 


EQU 


ECXBFL1 



31 00042 
(Listing of CHAECX continued on page 191) 
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(Listing of CHAECX continued from page 190) 



LOCATION INSTRUCTION SOURCE INST OPER COMMENT 

* FORMATED' FLAG BYTE 
00000080 ECXBVAMM EQU X'80' 'DEVICE IS VAM 

* FORMATTED' FLAG 

31 0004*2 ECXBCAL EQU ECXBFL1 'DEVICE CAN BE CALLED' FLAG 

* BYTE 

0000004 ECXBCALM EQU X'40 f 'DEVICE CAN BE CALLED' MASK 
FLAG BYTE ECXBFIA IS FILLED IN BY STARTUP. * 

ACCESS DEVICE CONTAINS A VAM FORMATTED PACK OR DRUM. * 
DEVICE CAN BE CALLED FLAG IS SET WHEN THE DEVICE * 
DRIVE, 2540 CARD READER, 1050 TELECOMMUNICATIONS * 
SYSTEM WITH A 1056 CARD READER ATTACHED. ♦ 

ECXBFL2 DS 1C RESERVED FOR FUTURE USE. 
THE FOLLOWING WORD OF DEVICE DEFINING INFORMATION IS * 
EXACTLY THE SAME AS ITS CORRESPONDING WORD IN TSS SDAT.* 



* 
* 
* 
* 
* 
31 00043 

31 00044 
31 00044 



ECXBDEV 



31 00045 



31 00046 



31 00044 

00000000 
00000001 
00000002 
00000003 
00000004 

00000008 
00000020 
00000080 
00000001 

00000002 
00000008 
00000001 
00000002 
00000003 
00000008 
00000001 

00000010 
00000010 

00000020 

00000030 

00000040 

00000080 

00000001 

00000002 
00000003 
00000004 
00000005 
00000006 



DS 

|ORG| 

DS 

EQU 

EQU 

EQU 

EQU 

EQU 

DS 

EQU 



31 00047 



00000080 
00000040 
00000080 



ECXBDEA 

ECXBMCNM 

ECXBMCAM 

ECXBMCBM 

ECXBMCCM 

ECXBMCDM 

ECXBDEB 

ECXBDCAM 

ECXBDCBM EQU 

ECXBDCCM EQU 

ECXBDCDM EQU 

ECXBDEC DS 

ECXBUTBM EQU 

ECXBUTCM EQU 

ECXBUTEM EQU 

ECXBUTFM EQU 

ECXBUTGM EQU 

ECXBUTIM EQU 

ECXBUTJM EQU 

* 

ECXBUTDM EQU 

ECXBUTKM EQU 

* 

ECXBUTLM EQU 

ECXBUTMM EQU 

ECXBUTNM 

* 

ECXBUTPM EQU 

* 

ECXBUTSM EQU 

* 

ECXBUTTM EQU 

ECXBUTUM EQU 

ECXBUTVM EQU 

ECXBUTWM EQU 

ECXBUTXM EQU 

* 

ECXBDED DS 

ECXBOFAM EQU 

ECXBOFBM EQU 

ECXBOFCM EQU 



IF 

ECXBDEV 

IB 

X'OO' 

X'01' 

X'02' 

X f 03' 

X - 04' 

IB 

X'08' 

X'20' 

X'80' 

X'01' 

IB 

X'02' 

X f 08 f 

X'Ol 1 

X'02' 

X'03' 

X'08' 

X'01 f 



X 1 
X' 



10' 
10' 



X'20' 



X'30' 



EQU X'40' 



X'80' 

X'01' 

X'02' 
X'03 f 
X - 4' 
X'05' 
X'06 f 

IB 

X'80' 
X'40 f 
X'80' 



00000080 ECXBOFDM EQU X'80' 
00000040 ECXBOFEM EQU X'40' 
000000B0 ECXBOFTM EQU X'BO' 

000000E0 ECXBOFFM EQU X'EO' 

* 

* DEVICE IS VAM FORMATTED FLAG 

* IS A SEQUENTIAL INPUT DEVICE 
(Listing of CHAECX continued on page 192) 



DEVICE DEFINING INFORMATION 

MODEL CODE 

NON-TERMINAL DEVICE 

10 50 MASK 

2741 MASK 

TTY MOD 35 MASK 

1052-7 MASK 

DEVICE CLASS 

UNIT RECORD MASK 

DIRECT ACCESS MASK 

MAGNETIC TAPE MASK 

DIAL LINE MASK 

UNIT TYPE 

2540 CARD PUNCH MASK 

PRINTER MASK 

MASK 

MASK 

MASK 

MASK 

SERIES MAGNETIC TAPE 



1403 
2311 
2301 
2321 
2314 
2400 
MASK 
2671 



PPT READER MASK 

IBM TERMINAL ADAPTER TYPE I 

MASK 

IBM TERMINAL ADAPTER TYPE 

II MASK 

TELEGRAPH ADAPTER TYPE I 

MASK 

TELEGRAPH ADAPTER TYPE II 

MASK 

WORLD TRADE TELEGRAPH 

ADAPTER MASK - TAM 

270 2 ON MULTIPLEXOR CHANNEL 

MASK - TAM 

2701 ON MULTIPLEXOR MASK 

1052-7 ON MULTIPLEXOR MASK 

1052-7 ON SELECTOR MASK 

2701 ON SELECTOR MASK 

2703 TRANSMISSION CONTROL 

UNIT 

OPTIONAL FEATURES 

CARD IMAGE MASK-SAM 

PUNCH FEED MASK-SAM 

UNIVERSAL CHARACTER 

MASK-SAM 

SCAN MASK-DASDAM 

TRACK OVERFLOW MASK-DASDAM 

SCAN £ TRACK OVERFLOW MASK 

- DASDAM 

7 TRACK WITH DATA 

CONVERSION MASK-SAM 
IS SET WHEN A DIRECT * 
IE. 2400 TAPE * 



CHAECX 191 



(Listing of CHAECX continued from page 191 > 



LOCATION INSTRUCTION SOURCE 



INST OP£R 



00000002 


ECXBDCEM 


EQU 


X'02' 


00000004 


ECXBDCFM 


EQU 


X , 04 t 


00000001 


ECXBUTAM 


EQU 


X'01 f 


00000000 


ECXBOFKM 


EQU 


X'OO 1 


00000001 


ECXBOFLM 


EQU 


X'01' 


00000002 


ECXBOFMM 


EQU 


X'02' 


00000003 


ECXBOFNM 


EQU 


X'03' 


00000010 


ECXBOFOM 

* 

ECXBOFPM 

* 


EQU 


X'10 - 


00000020 


EQU 


X^O' 


00000030 


ECXBOFQM 


EQU 


X'30 1 


00000040 


ECXBOFRM 
ECXBOFSM 


EQU 


x f 40 f 


00000050 


EQU 


X'50' 


31 00048 


1 


[ORGl 





******************************************* 

* ECXBDEA = MODEL CODE 

* ECXBDEB = DEVICE CLASSES 

* ECXBDEC = UNIT TYPE 

* ECXBDED = OPTIONAL FEATURES 

* ECXBDEA ECXBDEB ECXBDEC 

* 00 08=UNIT 01=2540 

* RECORD 02=254 

* 08=1403 
* 

* 10=2671 



COMMENT 

DEDICATED LINE MASK 

AUTOMATIC CALL FEATURE MASK 

2540 CARD READER MASK 

SAD ZERO MASK-TAM 

SAD ONE MASK-TAM 

SAD TWO MASK-TAM 

SAD THREE MASK-TAM 

IBM LINE ADAPTER TYPE I - 

TAM 

IBM LINE ADAPTER TYPE II - 

TAM 

DATA SET LINE ADAPTER - TAM 

AUTOMATIC CALL ADAPTER - 

TAM 

TELEGRAPH LINE ADAPTER - 

TAM 

**************************** 

* 

* 

ECXBDED * 

READER 8 0=CARD IMAGE * 

PUNCH 40=PUNCH FEED * 

PRINTER 80=UNIVERSAL * 

CHARACTERS * 

PPT READER * 
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192 CHAECX 



Error Recovery Control Communications Area (CHAERC) 



CHAERC contains information about system configuration, system status, and 
device paths which will be used by the SERR modules. 

CHAERC Storage map 



DEC 




HEX 




3072 


COO 


3080 


C08 


3088 


C10 


3096 


C18 


310*4 


C20 


3112 


C28 


3120 


C30 


3128 


C38 


3136 


C40 


3144 


C48 


3152 


C50 


3160 


C58 


3168 


C60 


3176 


C68 


3184 


C70 


3192 


C78 


3200 


C80 


3208 


C88 


3216 


C90 


3224 


C98 


3232 


CA0 


3240 


CA8 


3248 


CB0 



= 


RESERVED 






= 


| ERCSYS 




ERCPLS 






| ERCPLR 




ERCShQ 






| UNNAMED 




ERCDPP 






1 ERCDPL 




ERCODP 






| ERCODL 


| ERCPDA 


1 

1 


ERCODA 




| ERCSSA 




ERCSRT 






I ERCSP1 




ERCSP2 






I ERCR14 




ERCR00 






| ERCR01 




ERCR02 






| ERCR0 3 




ERCR04 






| ERCNUC 


| ERCMID 


1 

1 


ERCCDE 




I ERCDLY 




UNNAMED 






| ERCA31 | 


I ERCA11 | 


| ERCJ11 


1 

I 


ERCPTH 






| ERCBAS 


| ERCODE | 
i f 


UNKAMSD 




| ERCD1S | 


| ERCMCW | 


| ERCPSW | 


| ERCZIP ( 


| ERCPAG | 
1 I 


ERCEIG | 

I 


ERCCLK 






| ERCOPA | 


= ERCTGR = 



(CHAERC continued on page 19 4 > 
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DEC 
3312 



3360 
3368 
3376 
3384 



(CHAERC continued from page 193) 



HEX 



CF0| 
I 

! 

1 




UNNAMED 






= 


D20IERCMA1 
J 


I ERCTIM (ERCGPR 
1 i 


| ERCMA2 | 
I i 


ERCSIC 


| ERCMUL 
I 


| ERCALT | 
1 I 


D28|ERCPIN 


| ERCTPP | ERCPRI 
I i 


| UNNAMED | 




£rctmp 




D30| 
1 


ERCLCL 






ERCSCL 




D38| 

i 


ERCCR6 






ERCR12 





Fields in CHAERC — by displacement 



DEC 

3072 

3076 

3080 

3084 

3092 

3096 

3100 

3104 

3108 

3110 

3112 

3116 

3120 

3124 

3128 

3132 

3136 

3140 

3144 



HEX 

0C00 

0C04 

0C08 

0C0C 

0C14 

0C18 

0C1C 

0C20 

0C24 

0C26 

0C28 

0C2C 

0C30 

0C34 

0C38 

0C3C 

0C40 

0C44 

0C48 



FIELD 

ERCSYS 

ERCPLS 

ERCPLR 

ERCSAQ 

ERCDPP 

ERCDPL 

ERCODP 

ERCODL 

ERCPDA 

ERCODA 

ERCSSA 

ERCSRT 

ERCSP1 

ERCSP2 

ERCR14 

ERCR00 

ERCR01 

ERCR02 

ERCR03 



DEC 

3148 

3152 

3156 

3158 

3160 

3168 

3176 

3184 

3188 

3192 

3196 

3200 

3208 

3216 

3224 

3232 

3234 

3236 

3240 



HEX 

0C4C 

0C50 

0C54 

0C56 

0C58 

0C60 

0C68 

0C70 

0C74 

0C78 

0C7C 

0C80 

0C88 

0C90 

0C98 

OCAO 

0CA2 

0CA4 

0CA8 



FIELD 

ERCR04 

ERCNUC 

ERCM1D 

ERCCDE 

ERCDLY 

ERCA31 

ERCA11 

ERCJ11 

ERCPTH 

ERCBAS 

ERCODE 

ERCDIS 

ERCMCW 

ERCPSW 

ERCZIP 

ERCPAG 

ERCEIG 

ERCCLK 

ERCOPA 



Alphabetical list of fields in CHAERC 



FIELD 

ERCALT 

ERCA11 

ERCA31 

ERCBAS 

ERCBYT 

ERCCDE 

ERCCLK 

ERCCR6 

ERCDIS 

ERCDLY 

ERCDPL 

ERCDPP 

ERCEIG 

ERCGPR 

ERCJ11 

ERCLCL 

ERCMA1 

ERCMA2 

ERCMCW 



DEC 

3367 

3176 

3168 

3192 

3360 

3158 

3236 

3384 

3200 

3160 

3096 

3092 

3234 

3362 

3184 

3376 

3360 

3363 

3208 



HEX 

0D27 

0C68 

0C60 

0C78 

0D20 

0C56 

0CA4 

0D38 

0C80 

0C58 

0C18 

0C14 

0CA2 

0D22 

0C70 

OD30 

0D20 

0D23 

0C88 



FIELD 

ERCMID 

ERCMUL 

ERCNUC 

ERCODA 

ERCODE 

ERCODL 

ERCODP 

ERCOPA 

ERCPAG 

ERCPDA 

ERCPIN 

ERCPLR 

ERCPLS 

ERCPRI 

ERCPSW 

ERCPTH 

ERCR00 

ERCR01 

ERCR02 



DEC 

3156 

3366 

3152 

3110 

3196 

3104 

310C 

3240 

3232 

3108 

3368 

3080 

3076 

3370 

3216 

3188 

3132 

3136 

3140 



HEX 

0C54 

0D26 

0C50 

0C26 

0C7C 

0C20 

0C1C 

0CA8 

OCAO 

0C24 

0D28 

0C08 

0C04 

0D2A 

0C90 

0C74 

0C3C 

0C40 

0C44 



DEC 


HEX 


FIELD 


3248 


0CB0 


ERCTGR 


3360 


0D20 


ERCMA1 


3360 


0D20 


ERCBYT 


3361 


0D21 


ERCTIM 


3362 


0D22 


ERCGPR 


3363 


0D23 


ERCMA2 


3364 


0D24 


ERCSIC 


3366 


0D26 


ERCMUL 


3367 


0D27 


ERCALT 


3368 


0D28 


ERCPIN 


3369 


0D29 


ERCTPP 


3370 


0D2A 


ERCPRI 


3372 


0D2C 


ERCTMP 


3376 


0D30 


ERCLCL 


3380 


0D34 


ERCSCL 


3384 


0D38 


ERCCR6 


3388 


0D3C 


ERCR12 



FIELD 

ERCR03 

ERCR04 

ERCR12 

ERCR14 

ERCSAQ 

ERCSCL 

ERCSIC 

ERCSP1 

ERCSP2 

ERCSRT 

ERCSSA 

ERCSYS 

ERCTGR 

ERCTIM 

ERCTMP 

ERCTPP 

ERCZIP 




194 CHAERC 



Assembler listing of CHAERC 



LOCATION INSTRUCTION SOURCE INST OPER 



COMMENT 



33 00000 CHAERC DSECT 
***** ** ** *********** *************************** ************ ************ 

* THIS DSECT IS USED TO COVER THE ERROR RECOVERY CONTROL COMMUNICATION* 

* WORK AREA WHICH IS MAINTAINED IN THE MODULE CHBER. IT CONTAINS * 

* INFORMATION ABOUT SYSTEM CONFIGURATION, SYSTEM STATUS AND DEVICE * 

* PATHS WHICH WILL BE USED BY THE SERR MODULES. THIS DSECT HAS BEEN * 

* RECODED FOR APAR 15420. * 
*********************************************************************** 



33 00C00 



33 
33 

33 
33 
33 
33 



00C00 
OOC04 

00C08 
00C0C 
00C10 
00C14 



33 00C18 



33 


00C1C 


33 


00C20 


33 


00C24 


33 


00C26 


33 


0OC28 


33 


00C2C 


33 


00C30 


33 


00C34 


33 


00C38 


33 


00C3C 


33 


00C40 


33 


00C44 


33 


00C48 


33 


00C4C 


33 


00C50 


33 


00C54 


33 


00C56 


33 


00C58 


33 


00C5C 


33 


00C60 


33 


00C68 


33 


00C70 



33 00C74 



33 00C78 



33 


00C7C 


33 


00C7D 


33 


00C80 


33 


00C88 


33 


OOC90 


33 


00C98 


33 


00CA0 


33 


00CA2 


33 


00CA4 


33 


00CA8 


33 


00CB0 


33 


0OCF0 


33 


00D20 


33 


00D20 


33 


00D21 





(ORG 


| CHAERC+3072 


ERCSYS 


DS 


A 


SYSTEM TABLE ADDR 


ERCPLS 


DS 


A 


SERR PAGE LOC - FIRST 


* 






MODULE 


ERCPLR 


DS 


A 


RECONFIGURATION PAGE LOC 


ERCSAQ 


DS 


A 


SERR AUXILLARY QUE ADDR 




DS 


XL4 


RESERVED 


ERCDPP 


DS 


A 


ADDR OF PAGE DEVICE ADDRESS 


* 






TBL 


ERCDPL 


DS 


F 


LENGTH OF PAGE DEVICE 


* 






ADDRESS TBL 


ERCODP 


DS 


A 


ADDR OF OP DEVICE PATH TBL 


ERCODL 


DS 


F 


LENGTH OF OP DEVICE PATH 


* 






TBL 


ERCPDA 


DS 


XL2 


PAGE DRUM PATH 


ERCODA 


DS 


XL2 


OP DEVICE PATH 


ERCSSA 


DS 


A 


SERR SAVE AREA ADDR 


ERCSRT 


DS 


A 


SERR BOOT RET ADDR 


ERCSP1 


DS 


XL4 


SERR TEST CONTROL WORD 


ERCSP2 


DS 


A 


HOOK FOR TEST CASES 


* SERR 


BOOT 


PARAMETER , 


SAVE AREA 


ERCR14 


DS 


A 


GPR 14 RETURN ADDR 


ERCROO 


DS 


A 


GPR CALL TYPE CODE - LOW 


* 






ORDER BYTE 


ERCR01 


DS 


A 


GPR 1 FAIL CPU ID - DATA 


* 






RECORD ADDR 


ERCR02 


DS 


A 


GPR 2 FAIL CPU PREFIX 


ERCR03 


DS 


A 


GPR 3 SERR OP AREA ADDR 


ERCR04 


DS 


A 


GPR 4 CALLER SAVE AREA 


* 






ADDR 


ERCNUC 


DS 


A 


NUCLEUS BASE ADDR 


* 






SERR BOOT WORK AREA 


ERCMID 


DS 


XL2 


REQUESTED MODULE ID 


ERCCDE 


DS 


XL2 


CHANNEL STATUS ON PAGE OP 


ERCDLY 


DS 


F 


DELAY COUNT FOR PAGE OP 




DS 


XL4 


RESERVED 


ERCA31 


DS 


XL8 


DRUM LOC OF MODULE LOADED 


ERCA11 


DS 


XL8 


INPUT AREA FOR SENSE 


ERCJ11 


DS 


A 


CURRENT AUXILLARY QUE ENTRY 


* 






ADDR 


ERCPTH 


DS 


A 


CURRENT DRUM PATH ENTRY 


* 






ADDR 


ERCBAS 


DS 


A 


SERR BOOT BASE ADDR 


* 






RECOVERY NUCLEUS WORK AREA 


ERCODE 


DS 


X 


ERROR CODE STORAGE 




DS 


XL3 


RESERVED 


ERCDIS 


DS 


XL8 


ENABLE-DISABLE PSW 


* DIAGNOSE MAINTENANCE 


CONTROL WORD (MCW) 


ERCMCW 


DS 


XL 8 


MCW BUILD AREA 


ERCPSW 


DS 


XL8 


SAVE PSW 


ERCZIP 


DS 


XL 8 


PSW BUILD AREA 


ERCPAG 


DS 


H 


PAGE LENGTH 


ERCEIG 


DS 


AL2 


CPU STATUS ADDR 


ERCCLK 


DS 


XL4 


SAVED CLOCK 


ERCOPA 


DS 


XLS 


EXTNL OLD PSW 


ERCTGR 


DS 


16A 


GPR SAVE AREA 




DS 


12A 


NUCLEUS GPR 2-13 


ERCBYT 


DS 


OD 


DUPLEX TEST BYTES AND FLAGS 


ERCMA1 


DS 


X 


MALFUNCTION ALERT FLAG 1 


ERCTIM 


DS 


X 


CLOCK SAVED FLAG 



(Listing of CHAERC continued on page 196} 



CHAERC 195 



(Listing of CHAERC continued from page 195) 



LOCATION INSTRUCTION 


SOURCE 


INST 


OPER 


33 00D22 


ERCGPR 


DS 


X 


33 00D23 


ERCMA2 


DS 


X 


33 00D24 


ERCSIC 


DS 


XL2 


33 O0D26 


ERCMUL 


DS 


X 


33 00D27 


ERCALT 

* 

ERCPIN 

ERCTPP 


DS 


X 


33 00D28 


DS 


X 


33 00D29 


DS 


X 


33 00D2A 


ERCPRI 


DS 


X 


33 00D2B 




DS 


X 


33 00D2C 


ERCTMP 


DS 


A 


33 00D30 


ERCLCL 


DS 


F 


33 00D34 


ERCSCL 


DS 


XL4 


33 00D38 


ERCCR6 


DS 


A 


33 00D3C 


ERCR12 


DS 


A 



COMMENT 

GPR SAVED FLAG 

MALFUNCTION ALERT FLAG 2 

SAVED INSTRUCTION COUNTER 

DUPLEX DOUBLE MACH CHECK 

FLAG 

ALTERNATE PREFIX IN USE 

FLAG 

DOUBLE MACH CHECK INTERRUPT 

CODE 

PING-PONG FLAG 

CPU PRIORITY FLAG 

RESERVED 

TEMPORARY GPR SAVE 

CLOCK RESET VALUE 

SAVED CLOCK 

ECR 6 SAVE AREA 

TEMPORARY REG 12 SAVE 



9 
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SERR/EMCI Data Table (CHAERE) 

The SERR/EMCI Data Table (CHAERE) maintains data passed from the External Machine 
Check Interrupt Processor (EMCI) to the System Environment Recording (SERR) Program. 
The 88-byte CHAERE resides in core storage aligned on word boundaries. 

CHAERE Storage map 



DEC 


8 

16 

24 

32 

40 

48 

56 

64 



HEX 



| ERECPU 

1 


| UNNAMED | 
1 1 


ERETLN 


| EREMOD 

1 


| ERECTC | EREF1 
1 1 


IEREF2 

1 


8| 

1 






EREDAT 




1 

i 






ERETIM 




10 | EREUID 

1 


18| 
1. 










EREPSW 










20 | 
1. 






EREPF 




1 

1 






ERECCA 




28 1 
1. 










ERECAM 










30| 
1. 


ERECUA 


1 

1 


ERESDA 


1 

1 


EREINT 


|ERERCT 

1 


| EREPNG 

1 


38| 
1. 










ERECSW 











40| 



L 



ERELOG 



Fields in CHAERE — by displacement 



DEC 

0000 
0002 
0004 
0005 
0006 
0006 
0006 
0007 
0007 



HEX 

0000 

0002 

0004 

0005 

0006 

0006 

0006 

0007 

0007 



FIELD 

ERECPU 

ERETLN 

EREMOD 

ERECTC 

ERECM 

EREEC 

EREF1 

ERESF 

ERECS 



DEC 

0007 

0007 

0007 

0007 

(EQU) 0008 

(EQU) 0012 

0016 

CEQU) 0024 

CEQU) 0032 



HEX 

0007 
0007 
0007 
0007 
0008 
000C 
0010 
0018 
0020 



FIELD 

ERERS 

ERELP 

ERECP 

EREF2 

EREDAT 

ERETIM 

EREUID 

EREPSW 

EREPF 



(EQU) 
(EQU) 
(EQU) 



DEC HEX 
0036 0024 
0040 0028 
0048 0030 
0050 0032 
0052 0034 

0054 0036 

0055 0037 

0056 0038 
0064 0040 



FIELD 

ERECCA 

ERECAM 

ERECUA 

ERESDA 

EREINT 

ERERCT 

EREPNG 

ERECSW 

ERELOG 



Alphabetical list of fields in CHAERE 



FIELD 

ERECAM 

ERECCA 

ERECM 

ERECP 

ERECPU 

ERECS 

ERECSW 

ERECTC 

ERECUA 



DEC 

0040 

0036 

0006 

0007 

0000 

0007 

0056 

0005 

0048 



HEX 

0028 

0024 

0006 

0007 

0000 

0007 

0038 

0005 

0030 



FIELD 

EREDAT 

EREEC 

(EQU) EREF1 

(EQU) EREF2 

EREINT 
(EQU) ERELOG 
ERELP 
EREMOD 
EREPF 



DEC HEX FIELD 

0008 0008 EREPNG 

0006 0006 (EQU) EREPSW 

0006 0006 ERERCT 

0007 0007 ERERS 
0052 0034 ERESDA 
0064 0040 ERESF 
0007 0007 (EQU) ERETIM 
0004 0004 ERETLN 
0032 0020 EREUID 



DEC HEX 
0055 0037 
0024 0018 
0054 0036 
0007 0007 (EQU) 
0050 0032 
0007 0007 
0012 000C 
0002 0002 
0016 0010 



(EQU) 



Assembler listing of CHAERE 



LOCATION INSTRUCTION SOURCE 



INST OPER 







34 


00000 


CHAERE 


DSECT 




34 


00000 






ERECPU 


DS 


X 


34 


00001 








DS 


X 


34 


00002 






ERETLN 


DS 


H 


34 


00004 






EREMOD 


DS 


X 


34 


00005 






ERECTC 


DS 


X 


34 


00006 






EREF1 


DS 


X 






34 


00006 


EREEC 


EQU 


EREF1 



(Listing of CHAERE continued on page 198) 



COMMENT 

SERR EMCI DATA TABLE 

CPU(S) ID (ORED TOGETHER) 

NOT USED 

TABLE LENGTH IN BYTES (=88) 

S/360 MODEL NUMBER (=67) 

CALL TYPE CODE (=X f 29 f ) 

FIRST FLAG FIELD 

RECORD ENTRY COMPLETE 
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(Listing of CHAERE continued from page 197) 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 


COMMENT 






00000080 


EREECM 


EQU 


X^O' 


EREEC MASK 






34 


00006 


ERECM 

* 


EQU 


EREF1 


CPU MODEL: 

ON— 2067-1/OFF— 2067-2 






00000040 


ERECMM 


EQU 


X'40" 


ERECM MASK 


3*4 


00007 






EREF2 


DS 


X 


SECOND FLAG FIELD 






34 


00007 


ERECP 


EQU 


EREF2 


CSW PRESENT 






00000080 


ERECPM 


EQU 


X'80' 


ERECP MASK 






34 


00007 


ERELP 


EQU 


EREF2 


CHANNEL LOG-OUT DATA 

PRESENT 






00000040 


ERELPM 


EQU 


X'40' 


ERELP MASK 






34 


00007 


ERERS 


EQU 


EREF2 


RETRY ATTEMPTED 






00000020 


ERERSM 


EQU 


X^O 1 


ERERS MASK 






34 


00007 


ERECS 


EQU 


EREF2 


ERECUA PRESENT 






00000010 


ERECSM 


EQU 


X f 10 f 


ERECS MASK 






34 


00007 


ERESF 


EQU 


EREF2 


SELECT IO FAILURE 






00000008 


ERESFM 


EQU 


x'os 1 


ERESF MASK 


34 


00008 






EREDAT 

* 


DS 


F 


ERECUA FOR OTHER CPU (IF 
APPLICABLE) 


34 


OOOOC 






ERETIM 


DS 


F 


TIME OF EMC I 


34 


00010 






EREUID 


DS 


D 


CURRENT USER ID 


34 


00018 






ERE PS W 


DS 


D 


MACHINE CHECK OLD PSW 
(EMCI'D CPU) 


34 


00020 






EREPF 


DS 


F 


ACTIVE PREFIX OF EMCI'D CPU 


34 


00024 






ERECCA 


DS 


F 


CCU CHANNEL ACTIVITY MAP 


34 


00028 






ERECAM 


DS 


D 


SYSTEM CHANNEL TYPE MAP 


34 


00030 






ERECUA 

* 


DS 


H 


CHAN-UNIT ADDR (ACTUAL 
DEVICE ADDR) 


34 


00032 






ERESDA 


DS 


H 


NOT USED 


34 


00034 






EREINT 

* 


DS 


H 


INTERRUPT CODE OF PSW IN 

EREPSW 


34 


00036 






ERERCT 


DS 


X 


CHANNEL FAILURE COUNT 


34 


00037 






EREPNG 


DS 


X 


NO. OF CPU'S HANDLING OWN 
EMCI IN DUPLEX ENVIRONMENT 


34 


00038 






ERECSW 


DS 


D 


CSW (CAUSED BY EMCI) 


34 


00040 






ERELOG 


DS 


3D 


CHANNEL LOG-OUT DATA (DUE 
TO EMCI) 
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Error Recording Block (CHAERR) 

CHAERR is used to pass error recording information from main storage 
CCEATCS) to virtual storage (VMSDR and V|ER). Module CZCTR processes 
this interface. CHAERR contains error recording statistics, such as: 

1. The CSW which indicates the error. 

2. The initial CCW causing the error. 

3. The sense data. 

CHAERR Storage map 



DEC 




32 
40 



120 
128 



HEX 
Of 

L 

8| 



ERRCSW 



ERRCHAN 



20(ERRCNT I ERRFLGl |ERRFLG2 | ERR NO | ERRREL 



ERRSAV1 



28 | 



I. 



ERRCCW 



78|ERRSNS0 | ERRSNS1 | ERRSNS2 |ERRSNS3 | ERRSNS4 |ERRSNS5 (ERRSNS6 |ERRSNS7 

I I I I I I I I 

80 j ERRSDA | ERRPATH | 



ORG ERRCSW 



| ERRCSW 1 



ERRCSW 2 



ERRCSW3 



ORG ERRCSW3 



(ERRSTA1 (ERRSTA2 | 

! I L 



ERRCSW4 



Fields in CHAERR — by displacement 



DEC 


HEX 


FIELD 




DEC 


HEX 


FIELD 




DEC 


HEX 


FIELD 


0000 


0000 


ERRCSW1 




0033 


0021 


ERRINL1 


(EQU) 


0037 


0025 


ERRSAV1 


0000 


0000 


ERRCSW 




0033 


0021 


ERRINT 


(EQU) 


0040 


0028 


ERRCCW 


0001 


0001 


ERRCSW 2 




0033 


0021 


ERRSLD 


(EQU) 


0120 


0078 


ERRSNS0 


0004 


0004 


ERRSTA1 




0033 


0021 


ERRIN 


(EQU) 


0121 


0079 


ERRSNS1 


0004 


0004 


ERRCSW3 




0033 


0021 


ERROUT 


(EQU) 


0122 


007A 


ERRSNS2 


0005 


0005 


ERRSTA2 




0033 


0021 


ERRSN2 


(EQU) 


0123 


007B 


ERRSNS3 


0006 


0006 


ERRCSW4 




0033 


0021 


ERRSN1 


(EQU) 


0124 


007C 


ERRSNS4 


0008 


0008 


ERRCHAN 




0033 


0021 


ERRFLGl 




0125 


007D 


ERRSNS5 


0032 


0020 


ERRCNT 




0034 


0022 


ERRCD 


(EQU) 


0126 


007E 


ERRSNS6 


0033 


0021 


ERRVD 


CEQU) 


0034 


0022 


ERRFLG2 




0127 


007F 


ERRSNS7 


0033 


0021 


ERRINL2M 


(EQU) 


0035 


0023 


ERRNO 




0128 


0080 


ERRSDA 


0033 


0021 


ERRINL2 


CEQU) 


0036 


0024 


ERRREL 




0130 


0082 


ERRPATH 
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Alphabetical list of fields in CHAERR 





FIELD 


DEC HEX 


FIELD 


DEC HEX 


FIELD DEC HEX 




ERRCCW 


0040 0028 


ERRINL1 


0033 0021 


CEQU) ERRSNS1 0121 0079 




ERRCD 


0034 0022 


CEQU) ERRINL2 


0033 0021 


CEQU) ERRSNS2 0122 007A 




ERRCHAN 


0008 0008 


ERRINL2M 


0033 0021 


CEQU) ERRSNS3 0123 007B 




ERRCNT 


0032 0020 


ERRINT 


0033 0021 


CEQU) ERRSNS4 0124 007C 




ERRCSW 


0000 0000 


ERRNO 


0035 0023 


ERRSNS5 0125 007D 




ERRCSW1 


0000 0000 


ERROUT 


0033 0021 


CEQU) ERRSNS6 0126 007E 




ERRCSW2 


0001 0001 


ERRPATH 


0130 0082 


ERRSNS7 0127 007F 




ERRCSW3 


0004 0004 


ERRREL 


0036 0024 


ERRSN1 0033 0021 (EQU) 




ERRCSW4 


0006 0006 


ERRS AVI 


0037 0025 


ERRSN2 0033 0021 CEQU) 




ERRFLG1 


0033 0021 


ERRSDA 


0128 0080 


ERRSTA1 0004 0004 




ERRFLG2 


0034 0022 


ERRSLD 


0033 0021 


CEQU) ERRSTA2 0005 0005 




ERRIN 


0033 0021 


(EQU) ERRSNS0 


0120 0078 


ERRVD 0033 0021 (EQU) 


Assembler 


listinq of 


CHAERR 












LOCATION 


INSTRUCTION SOURCE 


INST OPER 


COMMENT 








35 00000 


CHAERR 


DSECT 


ERROR RECORDING BACK 




35 


00000 






DS 


0D 


ALIGN ON DOUBLE WORD 




35 


00000 




ERRCSW 


DS 


D 


CSW FROM INTERRUPT GQE- 








35 00000 




lORG| 


i ERRCSW 


INDENTIFY FIELDS IN CSW 




35 


00000 




ERRCSW1 


DS 


X 


KEY-FIRST 4 
BITS/UNUSED-SECOND 4 BITS 




35 


00001 




ERRCSW2 


DS 


3XL1 


COMMAND ADDRESS 




35 


00004 


35 00004 


ERRCSW3 


DS 
I ORG I 


H 
ERRCSW3 


STATUS 




35 


00004 




ERRSTA1 


DS 


X 


1ST BYTE OF STATUS 








00000080 


ERRSTA1A 


EQU 


X , 80 f 


ATTENTION-NOT APPLICABLE 
FOR TERMINALS 








00000040 


ERRSTA1B 


EQU 


X'40 1 


STATUS MODIFIER 








00000020 


ERRSTA1C 


EQU 


X f 20 • 


CONTROL UNIT END 








00000010 


ERRSTA1D 


EQU 


X'lO" 


BUSY 








00000008 


ERRSTA1E 


EQU 


x'os 1 


CHANNEL END 








00000004 


ERRSTA1F 


EQU 


X f 04« 


DEVICE END 








00000002 


ERRSTA1G 


EQU 


X - 02' 


UNIT CHECK 








00000001 


ERRSTA1H 


EQU 


X'Ol 1 


UNIT EXCEPTION 




35 


00005 




ERRSTA2 


DS 


X 


2ND BYTE OF STATUS 








00000080 


ERRSTA2A 


EQU 


X f 80' 


PCI 








00000040 


ERRSTA2B 


EQU 


X f 40' 


INCORRECT LENGTH 








00000020 


ERRSTA2C 


EQU 


X'20 1 


PROGRAM CHECK 








00000010 


ERRSTA2D 


EQU 


X'10' 


PROTECTION CHECK 








00000008 


ERRSTA2E 


EQU 


x'os 1 


CHANNEL DATA CHECK 








00000004 


ERRSTA2F 


EQU 


X'04 f 


CHANNEL CONTROL CHECK 








00000002 


ERRSTA2G 


EQU 


X , 02 i 


INTERFACE CONTROL CHECK 








00000001 


ERRSTA2H 


EQU 


X'Ol* 


CHAINING CHECK 




35 


00006 




ERRCSW4 


DS 


H 


BYTE COUNT 




35 


00008 




ERRCHAN 


DS 


3D 


CHANNEL LOGOUT DATA 




35 


00020 




ERRCNT 


DS 


X 


TOTAL RETRY COUNT 










♦NOTE: IF SOLID ERROR FLAG SET THEN ERRCNT 










♦REPRESENTS THE NUMBER 


OF 










* 






RETRYS 










♦ATTEMPTED BEFORE THE RECOVERY PROCESSOR GAVE UP 




35 


00021 




ERRFLG1 


DS 


X 


FLAG BYTE 1 








35 00021 


ERRSN1 


EQU 


ERRFLG1 


SENSE DATA EXISTS 








00000080 


ERRSN1M 

* 
* 


EQU 


x'so* 


SENSE DATA EXISTS MASK-IF 
OFF U.C. IS 
ALSO OFF 








35 00021 


ERRS N 2 


EQU 


ERRFLG1 


SENSE FAILED 








00000040 


ERRSN2M 


EQU 


X^O* 


SENSE OPERATION FAILED FLAG 

MASK-NO SENSE 

EXISTS 








35 00021 


ERROUT 


EQU 


ERRFLG1 


OUTBOARD ERROR OCCURRED 








00000020 


ERROUTM 


EQU 


X^O' 


OUTBOARD ERROR MASK 








35 00021 


ERRIN 


EQU 


ERRFLG1 


INBOARD ERROR 








00000010 


ERRINM 


EQU 


X'lO 1 


INBOARD ERROR MASK 








35 00021 


ERRSLD 


EQU 


ERRFLG1 


SOLID ERROR-RECOVERY FAILED 








00000008 


ERRSLDM 


EQU 


x'os' 


SOLID ERROR MASK 




(Listing 


of CHAERR 


continued < 


Dn page 201) 
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(Listing of CHAERR continued from page 200) 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 






35 00021 


ERRINT 


EQU 


ERRFLG1 






00000004 


ERRINTM 


EQU 


X-04' 






35 00021 


ERRINL1 

♦ 


EQU 


ERRFLG1 






00000002 


ERRINL1M 


EQU 


X , 02' 






35 00021 


ERRINL2 

* 

♦ 


EQU 


ERRFLG1 






35 00021 


* 
ERRINL2M 

* 


EQU 


KJL.Jrx\J 

issu: 

ERRFLGl 






35 00021 


* 
ERRVD 


EQU 


ERRFLG1 






00000001 


ERRVDM 


EQU 


X'Ol' 


35 


00022 




ERRFLG2 


DS 


X 






35 00022 


ERRCD 


EQU 


ERRFLG2 






00000080 


ERRCDM 


EQU 


x , 80 t 


35 


00023 




ERRNO 


DS 


X 


35 


00024 




ERRREL 


DS 


X 


35 


00025 




ERRS AVI 


DS 


3XL1 


35 


00028 




ERRCCW 


DS 


10D 


35 


00078 




ERRSNS0 


DS 


X 


35 


00079 




ERRSNS1 


DS 


X 


35 


0007A 




ERRSNS2 


DS 


X 


35 


0007B 




ERRSNS3 


DS 


X 


35 


0007C 




ERRSNS** 


DS 


X 


35 


0007D 




ERRSNS5 


DS 


X 


35 


0007E 




ERRSNS6 


DS 


X 


35 


0007F 




ERRSNS7 


DS 


X 


35 


00080 




ERRSDA 


DS 


H 


35 


00082 




ERRPATH 


DS 


H 



COMMENT 

INTERMITTENT ERROR-RECOVERY 
SUCCESSFUL 

INTERMITTENT ERROR MASK 
ERROR ON INITIAL 
INTERRUPT-NO CCW LIST 
ERROR ON INTIAL INTERRUPT 
MASK 

ERROR ON INITIAL 
INTERRUPT-CCW LIST 
ENTS RECOVERY STRING 

ERROR ON INITIAL INTERRUPT 

WITH RECOVERY 

LIST ISSUED MASK 

NO SENSE ISSUED 

NO SENSE ISSUED MASK 

FLAG BYTE 2 

CHANNEL LOGOUT DATA EXISTS 

CHANNEL LOGOUT DATA EXISTS 

MASK 

NUMBER OF CCWS (MAX10) 

RELATIVE NUMBER OF FAILING 

CCW 

UNUSED 

AREA FOR CCW LIST 

SENSE BYTE 

SENSE BYTE 1 

SEmE BYTE 2 

SENSE BYTE 3 

SENSE BYTE 4 

SENSE BYTE 5 

SENSE BYTE 6 

SENSE BYTE 7 

SYMBOLIC DEVICE ADDRESS 

ACTUAL PATH ADDRESS 
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Enter Tables 1 and 2 (CHAET1 S CHAET2) 

Enter Tables 1 and 2 (ET1 and ET2) are private tables for the use of the task mon- 
itor ENTER SVC routine, 

ET1 consists of one word for each possible ENTER code beginning with zero. For 
assigned ENTER codes the corresponding word in the table contains a pointer to an 
entry in ET2 ; for unassigned ENTER codes the corresponding word contains all zeros. 

ET2 contains an entry for each assigned ENTER code and can be accessed only by 
pointers in ET1. 

Note ; When ENTER code is invalid the entry word contains all zeros; for a valid ENT- 
ER code the entry word contains a pointer to ET2. 

CHAET1 Storage map 



DEC HEX 



0| ET1HVC | ET1FST 

I I 

Fields in CHAET1 — by displacement 

DEC HEX FIELD DEC HEX FIELD DEC HEX FIELD 

0000 0000 ET1HVC 0004 0004 ET1FST 

Alphabetical list of fields in CHAET1 

FIELD DEC HEX FIELD DEC HEX FIELD DEC HEX 
ET1FST 0004 0004 ET1HVC 0000 0000 

Assembler listing of CHAET1 

LOCATION INSTRUCTION SOURCE INST OPER COMMENT 

36 00000 CHAET1 DSECT 

***** TASK MONITOR ENTER TABLE 1 — 

♦CONTAINS POINTERS 

***** TO ENTRIES IN ENTER TABLE 2 

36 00000 DS OF 

36 00000 ET1HVC DS F HIGHEST VALID ENTER CODE 

36 00004 ET1FST DS F ADDRESS OF 1ST ENTER CODE 
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CHAET2 Storage map 



DEC 




HEX 



0|ET2FB1 | 



UNNAMED 



ET2VC 



8| 



ET2RC 



ORG ET2VC 



ET2SVC 



Fields in CHAET2 — by displacement 



HEX 
0000 



FIELD 



DEC 

0000 0000 ET2P1 
0000 0000 ET2IS 
0000 0000 ET2TY 



(EQU) 

(EQU) 
(EQU) 



DEC HEX FIELD 
0000 0000 ET2FB1 
0004 0004 ET2SVC 
0004 0004 ET2VC 



DEC HEX FIELD 
0008 0008 ET2RC 



Alphabetical list of fields in CHAET2 

FIELD DEC HEX FIELD 
ET2FB1 0000 0000 ET2RC 

ET2IS 0000 0000 (EQU) ET2SVC 

ET2P1 0000 0000 (EQU) ET2TY 

Assembler listing of CHAET2 



DEC HEX 
0008 0008 
0004 0004 
0000 0000 (EQU) 



FIELD 
ET2VC 



DEC HEX 
0004 0004 



LOCATION INSTRUCTION SOURCE 



37 00000 



37 00000 
37 00000 



37 00000 
00000080 
37 00000 
00000040 
37 00000 
00000020 



37 00001 
37 00004 
37 00008 

37 00004 



37 00004 



CHAET2 
***** 

ET2FB1 

ET2TY 

ET2TYM 

ET2IS 

ET2ISM 

ET2P1 

ET2P1M 

ET2VC 
ET2RC 

ET2SVC 
*** 

♦GROUP 



INST OPER 
DSECT 



COMMENT 



TASK MONITOR ENTER TABLE 2 
DS OF 

DS XL1 INDICATOR WORD 1ST BYTE 

EQU ET2FB1 TYPE - V AND R CON 

EQU X'SO' 1 - ADCON GROUP 

EQU ET2FB1 INT. STATUS - NOT INT. 

EQU X^O' 1 - INTERRUPTABLE 

EQU ET2FB1 PI SETTING - SET PI OFF 

EQU X , 20 f 1 - SET PI ON 

DS XL3 NOT USED 

DS F V CON 

DS F R CON 

| ORG | ET2VC ADCON GROUP 

DS H BEGINNING OF ADCON GROUP 

TO ACCESS THE ADCON GROUP, THE ADCOND 
IS USED 
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TSS External Page Table (CHAEXT) 



CHAEXT defines and correlates main storage addresses and corresponding 
external locations of TSS Supervisor main storage pages rolled out by RSS. 
It contains any additional information necessary for defining the rolled out 
TSS pages. The table is built by the RSS loader and referenced by the 
RSS unloader. 



CHAEXT Storage map 



DEC 





HEX 
Of 
I. 
81 



EXTXPTCA 



EXTXPTSA 



EXTXPTD 



EXTXPTD (CONT) 



| EXTXPTK1 I EXTXPTK2 | 
J I L 



EXTXPTKV 



Fields in CHAEXT — by displacement 



DEC 

0000 

0002 



HEX 
0000 



FIELD 



EXTXPTCA 
0002 EXTXPTSA 



DEC HEX FIELD 
0004 0004 EXTXPTD 
0012 000C EXTXPTK1 



DEC HEX FIELD 

0013 000D EXTXPTK2 

0014 000E EXTXPTKV 



Alphabetical list of fields in CHAEXT 



FIELD 



DEC HEX 



FIELD 



DEC HEX 



EXTXPTCA 0000 0000 
EXTXPTD 00 04 0004 



EXTXPTKV 0014 000E 
EXTXPTK1 0012 000C 



FIELD 



DEC HEX 



EXTXPTK2 0013 000D 
EXTXPTSA 0002 0002 



Assembler listing of CHAEXT 



LOCATION INSTRUCTION SOURCE 



INST QPER 



COMMENT 



38 0000 CHAEXT DSECT 
*********************************************************************** 

* TITLE: 'CHAEXT' - TSS EXTERNAL PAGE TABLE 
* STATUS: CHANGE LEVEL 000 * 

* FUNCTION: THIS TABLE IS PRIMARIIY USED TO 

* DEFINE AND CORRELATE 
REAL CORE ADDRESSES AND CORRESPONDING EXTERNAL * 
LOCATIONS OF TSS SUPERVISOR CORE PAGES THAT WERE * 
ROLLED OUT BY RSS. IT ALSO CONTAINS ANY ADDITIONAL * 
INFORMATION NECESSARY FOR DEFINING THE ROLLED OUT * 
TSS PAGES. * 

THE TABLE IS BUILT BY RSS LOADER AND SUBSEQUENTLY * 



* 
* 
* 
* 
* 
* 
* 
********* 

38 00000 
38 00000 



38 00002 
38 00004 



38 0000C 
38 O000D 

38 O0O0E 



REFERENCED BY RSS UNLOADER. * 

************************************************************** 

ALIGN ON WORD BOUNDRY 
TSS REAL CORE ADDRESS (PT 
ENTRY) 

-3 SEGMENT NUMBER 
-7 PAGE NUMBER 
-3 PAGE NUMBER 
BYTE 1 - BITS 4-7 NOT USED 
SYMBOLIC DEVICE ADDRESS 
PHYSICAL DEVICE LOCATION 
-BBCCHHR 
BYTE B 
BYTE 1 B 
BYTE 2 C 
BYTE 3 C 
BYTE 4 H 
BYTE 5 H 
BYTE 6 R 
BYTE 7 UNUSED 
FIRST PROTEXT KEY SAVE AREA 
SECOND PROTECT KEY SAVE 
AREA 

DROP AREA FOR RSS PROTECT 
KEYS 





DS 


OF 




EXTXPTCA 


DS 


CL2 




* 


BYTE 


- BITS 


0- 


* 


BYTE 


- BITS 


4 


* 


BYTE 


1 - BITS 


0" 


* 








EXTXPTSA 


DS 


CL2 




EXTXPTD 


DS 


CL8 




* 








* 








* 








* 








* 








* 








* 








* 








* 








EXTXPTK1 


DS 


CL1 




EXTXPTK2 


DS 


CL1 




* 








EXTXPTKV 


DS 


CL2 




* 
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Macro Instruction Parameter Lists (CHAFNQ, CHARDQ, CHAWRQ, CHACLQ € CHAFRQ) 

The macro instruction parameter lists contain information which is passed from a 
macro processor to an application program. 

CHAFNQ, 16 bytes in length f passes FINDQ information. 
CHARDQ, 8 bytes in length, passes READQ information. 
CHAWRQ, 16 bytes in length, passes WRITEQ information. 
CHACLQ, 4 bytes in length, passes CLEARQ information. 
CHAFRQ, 8 bytes in length, passes FREEQ information. 

CHAFNQ Storage map 



DEC 




HEX 
01" 
I. 
81 

L 



FNQCTL 



FNQPDV 



FNQMSL 



FNQMSA 



| FNQFLG | FNQDVT | 



FNQUNS 



FNQSDA 



Fields in CHAFNQ — py displacement 



DEC HEX FIELD 
0000 0000 FNQCTL 
0002 0002 FNQMSL 
0004 0004 FNQMSA 
0008 0008 FNQPDV 



DEC 

0010 

0010 

0010 

0010 



HEX FIELD 
000A FNQDWN 
000A FNQATT 
000 A FNQWRP 
000A FNQFLG 



DEC HEX FIELD 
(EQU) 0011 000B FNQDVT 
CEQU) 0012 000C FNQUNS 
(EQU) 0014 000E FNQSDA 



Alphabetical list of fields in CHAFNQ 



FIELD 

FNQATT 
FNQCTL 
FNQDVT 



DEC HEX 



FIELD 



0010 000A CEQU) FNQFLG 



0000 0000 
0011 000B 



FNQMSA 
FNQMSL 



DEC HEX 
0010 0O0A 
0004 0004 
0002 0002 



FNQDWN 0010 000A (EQU) FNQPDV 0008 0008 



FIELD DEC HEX 

FNQSDA 0014 000E 

FNQUNS 0012 000C 

FNQWRP 0010 000A (EQU) 



Assembler listing of CHAFNQ 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 


COMMENT 






39 


00000 


CHAFNQ 


DSECT 






39 


00000 






FNQCTL 

* 


DS 


H 


MACRO CONTROL: FFFF=SCAN 
OPTN, OR DEV NBR 


39 


00002 






FNQMSL 


DS 


H 


MESSAGE LENGTH 


39 


00004 






FNQMSA 


DS 


F 


MESSAGE AREA 


39 


00008 






FNQPDV 


DS 


H 


POLLED DEVICE 


39 


0000A 






FNQFLG 


DS 


XL1 


FLAG BYTE 






39 


0000A 


FNQWRP 


EQU 


FNQFLG 


POLLING MODE WRAP-AROUND 






00000080 


FNQWRPM 


EQU 


X^O' 


POLLING MODE WRAP-AROUND 










♦ 






MASK 






39 


0000A 


FNQATT 


EQU 


FNQFLG 


ATTENTION RECEIVED 






00000040 


FNQATTM 


EQU 


X^O' 


ATTENTION RECEIVED MASK 






39 


0000A 


FNQDWN 


EQU 


FNQFLG 


DEAD LINE FLAG 
15441 






00000020 


FNQDWNM 


EQU 


X^O 1 


DEAD LINE MASK 










* 






15441 


39 


OO00B 






FNQDVT 


DS 


XL1 


DEVICE TYPE 


39 


OOOOC 






FNQUNS 


DS 


H 


UNASSIGNED 


39 


0000E 






FNQSDA 


DS 


H 


SYMBOLIC DEVICE ADDRESS 
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CHARDQ Storage map 



DEC 




HEX 
01 



UNNAMED I RDQDEV (UNNAMED | RDQTRN | RDQINT |RDQCSL 
I 1 I I 1 



Fields in CHARDQ — by displacement 



DEC HEX FIELD 
0002 0002 RDQDEV 



DEC HEX FIELD 
0005 0005 RDQTRN 



DEC HEX FIELD 

0006 0006 RDQINT 

0007 0007 RDQCSL 



Alphabetical list of fields in CHARDQ 



FIELD 
RDQCSL 



DEC HEX 
0007 0007 



FIELD 
RDQDEV 



DEC HEX 
0002 0002 



FIELD DEC HEX 
RDQINT 0006 0006 
RDQTRN 0005 0005 



Assembler listing of CHARDQ 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 




6C 


00000 


CHARDQ 


DSECT 




6C 00000 








DS 


H 


6C 00002 






RDQDEV 


DS 


H 


6C 00004 








DS 


XL1 


6C 00005 






RDQTRN 


DS 


XL1 


6C 00006 






RDQINT 


DS 


XL1 


6C 00007 






RDQCSL 

* 


DS 


XL1 



COMMENT 

UNUSED 

DEVICE NUMBER 

UNUSED 

TRANSLATE? 

C'N^NO 

INTERRUPT? 

C'N'=NO 

COMPONENT SELECT: X^O', OR 

X'OS' - X'07 f 



C'Y^YES, 
C'Y^YES, 



CHAWRQ Storage map 



DEC 





HEX 



0|WRQCIN (WRQCOUT | 
i. 



8 | WRQBRK 
i 



|WRQINT 



WRQDEV 



WRQMSGA 



I 



WRQMSGL 



| UNNAMED (WRQRSP | WRQTROUT | WRQTRIN | 



Fields in CHAWRQ — by displacement 



DEC HEX FIELD 

0000 0000 WRQCIN 

0001 0001 WRQCOUT 

0002 0002 WRQDEV 
0004 0004 WRQMSGA 



DEC HEX FIELD 

0008 0008 WRQBRK 

0009 0009 WRQINT 

0010 OO0A WRQMSGL 
0013 000D WRQRSP 



DEC HEX FIELD 

001 4 OO0E WRQTROUT 

0015 000F WRQTRIN 



Alphabetical list of fields in CHAWRQ 



FIELD 

WRQBRK 

WRQCIN 

WRQCOUT 

WRQDEV 



DEC HEX 
0008 0008 

0000 0000 

0001 0001 

0002 0002 



FIELD 

WRQINT 

WRQMSGA 

WRQMSGL 

WRQRSP 



DEC HEX 

0009 0009 
0004 0004 

0010 000A 
0013 000D 



FIELD DEC HEX 
WRQTRIN 0015 O00F 
WRQTROUT 0014 000E 
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Assembler listing of CBAWRQ 
LOCATION 
B8 00000 
B8 00001 





B8 


00002 




B8 


00004 




B8 


00008 




B8 


00009 




B8 


0000A 




B8 


OOOOC 




B8 


0000D 




B8 


0000E 




B8 


0000F 


CHACLQ 


Storaqe 


map 


DEC 


HEX 







01 


UNNAMED 



INSTRUCTION SOURCE 

B8 00000 CHAWRQ 

WRQCIN 

♦ 


INST 

DSECT 

DS 


OPER 
XL1 


WRQCOUT 


DS 


XL1 


WRQDEV 

WRQMSGA 

WRQBRK 


DS 
DS 
DS 


H 
F 
XL1 


WRQINT 

* 


DS 


XL1 


WRQMSGL 
WRQRSP 


DS 
DS 
DS 


H 

XL1 

XL1 


WRQTROUT 


DS 


XL1 


WRQTRIN 

* 


DS 


XL1 



CLQDEV 



Fields in CHACLQ — by displacement 

DEC HEX FIELD 
0002 0002 CLQDEV 



COMMENT 

COMPONENT IN X'OO', OR 

X f 05 f X'OT 

COMPONENT OUT X , 09', OR 

X f 01' X'04' 

DEVICE NUMBER 

VM ADDR OF MESSAGE 

BREAK OPTION C*Y f = YES, 

C'N 1 = NO 

INTRPT OPTION C f Y f = YES, 

C'N' = NO 

MESSAGE LENGTH 

UNUSED 

RESP OPTION C'Y' = YES, 

C f N' = NO 

TRNSL OUT C'Y' = YES, 

C'N' = NO 

TRNSL IN C'Y' = YES, 

C'N" = NO 



DEC HEX FIELD 



DEC HEX FIELD 



Alphabetical list of fields in CHACLQ 

FIELD DEC HEX FIELD 



CLQDEV 



DEC HEX 
0002 0002 



DEC HEX 



FIELD 



DEC HEX 



Assembler listing of CHACLQ 



LOCATION INSTRUCTION SOURCE 
1A 00000 CHACLQ 
1A 00000 
1A 0000 2 CLQDEV 

* 22-2 3 UNUSED 

* 24-25 UNUSED 

* 26-27 UNUSED 

* 28-29 UNUSED 

* 30-31 UNUSED 



CHAFRQ Storage map 



DEC 




HEX 



INST OPER 



DSECT 


DS 


H 


DS 


H 




12 




14 




16 




18 




1A 



0|FRQDIS | UNNAMED | 



FRQDEV 



COMMENT 

UNUSED 
DEVICE NUMBER 



FRQMSG 



CHAFRQ 207 



Fields in CHAFRw — by displacement 

DEC HEX FIELD 
0000 0000 FRQDIS 



DEC HEX FIELD 
0002 0002 FRQDEV 



DEC HEX FIELD 
0004 0004 FRQMSG 



p 



Alphabetical list of fields in CHAFRQ 



FIELD 
FRQDEV 



DEC HEX 
0002 0002 



FIELD 
FRQDIS 



DEC HEX 
0000 0000 



FIELD 
FRQMSG 



DEC HEX 
0004 0004 



Assembler listing of CHAFRQ 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 


COMMENT 




3A 00000 


CHAFRQ 


DSECT 






3A 00000 






DS 


OH 




3A 00000 




FRQDIS 


DS 


XL1 


DISCONNECT BY* 




000000FF 


FRQDISM 


EQU 


X . FF . 




3A 00001 






DS 


XL1 


UNUSED 


3A 00002 




FRQDEV 


DS 


H 


DEVICE NUMBER 


3A 00004 




FRQMSG 


DS 


F 


MSG POINTER 
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General Queue Entry Table (CHAGQE) 

The General Queue Entry Table (GQE) f a universal bookkeeping area internal to the 
supervisor, contains information needed by various queue processors and task inter- 
rupt routines . 

Any field in the GQE, used by a routine, roust be initialized by that routine, or 
by the routine passing information to that field. 

There are four types of GQE: program interrupt GQE; SVC interrupt GQE; external 
interrupt GQE; and I/O interrupt GQE. 
Tne GQE occupies 6** bytes of core storage, aligned on word boundaries. 



CHAGQE Storage map 



DEC 


HEX 



























01 
1 




GQEFWD 






1 

1 




GQETSI 






8 


8| 
1 




GQESVC 






1 
1 


GQESLN 


(GQEUNPR (GQEUNPO | 
II 1 


16 


10|GQEERR 

1 ! 


GQEF0 


|GQEF5 
I 


(GQEF4 
1 


I 
1 




GQEPCB 






24 


18|GQECNT 

i 


GQEF1 
1 


| GQEF2 
1 


|GQEF3 
1 


1 

1 




GQEQPS 






32 


20[ 
1 




GQEQPS 


CCONT) 




1 

i 




GQESPT 






40 


28 1 

I 




GQEIGQ 






i 
1 




GQETBID 






48 


30 J 
I 










GQECSW 












56 


38| 
i 


GQEDEV 


| GQEINT 
1 


1 

1 




GQEREV 






ORG 


GQEIGQ 
























40 


28 | 

i 










GQESNS 










1 

( 


ORG 


GQESNS 
























40 


28 1 

I 








UNNAMED 








IGQEDI 
i 


1 i 

I 


ORG 


GQECSW 
























48 


30[ 

i 




UNNAMED 






1 


GQEST 


1 


UNNAMED (GQEIA | 
1 i 


Fields 


in CHAGQE 


— by displacement 




















DEC 


HEX 


FIELD 




DEC 


HEX 


FIELD 




DEC 


HEX 


FIELD 






0000 


0000 


GQEFWD 




0017 


0011 


GQECE 


(EQU) 


0025 


0019 


GQEVR 


(EQU) 




0004 


0004 


GQETSI 




0017 


0011 


GQEF0 




0025 


0019 


GQESS 


(EQU) 




0008 


0008 


GQEMCB 


CEQU) 


0018 


0012 


GQEF5 




0025 


0019 


GQEWS 


(EQU) 




0008 


0008 


GQEIOR 


(EQU) 


0019 


0013 


GQEPP 


(EQU) 


0025 


0019 


GQEVS 


(EQU) 




0008 


0008 


GQESVC 




0019 


0013 


GQEPAR 


(EQU) 


0025 


0019 


GQEPO 


(EQU) 




0012 


000C 


GQESLN 




0019 


0013 


GQ ERI 


(EQU) 


0025 


0019 


GQEPI 


(EQU) 




0012 


000C 


GQE SAT 




0019 


0013 


GQELGDI 


1 (EQU) 


0025 


0019 


GQEF1 






0014 


000E 


GQEUNPR 




0019 


0013 


GQEWSP 


(EQU) 


0026 


001A 


GQEFT 


(EQU) 




0015 


000F 


GQEUNPO 




0019 


0013 


GQESMG 


(EQU) 


0026 


00 1A 


GQ ECN 


(EQU) 




0016 


0010 


GQEPIP 


(EQU) 


0019 


0013 


GQEPB 


(EQU) 


0026 


001A 


GQEPTP 


(EQU) 




0016 


0010 


GQEERR 




0019 


0013 


GQEDR 


(EQU) 


0026 


001A 


GQEPA 


(EQU) 




0017 


0011 


GQERPST 


(EQU) 


0019 


0013 


GQEF4 




0026 


001A 


GQEF2 






0017 


0011 


GQESK 


(EQU) 


0020 


0014 


GQELOG 


(EQU) 


0027 


001B 


GQEDE 


(EQU) 




0017 


0011 


GQEIG 


(EQU) 


0020 


0014 


GQEPCB 




0027 


001B 


GQEHI 


(EQU) 




0017 


0011 


GQEPR 


(EQU) 


0024 


0018 


GQETIC 


(EQU) 


0027 


001B 


GQEPE 


(EQU) 




0017 


0011 


GQEIP 


(EQU) 


0024 


0018 


GQECNT 




0027 


00 IB 


GQEXP 


(EQU) 




0017 


0011 


GQEP2 


(EQU) 


0025 


0019 


GQERC 


(EQU) 


0027 


001B 


GQEOT 


(EQU) 




0017 


0011 


GQESN 


(EQU) 


0025 


0019 


GQEIL 


(EQU) 


0027 


001B 


GQEQE 


(EQU) 




(Continued on page 


210) 
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(Continued from page 209) 





DEC HEX 


FIELD 




DEC 


HEX 


FIELD 




DEC HEX 


FIELD 






0027 00 IB GQESP 


(EQU) 


0036 


0024 


\ GQE3PT 




0052 0034 


I GQEST 






0027 001B GQEF3 




0040 


002E 


1 GQESNS 




0055 003*3 


' GQEIA 






0028 001C GQEHP 


(EQU) 


0040 


002£ 


I GQEIGQ 




0056 0038 


i GQEDEV 






0028 001C GQEQPS 




0044 


002C GQETBID 




0058 003A GQEINT 






0028 001C GQELQ 




0047 


002F GQEDT 




0059 003B GQEEXT 


(EQU) 




0036 002*4 GQEQGQ 


(EQU) 


0048 


003C 


) GQECSW 




0060 003C GQEREV 




Alphabetical list of 


fields in 


CHAGQE 




















FIELD 


DEC 


HEX 




FIELD 


DEC 


HEX 




FIELD 


DEC 


HEX 






GQECE 


0017 


0011 


(EQU) 


GQEINT 


0058 


003A 




GQEREV 


0060 


003C 






GQECN 


0026 


001A 


(EQU) 


GQEIOR 


0008 


0008 


(EQU) 


GQERI 


0019 


0013 


(EQU) 




GQECNT 


0024 


0018 




GQEIP 


0017 


0011 


(EQU) 


GQERPST 


0017 


0011 


(EQU) 




GQECSW 


0048 


0030 




GQELGDT 


0019 


0013 


(EQU) 


GQESAT 


0012 


OOOC 






GQEDE 


0027 


001B 


(EQU) 


GQELOG 


0020 


0014 


(EQU) 


GQESK 


0017 


0011 


(EQU) 




GQEDEV 


0056 


0038 




GQELQ 


0028 


001C 




GQESLN 


0012 


OOOC 






GQEDR 


0019 


0013 


(EQU) 


GQEMCB 


0008 


0008 


(EQU) 


GQESMG 


0019 


0013 


(EQU) 




GQEDT 


0047 


002F 




GQEOT 


0027 


00 IB 


(EQU) 


GQESN 


0017 


0011 


(EQU) 




GQEERR 


0016 


0010 




GQEPA 


0026 


001A 


(EQU) 


GQESNS 


0040 


0028 






GQEEXT 


0059 


003B 


(EQU) 


GQEPAR 


0019 


0013 


(EQU) 


GQESP 


0027 


001B 


(EQU) 




GQEFT 


0026 


001A 


(EQU) 


GQEPB 


0019 


0013 


(EQU) 


GQESPT 


0036 


0024 






GQEFWD 


0000 


0000 




GQEPCB 


0020 


0014 




GQESS 


0025 


0019 


(EQU) 




GQEFO 


0017 


0011 




GQEPE 


0027 


001B 


(EQU) 


GQEST 


0052 


0034 






GQEF1 


0025 


0019 




GQEPI 


0025 


0019 


(EQU) 


GQESVC 


0008 


0008 






GQEF2 


0026 


001A 




GQEPIP 


0016 


0010 


(EQU) 


GQETBID 


0044 


002C 






GQEF3 


0027 


001B 




GQEPO 


0025 


0019 


(EQU) 


GQETIC 


0024 


0018 


(EQU) 




GQEF4 


0019 


0013 




GQ EPP 


0019 


0013 


(EQU) 


GQETSI 


0004 


0004 






GQEF5 


0018 


0012 




GQEPR 


0017 


0011 


(EQU) 


GQ EUNPO 


0015 


0O0F 






GQEHI 


0027 


001B 


(EQU) 


GQEPTP 


0026 


001A 


(EQU) 


GQEUNPR 


0014 


000E 






GQEHP 


0028 


001C 


(EQU) 


GQEP2 


0017 


0011 


(EQU) 


GQEVR 


0025 


0019 


(EQU) 




GQEIA 


0055 


0037 




GQEQE 


0027 


001B 


(EQU) 


GQEVS 


0025 


0019 


(EQU) 




GQEIG 


0017 


0011 


(EQU) 


GQEQGQ 


0036 


0024 


(EQU) 


GQEWS 


0025 


0019 


(EQU) 




GQEIGQ 


0040 


0028 




GQEQPS 


0028 


001C 




GQEWSP 


0019 


0013 


(EQU) 




GQEIL 


0025 


0019 


(EQU) 


GQERC 


0025 


0019 


(EQU) 


GQEXP 


0027 


001B 


(EQU) 


Assembler 


listinq of 


CHAGQE 
























LOCATION 


INSTRUCTION SOURCE 


INST OPER 


COMMENT 












3B 00000 


CHAGQE 


DSECT 




r 


GENERAL QUEUE ENTRY 




3B 00000 










DS 


OF 
















3B 00000 






GQEFWD 


DS 


F 




FORWARD LINK 










3B 00004 






GQETSI 


DS 


F 




TSI 


POINTER 










3B 00008 






GQESVC 


DS 


F 




SVC 


OR IORCB 


OR MCB POINTER 






3B 00008 


GQEIOR 


EQU 


GQESVC 
















3B 00008 


GQEMCB 


EQU 


GQESVC 














3B OOOOC 






GQESAT 


DS 


OF 
















3B OOOOC 






GQESLN 


DS 


H 




9 BIT SLOT MASK 








3B OO00L 






GQEUNPR 


DS 


XL1 


NUMBER OF UNPROCESSED PCBES 




3B 0OO0F 






GQ EUNPO 


DS 


XL1 


NUMBER OF UNPOSTED PCBES 




3B 00010 






GQEERR 


DS 


XL1 


I/O 


ERROR COUNT 










3B 00010 


GQEPIP 


EQU 


GQEERR 


PROGRAM INTERRUPT 


PRIORITY 










* 










CODE 










3B 00011 






GQEFO 


DS 


XL1 
















3B 00011 


GQECE 


EQU 


GQEFO 


CONTROL UNIT 


END FLAG 








00000080 


GQECEM 


EQU 


X'i 


BO' 


CONTROL UNIT 


END I 


MASK 








3B 00011 


GQESN 


EQU 


GQEFO 


SENSE DATA PRESENT FLAG 






00000040 


GQESNM 


EQU 


X f ^ 


i*0« 


SENSE DATA PRESENT MASK 






3B 00011 


GQEP2 


EQU 


GQEFO 


SECOND TSEND 


PAGE 


SCAN 












* 










REQUIRED FLAG 










00000020 


GQEP2M 


EQU 


x f ; 


20' 


SECOND TSEND 


PAGE 


SCAN 












♦ 










REQUIRED MASK 










3B 00011 


GQEIP 


EQU 


GQEFO 


PAGING INTERRUPT J 


FLAG 








00000010 


GQEIPM 


EQU 


xv 


LO* 


PAGING INTERRUPT 1 


MASK 








3B 00011 


GQEPR 


EQU 


GQEFO 


I/O 


PURGED FLAG 










00000008 


GQEPRM 


EQU 


X f < 


08' 


I/O 


PURGED MASK 










3B 00011 


GQEIG 


EQU 


GQEFO 


IGNORE DEVICE END 


FLAG 








00000004 


GQEIGM 


EQU 


X'< 


D4 § 


IGNORE DEVICE END 


MASK 








3B 00011 


GQESK 


EQU 


GQEFO 


SKIP I/O REQUEST ] 


FLAG 






(Listing 


Of CHAGQE 


continued < 


on page 211) 
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(Listing of CHAGQE continued from page 210) 



LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 


COMMENT 






00000002 


GQESKM 


EQU 


X , 02* 


SKIP I/O REQUEST MASK 






3B 00011 


GQERPST 


EQU 


GQEF0 


PCB REPOSTING FLAG 1 = 
REPOST 






00000001 


GQERPSTM 


EQU 


X"01 - 




3B 


00012 




GQEF5 


DS 


XL1 


RESERVED FOR SIPE 


3B 


00013 




GQEF4 


DS 


XL1 








3B 00013 


GQEDR 

* 


EQU 


GQEF4 


DRAM IORCB POSTING REQUEST 
FLAG 






00000080 


GQEDRM 


EQU 


X^O' 








3B 00013 


GQEPB 


EQU 


GQEF4 


CEAAS WAITING ON BUSY PATH 
FLAG 






00000040 


GQEPBM 


EQU 


X f 40 f 








3B 00013 


GQESMG 


EQU 


GQEF4 


SHARED PAGE MIGRATION FLAG 






00000020 


GQESMGM 


EQU 


X f 20 - 


SHARED PAGE MIGRATION MASK 






3B 00013 


GQEWSP 


EQU 


GQEF4 


SHARED PAGE POSTING FLAG 






00000010 


GQEWSPM 


EQU 


X'lO* 


SHARED PAGE POSTING MASK 






3B 00013 


GQELGDT 

* 


EQU 


GQEF4 


PTR TO GQELOG OR GQEIGQ IS 
PRESENT 






00000008 


GQELGDTM 


EQU 


X f 08 f 








3B 00013 


GQERI 


EQU 


GQEF4 


REACTIVATE INTERRUPT FLAG 






00000004 


GQERIM 


EQU 


X , 04 f 


REACTIVATE INTERRUPT MASK 






3B 00013 


GQEPAR 


EQU 


GQEF4 


PARTIALLY PROCESSED FLAG 






00000002 


GQEPARM 


EQU 


X'02 i 


PARTIALLY PROCESSED MASK 






3B 00013 


GQEPP 


EQU 


GQEF4 


TWAIT PAGEOUT IN PROGRESS 
FLAG 






00000001 


GQEPPM 


EQU 


X'Ol" 


TWAIT PAGEOUT IN PROGRESS 
MASK 


3B 


00014 






DS 


OF 




3B 


00014 




GQEPCB 


DS 


F 


PCB POINTER 






3B 00014 


GQELOG 


EQU 


GQEPCB 


CHANNEL LOGOUT DATA 


3B 


00018 




GQECNT 


DS 


XL1 


PCB COUNT 






3B 00018 


GQETIC 


EQU 


GQECNT 


TYPE OF INTERRUPT 


3B 


00019 




GQEF1 


DS 


XL1 








3B 00019 


GQEPI 

* 


EQU 


GQEF1 


PAGING IN FLAG 
l=ON 






00000080 


GQEPIM 


EQU 


X^O' 








3B 00019 


GQEPO 

* 


EQU 


GQEF1 


PAGING OUT FLAG 
l=ON 






00000040 


GQEPOM 


EQU 


X'40 - 








3B 00019 


GQEVS 


EQU 


GQEF1 


VAM OR SYSTEM PAGING FLAG 
1=VAM 






00000020 


GQEVSM 


EQU 


X'20 f 








3B 00019 


GQEWS 


EQU 


GQEF1 


WAITING ON SENSE FLAG 
l=ON 






00000010 


GQEWSM 


EQU 


X'10' 








3B 00019 


GQESS 

* 


EQU 


GQEF1 


SEEK ARG. TABLE SETUP FLAG 
l=ON 






00000008 


GQESSM 


EQU 


x^s' 








3B 00019 


GQEVR 

* 


EQU 


GQEF1 


VAM READ-AFTER-WRITE CHECK 
FLAG 






00000004 


GQEVRM 


EQU 


X'04 f 








3B 00019 


GQEIL 


EQU 


GQEF1 


INSTRUCTION LENGTH CODE 






00000002 


GQEILM 

* 


EQU 


X , 02 t 


0= DIRECT SVC;1= EXECUTE 
SVC 






3B 00019 


GQERC 


EQU 


GQEF1 


IORCB ASSOCIATED WITH GQE 
1=YES 






00000001 


GQERCM 


EQU 


X'01 - 




3B 


0001A 




GQEF2 


DS 


XL1 








3B 0001A 


GQEPA 

* 


EQU 


GQEF2 


PATH 

♦ 






00000040 


GQEPAM 


EQU 


X'HO 1 








3B 0001A 


GQEPTP 


EQU 


GQEF2 


PTP PAGING REQUESTED FLAG 
N4T0 






00000008 


GQEPTPM 


EQU 


X f 08 f 


PTP PAGING REQUESTED MASK 
N470 






3B 0001A 


GQECN 


EQU 


GQEF2 


CPU NUMBER 


(Listing 


Of CHAGQE 


continued 


on page 212) 
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(Listing of CHAGQE continued from page 211) 



LOCATION INSTRUCTION SOURCE 



INST OPER 



3B 0001B 



00000006 
3B 00 01A 

00000001 

3B 0001B 

00000080 
3B 0001B 

00000040 
3B 0001B 
00000010 
OO0000EF 
3B 0001B 
00000008 
3B 0001B 
00000004 
3B 0001B 
00000002 
3B 0001B 
00000001 



3B 0001C 
3B 0001C 



3B 0001C 



00000080 



EQU 
EQU 

EQU 

DS 

EQU 

EQU 
EQU 

E^U 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

DS 

DS 

EQU 

EQU 



X 9 Q6 9 
GQEF2 

X^l' 

XL1 

GQEF3 

X^O^ 
GQEF3 

X'40 1 
GQEF3 
X'lO' 



COMMENT 

CPU NUMBER MASK 
FORCED TIME SLICE END FLAG 
l=ON 



SHARED PAGE TABLE 
l=ON 

QUEUE ERROR FLAG 
l=ON 

TWAIT FLAG 
TWAIT MASK 



FLAG 



255-GQEOTM TWAIT MASK COMPLEMENT 



GQECNM 
GQEFT 

GQEFTM 

GQEF3 

GQESP 

* 

GQESPM 
GQEQE 

* 

GQEQEM 

GQEOT 

GQEOTM 

GQEOTC 

GQEXP 

GQEXPM 

GQEPE 

GQEPEM 

GQEHI 

GQEHIM 

GQEDE 

GQEDEM 

GQELQ 

GQEQPS 

GQEHP 

GQEHPM 

* 

** EACH OF THE 4 ENTRIES 

♦GQEHPM MASK 

* GQEQPS AND GQESPT ARE ALSO USED AS REGISTER SAVE 

* AREAS BY THE 



GQEF3 

x'os- 

GQEF3 

X'04 f 

GQEF3 

X , 02 l 

GQEF3 

X'Ol 1 

OH 

4H 

GQEQPS 

X'80 f 



ASAQP PROCESS FLAG l=ON 

PATH ERROR FLAG 

HALT I/O ISSUED FLAG 

AWAITING DEVICE END FLAG 

LOC ON QUEUE 

QUEUE PROCESSOR STRINGS 

HIGH PRIORITY PAGING 

OPERATION FLAG 

HIGH PRIORITY PAGING 

OPERATION MASK 

IN GQEQPS WILL USE THIS 



•QUEUE GQE ON TSI ' SUBROUTINE. 



3B 00024 








DS 


OF 


3B 00024 






GQESPT 

* 


DS 


F 




3B 


00024 


GQEQGQ 

* 


EQU 


GQESPT 


3B 00028 








DS 


OD 


3B 00028 






GQEIGQ 


DS 


F 


3B 0002C 






GQETBID 

# 


DS 


F 




3B 


00028 




|ORG| 


GQEIGQ 


3B 00028 






GQESNS 


DS 


D 




3B 


00028 




|ORG| 


GQESNS 


3B 00028 








DS 


XL7 


3B 0002F 






GQEDT 


DS 


XL1 


3B 00030 






GQECSW 


DS 


D 




3B 


00030 




|ORG| 


GQECSW 


3B 00030 








DS 


XL4 


3B 00034 






GQEST 


DS 


XL2 


3B 00036 








DS 


XL1 


3B 00037 






GQEIA 


DS 


XL1 


3B 00038 






GQEDEV 


DS 


H 


3B 0003A 






GQEINT 


DS 


H 




3B 


0003B 


GQEEXT 

* 


EQU 


GQEINT +1 


3B 0003C 






* 


DS 


OF 


3B 0003C 






GQEREV 


DS 


F 



SHARED 



PAGE TABLE 



POINTER 



BYTE USED BY QUEUE GQE ON 
TSI. 

PTR. TO I/O INTERRUPT GQE 
PTR. TO BLOCK FOR CONTIG 
CORE ALLOC. 

SENSE DATA 

SENSE DATA 

CHANNEL STATUS WORD 

RESERVED FOR CSW 
CHANNEL STATUS 
RESERVED FOR CSW 

SYMBOLIC DEVICE 

INTERRUPT CODE 

EXTERNAL INTERRUPT CODE 

FIELD 

0=VSEND, 1=XSEND 

REVERSE LINK 
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General Services Macro Table (CHAGSM) 



The General Services Macro Table (GSM) provides a format for parameter input to 
tne Common OPEN and Common CLOSE routines in data management. This GSM input list is 
built by the OPEN or CLOSE macro instruction expansion at assembly time. 

The GSM, a variable length table, occupies from 8 bytes (minimum) to 800 bytes 
(maximum) in virtual storage, aligned on doubieword boundaries. 
The fields in the GSM are: 

GSMADD: Pointer to DCB. 

GSMCOD: Option byte — contains the OPEN or CLOSE options and control informa- 
tion for the Common OPEN or Common CLOSE routines. The following bits 
are equated to GSMCOD: 
GSMCO (COM EQU X' 80 f ) : Last DCB to be processed bit. 
GSMC1 (C1M EQU X , aO i ): Type T close bit. 
GSMC2 (C2M EQU X f 30 - ): Codemask for reread and leave. 
GSMC3 (C3C EQU X'OF'): Codemask for options. 
The coding for Common OPEN is: 

Meaning 
Another DCB to be opened 
Last DCB to be opened 
Not Used 
Reread 
Leave 
Input 
Output 
Inout 
Outin 
Readback 
Update 



Bit 





1 

2-3 

2-3 

4-7 



Binary Contents 

1 



01 

11 

0000 

1111 

0011 

0111 

0001 

0100 
The coding for Common CLOSE is: 
Bit Binary Contents 



1 

1 
1 1 
2-3 01 
2-3 11 
47 
GSMRSV: Not Used 

Note : The GSM contains one doubieword entry (100 entries maximum, 1 entry minimum) 
for each DCB which is to be opened or closed. 



Meaning 
Another DCB to be opened 
Last DCB to be opened 
Normal Close 
Type T Close 
Reread 
Leave 
Not Used 



CHAGSM Storage map 



DEC 




HEX 
01 



GSMADD 



| GSMCOD | 

J L 



GSMRSV 



Fields in CHAGSM — by displacement 



DEC HEX FIELD 
0000 0000 GSMADD 
0004 0004 GSMC3 
0004 0004 GSMC2 



DEC HEX FIELD 
0004 0004 GSMC1 
(EQU) 0004 0004 GSMCO 
(EQU) 0004 0004 GSMCOD 



DEC HEX FIELD 
(EQU) 0005 0005 GSMRSV 
(EQU) 
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Alphabetical list of fields in CHAGSM 



FIELD DEC HEX 
GSMADD 0000 0000 
GSMCOD 0004 0004 



GSMCO 



FIELD 
GSMC1 
GSMC2 
0004 0004 (EQU) GSMC3 



DEC HEX FIELD 

0004 0004 (EQU) GSMRSV 

0004 0004 (EQU) 

0004 0004 (EQU) 



DEC HEX 
0005 0005 



Assembler listing of CHAGSM 

LOCATION INSTRUCTION 
3C 00000 

3C 00000 

3C 00000 

3C 00004 

3C 00004 
00000080 

3C 00004 
00000040 
3C 00004 
00000030 

3C 00004 
0O0O000F 



3C 00005 



SOURCE 
CHAGSM 

GSMADD 

GSMCOD 

GSMCO 

GSMC0M 

* 

GSMC1 

GSMC1M 

GSMC2 

GSMC2C 

* 

GSMC3 

GSMC3C 

GSMRSV 



INST * OPER 
DSECT 



DS 
DS 
DS 

EQU 
EQU 

EQU 
EQU 
EQU 
EQU 

EQU 
EQU 
DS 



0D 

F 

X 

GSMCOD 

X^O' 

GSMCOD 

X'40' 

GSMCOD 

X'30' 

GSMCOD 

X'OF' 

CL3 



COMMENT 

GENERAL SERVICES MACRO 

TABLE 

DCB ADDRESS 
OPTIONS BYTE 

LAST DCB TO BE PROCESSED 
BIT 

TYPE T CLOSE BIT 

CODEMASK FOR REREAD AND 
LEAVE 

CODEMASK FOR OPTIONS 
NOT USED 
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Available Device Table (CHAHED. CHAAHD, and CHAAVE) 

The Available Device Table contains a count of each class of allocatable device 
within the system. 

The Available Device Table resides in shared virtual storage, aligned on double- 
word boundaries. 
Note ; The device type codes found in field AHDDTC are: 

Code Device Type 

0801 2540 card reader 

0802 2540 card reader 
0808 1403 printer 

0810 2671 perforated tape reader 

2001 2311 disk pack 

2002 2301 drum 

2003 2321 data cell 
2008 2314 disk 

8001 2400 tape drive 

CHAHED Storage map 



DEC 




HEX 



| HEDLCK 



HEDCNT 



HEDSPR 



Fields in CHAHED — by displacement 



DEC HEX FIELD 
0000 0000 HEDLCK 



DEC HEX FIELD 
0001 0001 HEDCNT 



DEC HEX FIELD 
0003 0003 HEDSPR 



Alphabetical list of fields in CHAHED 



FIELD 


DEC HEX 


FIELD 


DEC HEX 


FIELD 


DEC HEX 


HEDCNT 


0001 0001 


HEDLCK 


0000 0000 


HEDSPR 


0003 0003 



Assembler listing of CHAHED 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 




3D 


00000 


CHAHED 


DSECT 




3D 00000 








DS 


0D 


3D 00000 






HEDLCK 


DS 


XL1 


3D 00001 






HEDCNT 


DS 


XL2 


3D 00003 






HEDSPR 


DS 


CL5 




3E 


00000 


CHAAHD 

* 


DSECT 




3E 00000 






DS 


0D 


3E 00000 






AHDDTC 

* 


DS 


H 


3E 00002 






DS 


H 


3E 00004 






AHDADR 


DS 


F 


3E 00008 






AHDLCK 


DS 


XL1 


3E 00009 






AHDCNT 

* 

AHDSPR 


DS 


XL2 


3E 0000B 






DS 


CL5 


3E 00010 






AHDEND 


DS 


OX 




00000010 


AHDSZE 


EQU 


AHDE 




3F 


00000 


CHAAVE 


DSECT 




3F 00000 








DS 


0D 


3F 00000 






AVEDEV 


DS 


F 


3F 00004 






AVEPNT 

* 


DS 


F 



COMMENT 

DSECT FOR THE AVAILABLE 
DEVICE TABLE 
ALIGN TO DOUBLE WORD 
BOUNDARY 

LOCK BYTE X'OO" = UNLOCKED 
COUNT OF SUBQUEUE HEADERS 
SPARE BYTES 

DSECT FOR SUBQUEUE 
HEADERS 

ALIGN TO DOUBLE WORD 
DEVICE TYPE CODE (SAME AS 
SDADEV.CHASDA 2.4.38 
RESERVED 

POINTER TO FIRST SUBQUEUE 
ENTRY 

HEADER LOCK BYTE 
NO. OF ENTRIES IN THE 
SUBQUEUE 
SPARE BYTES 

END OF AVAILABLE DEVICE 
TABLE 15943 
DDTC AVAILABLE DEVICE TABLE 
SIZE 15943 
DSECT FOR SUBQUEUE ENTRY 
ALIGNMENT 

FULL DEVICE CODE - HEX 
POINTER TO SDAT ENTRY 
(2.4.38) 
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CHAAHD Storage map 



DEC 





HEX 
Of 



AHDDTC 



UNNAMED 



AHDADR 



8(AHDLCK 
I 



AHDCNT 



AHDSPR 



Fields in CHAAHD — by displacement 

DEC HEX FIELD 
0000 0000 AHDDTC 
000** 0004 AHDADR 

Alphabetical list of fields in CHAAHD 



DEC HEX FIELD 

0008 0008 AHDLCK 

0009 0009 AHDCNT 



DEC HEX FIELD 
0011 000B AHDSPR 
0016 0010 AHDEND 



FIELD 

AHDADR 

AHDCNT 



DEC HEX 
0004 0004 
0009 0009 



FIELD 

AHDDTC 

AHDEND 



DEC HEX 
0000 0000 
0016 0010 



FIELD DEC HEX 
AHDLCK 0008 0008 
AHDSPR 0011 000B 



CHAAVE Storage map 



DEC 




HEX 
01 



L 



AVEDEV 



Fields in CHAAVE — by displacement 

DEC HEX FIELD 
0000 0000 AVEDEV 



DEC HEX FIELD 
0004 0004 AVEPNT 



AVEPNT 



DEC HEX FIELD 



Alphabetical list of fields in CHAAVE 



FIELD 
AVEDEV 



DEC HEX 
0000 0000 



FIELD 
AVEPNT 



DEC HEX 
0004 0004 



FIELD 



DEC HEX 
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Interrupt Control Block (CHAICB) 

The Interrupt Control Block contains interruption information necessary for inter- 
ruption handling routines. The ICB is constructed by any of the following macro 
expansions: 

Specify Program Entry Condition (SPEC) 

Specify SVC Entry Condition (SSEC) 

Specify External Entry Condition CSEEC) 

Specify Asynchronous I/O Entry Condition (SAEC) 

Specify Timer Entry Condition (STEC) 

Specify Synchronous I/O Entry Condition (SIEC) 

Set Interval Timer (STIMER) 
The ICB may be used by the Task Monitor Queue Linkage Editor, Scanner-Dispatcher 
Specify Interrupt routine. Delete Interrupt routine, and the Interrupt Inquiry 
routine. 
The 44 byte ICB resides in virtual storage, aligned on doubleword boundaries. 

CHAICB Storage map 



DEC 


8 

16 

24 

32 

40 



HEX 



0| 

1 


ICBCOM 


1 

1 


ICBDCB 


8| 

1 




ICBOVY 




10| 

1 


ICBEPV 


1 

1 


ICBEPR 


18 | 

1 


ICBEP2 


| UNNAMED 

1 


| ICBINH | UNNAMED | ICBDET 
1 1 1 


20| 
1 


ICBRSA 


1 
1 


ICBPMS 



28 | 



ICBAMS 



ORG ICBOVY 



8 8| 

L 

ORG ICBOVY 



ICBPIM 



8 



8| 



UNNAMED 



ICBSVC 



ORG ICBOVY 



8 | UNNAMED | ICBXML | 
1 I L 



ICBXMN 



ICBXMP 



ORG ICBOVY 



UNNAMED 



ICBATM 



ORG ICBOVY 



8|ICBTMC |ICBTIM | 



ICBTNO 



ICBTIN 
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Fields in CHAICB — by displacement 



PEC HEX 


FIELP 


PEC 


HEX 


FIELP 


PEC HEX FIELP 


0000 0000 ICBCOM 


0010 


000A ICBXMN 


0029 00 IP ICBHPR (EQU! 


0004 0004 ICBPCB 


0010 


000A ICBSVC 


0029 001P ICBINH 


0008 0008 ICBTMC 


0012 


oooc 


: ICBTIN 


00 31 00 IF ICBPET 


0008 0008 ICBPIM 


0012 


oooc 


! ICBATM 


0032 0020 ICBRSA 


0008 0008 ICBOVY 


0012 


OOOC 


: ICBXMP 


00 36 00 24 ICBPMS 


0009 0009 ICBTIM 


0016 


001C 


I ICBEPV 


0040 0028 ICBAMS 


0009 0009 ICBXML 


0020 


0014 


ICBEPR 




0010 000A ICBTNO 


0024 


0018 


t ICBEP2 




Alphabetical list of 


fields in 


CHAICB 








FIELP 

ICBAMS 


PEC HEX 
0040 0028 


FIELP 
ICBHPR 


PEC HEX 
0029 001P 


FIELP PEC HEX 
(EQU) ICBTIN 0012 OOOC 


ICBATM 


0012 000C 


ICBINH 


0029 001P 


ICBTMC 0008 0008 


ICBCOM 


0000 0000 


ICBOVY 


0008 0008 


ICBTNO 0010 000A 


ICBPCB 


0004 0004 


ICBPIM 


0008 0008 


ICBXML 0009 0009 


ICBPET 


0031 001F 


ICBPMS 


0036 0024 


ICBXMN 0010 000A 


ICBEPR 


0020 0014 


ICBRSA 


0032 0020 


ICBXMP 0012 OOOC 


ICBEPV 


0016 0010 


ICBSVC 


0010 000A 




ICBEP2 


0024 0018 


ICBTIM 


0009 0009 




Assembler listinq of 


CHAICB 










LOCATION 


INSTRUCTION SOURCE 


INST 


' OPER 


COMMENT 






40 00000 


CHAICB 


PSECT 










* INTERRUPT CONTROL BLOCK ICB 


40 


00000 






PS 


OP 




40 


00000 




ICBCOM 


PS 


F 


PTR TO COMAREA 


40 


00004 




ICBPCB 


PS 


F 


PTR TO PCB - I/O INTERRUPTS 
ONLY 


40 


00008 




ICBOVY 

* 


PS 


2F 


OVERLAIP FIELPS FOR VARIOUS 
INT, TYPES 


40 


00010 




ICBEPV 


PS 


F 


ENTRY POINT 1 V CON 


40 


00014 




ICBEPR 


PS 


F 


ENTRY POINT 1 R CON 


40 


00018 




ICBEP2 


PS 


F 


ENTRY POINT 2 


40 


0001C 






PS 


CL1 


UNUSEP 


40 


0001P 




ICBINH 


PS 


X 


PRIV ANP HEAPER FLAG 
N456 






00000001 


ICBINHM 

* 


EQU 


X«01 f 


PRIV ANP HEAPER MASK 
N456 






40 0001D 


ICBHPR 

* 


EQU 


ICBINH 


PASS HEAPER FLAG 
N456 






00000080 


ICBHPRM 

* 


EQU 


X^O" 


PASS HEAPER MASK 
N456 


40 


0001E 






PS 


CL1 


UNUSEP 


40 


0001F 




ICBPET 


PS 


XL1 


PE TYPE COPE 






00000000 


ICBPEP 


EQU 


X'OO' 


PROGRAM 






00000001 


ICBPES 


EQU 


X'Ol 1 


SVC 






00000002 


ICBPEX 


EQU 


X'02 1 


EXTERNAL 






00000003 


ICBPEA 


EQU 


X f 03 f 


ASYNCHRONOUS 






00000004 


ICBPTT 


EQU 


X'04 1 


TIMER 






00000005 


ICBPEI 


EQU 


X'OS 1 


SYNCHRONOUS 


40 


00020 




ICBRSA 


PS 


F 


SAVE AREA FOR MOPE EQUALS R 


40 


00024 




ICBPMS 


PS 


F 


PROGRAM MASK SAVE AREA 


40 


00028 


40 00008 


ICBAMS 


PS 
jORG| 


F 
ICBOVY 


ATTENTION MASK SAVE AREA 








* AREAS 


USEP 


FOR PROGRAM INTERRUPTS 


40 


00008 


40 00008 


ICBPIM 


PS 
|ORG| 


F 
ICBOVY 


PROGRAM INTERRUPT MASK 








* AREAS 


USEP 


FOR SVC INTERRUPTS 


40 


00008 






PS 


CL2 


UNUSEP 


40 


O0OOA 


40 00008 


ICBSVC 


PS 
|ORG| 


CL2 
ICBOVY 


SVC INTEGER 








* AREAS 


USEP 


FOR EXTERNAL INTERRUPTS 


40 


00008 






PS 


CL1 


UNUSEP 


40 


00009 




ICBXML 


PS 


CL1 


MESSAGE LENGTH 


(Listing 


of CHAICB 


continued 


on page 219) 
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{Listing of CHAICB continued from page 218) 



LOCATION INSTRUCTION SOURCE 



INST OPER 



40 0OO0A 
40 0000C 



40 00008 



40 00008 
40 0000C 



00000001 
40 00008 



40 00008 
40 00009 
40 0000A 
40 0000C 



ICBXMN DS 
ICBXMP DS 

|ORG| 

* AREAS USED 

DS 
ICBATM DS 
ICBANM EOU 
1 QRG 1 

* AREAS USED 
ICBTMC DS 
ICBTIM DS 
ICBTNO DS 
ICBTIN DS 

* SYNCHRONOUS 



COMMENT 

MESSAGE NUMBER 
MESSAGE AREA PTR 



CL2 
F 

ICBOVY 
FOR ASYNCHRONOUS INTERRUPTS 



UNUSED 

ATTENTION TYPE MASK 

ATTENTION KEY MASK BIT 



F 
F 

X'Ol' 
ICBOVY 
FOR TIMER INTERRUPTS 
CL1 TIMER CODE 

CL1 TIMER TYPE - TASK OR REAL 
CL2 TIMER NUMBER 
F PTR TO TIMER INTERVAL 

REQUESTED 
I/O HAS NO SPECIAL FIELDS 
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Interrupt Device Entry (CHAIDE) 

The Interrupt Device Entry (IDE) handles queuing of interruption types for the 
various devices. The IDE is constructed by one of two methods. The Specify Inter- 
rupt Routine (SIR) constructs and queues the appropriate interruption chain in the 
Task Monitor Interrupt Table (CHBITB) ; or the IDE exists, predefined, in the ITB. 

Predefined IDEs exist for four of the six interruption types (program, SVC, 
external and timer) . The asynchronous and synchronous I/O interruption IDEs are 
built by SIR for each symbolic device allocation table (SDAT) defined device. When 
Interrupt Request Entries (IRE) are built for interruption handling routines, the 
IREs are queued in the IDE. 

The IDE is used by the Task Monitor's Queue Linkage Entry, Scanner-Dispatcher rou- 
tines, SIR, Delete Interrupt, and Interrupt Inquiry routines. 
The 32 byte IDE resides in virtual storage, aligned on doubleword boundaries. 

CHAIDE Storage map 



DEC 



8 
16 
24 



HEX 



0| 

1 


IDEID 


| UNNAMED | IDETYP 
1 1 1 


IDEFPR | 


8| 

1 




IDEBPR 


IDEHRE | 


10| 
1 




IDESDT 


IDEHAR | 


18| 

1 




UNNAMED 


UNNAMED | 



Fields in CHAIDE — by displacement 



DEC HEX FIELD 
0000 0000 IDEID 
000 3 0003 IDETYP 
0004 0004 IDEFPR 



DEC HEX FIELD 
0008 0008 IDEBPR 
0012 000C IDEHRE 
0016 0010 IDESDT 



DEC HEX FIELD 
0020 0014 IDEHAR 



Alphabetical list of fields in CHAIDE 



FIELD 


DEC HEX 


FIELD 


DEC HEX 


FIELD 


DEC HEX 


IDEBPR 


0008 0008 


IDEHRE 


0012 0O0C 


IDETYP 


0003 0003 


IDEFPR 


0004 0004 


IDEID 


0000 0000 






IDEHAR 


0020 0014 


IDESDT 


0016 0010 






.stinq of 


CHAIDE 


SOURCE 


INST OPER 


COMMENT 




LOCATION 


INSTRUCTION 






41 00000 


CHAIDE 


DSECT 






41 00000 






DS 


0D 






41 00000 




IDEID 


DS 


CL2 


ID= 'DE' 




41 00002 






DS 


CL1 


UNUSED 




41 00003 




IDETYP 


DS 


XL1 


DETYP CODE 






00000000 


IDEDEP 


EQU 


X'OO' 


PROGRAM TYPE 






00000001 


IDEDES 


EQU 


X'01 f 


SVC TYPE 






00000002 


IDEDEX 


EQU 


X , 02' 


EXTERNAL TYPE 




00000003 


IDEDEA 


EQU 


X'03' 


ASYNCHRONOUS 


TYPE 




00000004 


IDEDTT 


EQU 


X , 04 - 


TIMER TYPE 






00000005 


IDEDEI 


EQU 


X'OS' 


SYNCHRONOUS TYP 


41 00004 




IDEFPR 


DS 


F 


FORWARD PTR 




41 00008 




IDEBPR 


DS 


F 


BACKWARD PTR 




41 0000C 




IDEHRE 


DS 


• F 


HIGHEST PRTY 


RE 


41 00010 




IDESDT 


DS 


F 


SDAT PTR 




41 00014 




IDEHAR 


DS 


F 


HIGHEST PRTY 


ACTIVE RE 


41 00018 






DS 


F 


UNUSED 




41 0001C 






DS 


F 


UNUSED 
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I/O Inboard Error Record (CHAIER) 

The I/O Inboard Error Record (CHAIER) contains data from an I/O inboard error, and 
is preserved in drum storage. 

CHAIER is constructed by virtual storage error recording or core error recording, 
depending on the type of I/O operation (task or paging). 

CHAIER Storage map 



1 ( 



DEC 



HEX 



8 


8 


16 


10 


24 


18 


32 


20 


40 


28 


48 


30 



72 


48 


80 


50 


88 


58 



UNNAMED 


IERRL 


I UNNAMED | IERTYP | 
1 1 1 


UNNAMED 


IERSDA 


IERALT 

1 


1 
I 


IERLP I 

1 


UNNAMED 


IERLSA 


IERTIM 


IERPID 


IERCSW 



IERLOG 



IERMAP 



IERNCC 



UNNAMED 



IERFCC 



IERCCW 



Fields in CHAIER — by displacement 



DEC HEX FIELD 
0002 0002 IERRL 
0005 0005 IERTYP 
0008 0008 IERSDA 
0010 O00A IERALT 
0012 000C IERLP 



DEC HEX FIELD 
0016 0010 IERLSA 
0024 0018 IERTIM 
0032 0020 IERPID 
0040 0028 IERCSW 
0048 0030 IERLOG 



DEC HEX FIELD 
0072 0048 IERMAP 
0080 0050 IERNCC 
0084 0054 IERFCC 
0088 0058 IERCCW 



Alphabetical list of fields in CHAIER 



FIELD 

IERALT 

IERCCW 

IERCSW 

IERFCC 

IERLOG 



DEC HEX 
0010 000A 
0088 0058 
0040 0028 
0084 0054 
0048 0030 



FIELD 

IERLP 

IERLSA 

IERMAP 

IERNCC 

IERPID 



DEC HEX 
0012 000C 
0016 0010 
0072 0048 
0080 0050 
0032 0020 



FIELD 

IERRL 

IERSDA 

IERTIM 

IERTYP 



DEC HEX 
0002 0002 
0008 0008 
0024 0018 
0005 0005 



I / 
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Assembler listing of CHAIER 



LOCATION INSTRUCTION SOURCE 
42 00000 CHAIER 



INST OPER 



COMMENT 



DSECT 
**** I/O INBOARD ERROR RECORD CDWB 2.4.55) ***** 



42 00000 
42 00000 
42 00002 

42 00004 
42 00005 
42 00006 
42 00008 
42 0000A 

42 00O0C 

42 0000E 
42 00010 

42 00018 

42 00020 
42 00028 
42 00030 
42 00048 
42 00050 
42 00052 
42 00054 
42 00058 





DS 


0D 




DS 


H 


IERRL 


DS 


H 


* 








DS 


C 


IERTYP 


DS 


X 




DS 


H 


IERSDA 


DS 


XL2 


IERALT 


DS 


XL2 


* 






IERLP 


DS 


XL2 


* 








DS 


H 


IERLSA 


DS 


XL8 


* 






IERTIM 


DS 


2F 


* 






IERPID 


DS 


CL8 


IERCSW 


DS 


XL8 


IERLOG 


DS 


3XL8 


IERMAP 


DS 


XL8 


IERNCC 


DS 


H 




DS 


H 


IERFCC 


DS 


XL4 


IERCCW 


DS 


9XL8 



SPARE 

RECORD LENGTH (120 TO 160 

BYTES) 

SPARE 

RECORD TYPE (2C OR 2D) 

SPARE 

SYMBOLIC DEVICE ADDRESS 

ALTERNATE PATH IF DRUM; 

OTHERWISE UNUSED 

PATH LAST USED (ACTUAL I/O 

ADDRESS) 

SPARE 

LAST SEEK ADDRESS IF DRUM; 

ELSE UNUSED 

TIME AND DATE OF ERROR 

INCIDENT N392 

PROGRAM ID 

CHANNEL STATUS WORD 

CHANNEL LOG 

CHANNEL MAP 

NO. OF CCW'S IN CCW LIST 

SPARE 

POINTER TO FAILING CCW 

CCW LIST (4 TO 9 CCW'S) 
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I/O Paging Control Block (CHAIOP) 

The I/O Paging Control Block CIOPCB) serves as the communication link between the 
page oriented access methods (VAM) and the resident supervisor. 

The IOPCB, a variable length parameter list, follows a PGOUT supervisor call. The 
PGOUT is issued when a program in virtual storage requests the execution of a page 
oriented I/O operation. Since the IOPCB cannot appear in- line r both the PGOUT and 
its IOPCB are stored in a constant area. The SVC is executed by an in-line execute 
instruction. The IOPCB must be in core storage at PGOUT time. 

The IOPCB occupies from 12 to 40 bytes in virtual and core storage, aligned on 
word boundaries and contained within one page. 

Only one 32-bit virtual storage page address is given. For multiple page opera- 
tions the subsequent virtual storage pages immediately follow the specified page. 

CHAIOP Storage map 



DEC 


8 

16 

24 

32 



HEX 



0| 

I 


IOPSV 


IOP FG | IOPCT 

I 1 


IOPVM 


8! 

1 


IOPSS1 


IOPEP1 


IOPSS2 


I 


IOPEP2 


10| 

i 


IOPSS3 


IOPEP3 


IOPSS4 




IOPEP4 


181 

1 


IOPSS5 


IOPEP5 


IOPSS6 




IOPEP6 


201 
I 


IOPSS7 


IOPEP7 


IOPSS8 




IOPEP8 



Fields in CHAIOP — by displacement 



DEC 

0000 

0000 

0002 

0002 

0002 

0003 

0004 

0008 

0008 

0010 

0012 



HEX 

0000 

0000 

0002 

0002 

0002 

0003 

0004 

0008 

0008 

O00A 

000C 



FIELD 

IOPSV 

IOPBEG 

IOPVCR 

IOPFG 

IOPEL 

IOPCT 

IOPVM 

IOPSS1 

IOPES1 

IOPEP1 

IOPSS2 



DEC 
0012 
0014 
CEQU) 0016 
0016 
0018 
0020 
0020 
0022 
0024 
0024 
0026 



HEX 

000C 

000E 

0010 

0010 

0012 

0014 

0014 

0016 

0018 

0018 

001A 



FIELD 

IOPES2 
IOPEP2 
IOPSS3 
IOPES3 
IOPEP3 
IOPSS4 
IOPES4 
IOPEP4 
IOPSS5 
IOPES5 
IOPEP5 



DEC 


HEX 


FIELD 


0028 


00 1C 


IOPSS6 


0028 


001C 


IOPES6 


0030 


001E 


IOPEP6 


0032 


0020 


IOPSS7 


0032 


0020 


IOPES7 


0034 


0022 


IOPEP7 


0036 


0024 


IOPSS8 


0036 


0024 


IOPES8 


0038 


0026 


IOPEP8 



Alphabetical list of fields in CHAIOP 



FIELD 

IOPBEG 

IOPCT 

IOPEL 

IOPEP1 

IOPEP2 

IOPEP3 

IOPEP4 

IOPEP5 

IOPEP6 

IOPEP7 

IOPEP8 



DEC 

0000 

0003 

0002 

0010 

0014 

0018 

0022 

0026 

0030 

0034 

0038 



HEX 

0000 

0003 

0002 

0OOA 

000E 

0012 

0016 

001A 

001E 

0022 

0026 



FIELD 

IOPES1 

IOPES2 

IOPES3 

IOPES4 

IOPES5 

IOPES6 

IOPES7 

IOPES8 

IOPFG 

IOPSS1 

IOPSS2 



DEC 

0008 

0012 

0016 

0020 

0024 

0028 

0032 

0036 

0002 

0008 

0012 



HEX 

0008 

000C 

0010 

0014 

0018 

001C 

0020 

0024 

0002 

0008 

000C 



FIELD 

IOPSS3 

IOPSS4 

IOPSS5 

IOPSS6 

IOPSS7 

IOPSS8 

IOPSV 

IOPVCR 

IOPVM 



DEC HEX 
0016 0010 
0020 0014 
0024 0018 
0028 001C 
0032 0020 
0036 0024 
0000 0000 
0002 0002 (EQU) 
0004 0004 



Assembler listing of CHAIOP 



LOCATION INSTRUCTION SOURCE 



INST OPER 



43 00000 CHAIOP DSECT 

43 00000 IOPBEG DS OF 

43 00000 IOPSV DS H 

43 00002 IOPEL DS OH 

43 00002 IOPFG DS XL1 

43 00002 IOPVCR EQU IOPFG 
♦ 

(Listing of CHAIOP continued on page 224) 



COMMENT 

INPUT/OUTPUT PAGING CONTROL 

BLOCK 

ALIGN ON A WORD BOUNDARY 

SVC FOR PGOUT 

FLAG AND COUNT FIELD 

FLAG BYTE 

VALIDITY CHECK REQUIRED 

FLAG 
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(Listing of CHAIOP continued from page 223) 



LOCATION INSTRUCTION 
00000080 

43 00003 

43 00004 
43 00008 
43 00008 

43 0O0OA 
43 O0O0C 

43 0000C 

43 O0O0E 
43 00010 

43 00010 

43 00012 
43 00014 

43 00014 

43 00016 
43 00018 

43 00018 

43 0001A 
43 0001C 

43 0001C 

43 0001E 
43 00020 

43 00020 

43 00022 
43 00024 

43 00024 

43 00026 



SOURCE 



INST OPER 



IOPVCRM 

IOPCT 

♦ 

IOPVM 

IOPES1 

I0PSS1 

* 

IOPEP1 

IOPES2 

IOPSS2 

IOPEP2 
IOPES3 
* 
IOPSS3 

* 

IOPEP3 
I OPES 4 

IOPSS4 

* 

IOPEP4 

IOPES5 

* 

IOPSS5 

* 

IOPEP5 

IOPES6 

IOPSS6 

IOPEP6 
IOPES7 

IOPSS7 
* 

IOPEP7 
I OPES 8 

* 

IOPSS8 

IOPEP8 

* NOTE 1- 

* STORAGE 

* 
* 
* 



EQU 

DS 

DS 
DS 
DS 

DS 
DS 

DS 

DS 
DS 

DS 

DS 
DS 

DS 

DS 
DS 

DS 

DS 
DS 

DS 

DS 
DS 

DS 

DS 
DS 

DS 

DS 



X^O' 

XL1 

F 
OF 

H 

H 
OF 



H 
OF 



H 
OF 



H 
OF 



H 

OF 



H 
OF 



H 
OF 



H 



COMMENT 

VALIDITY CHECK REQUIRED 
MASK 

COUNT OF NO, ENTRIES IN EXT 
STORAGE LIST 

VIRTUAL MEMORY PAGE ADDRESS 
EXTERNAL STORAGE ADDRESS 1 
SYSTEM SYMBOLIC DEVICE 
ADDRESS 1 

EXTERNAL PAGE NUMBER 1 
EXTERNAL STORAGE ADDRESS 2 
(SEE NOTE 1) 
SYSTEM SYMBOLIC DEVICE 
ADDRESS 2 

EXTERNAL PAGE NUMBER 2 
EXTERNAL STORAGE hDDRESS 3 
(SEE NOTE 1) 
SYSTEM SYMBOLIC DEVICE 
ADDRESS 3 

EXTERNAL PAGE NUMBER 3 
EXTERNAL STORAGE ADDRESS 4 
(SEE NOTED 

SYSTEM SYMBOLIC DEVICE 
ADDRESS 4 

EXTERNAL PAGE NUMBER 4 
EXTERNAL STORAGE ADDRESS 5 
(SEE NOTE 1) 
SYSTEM SYMBOLIC DEVICE 
ADDRESS 5 

EXTERNAL PAGE NUMBER 5 
EXTERNAL STORAGE ADDRESS 6 
(SEE NOTE 1> 
SYSTEM SYMBOLIC DEVICE 
ADDRESS 6 

EXTERNAL PAGE NUMBER 6 
EXTERNAL STORAGE ADDRESS 7 
(SEE NOTE 1) 
SYSTEM SYMBOLIC DEVICE 
ADDRESS 7 

EXTERNAL PAGE NUMBER 7 
EXTERNAL STORAGE ADDRESS 8 
(SEE NOTE 1) 
SYSTEM SYMBOLIC DEVICE 
ADDRESS 8 

EXTERNAL PAGE NUMBER 8 
THE NUMBER OF EXTERNAL 



IF THE COUNT OF 

LIST ENTRIES 

IS NOT EQUAL TO OR GREATER THAN THIS 

ENTRY NUMBER, THEN THIS 

WORD DOES NOT EXIST IN THE ACTUAL TABLE 
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I/O Request Control Block (CHAIOR) 

The I/O Request Control Block CIORCB) provides one of the basic communication 
links between virtual storage and the resident supervisor. 

The IORCB consists of an 80 byte, fixed- length area followed by three variable 
subareas: data buffer, page list, and channel command word list. The three sub- 
areas jointly may not exceed 18 40 bytes of storage, and this space must be used in 
increments of doubleword size. Only the page list has a maximum size 
(8 doublewords) . 

The IORCB resides in both virtual storage and core storage, aligned on doubleword 
boundaries. 

CHAIOR Storage map 



DEC 



HEX 



8 


8 


16 


10 


24 


18 


32 


20 


40 


28 


48 


30 


56 


38 


64 


40 


72 


48 


80 


50 



4096 
4104 
4112 
4120 
4128 
4136 
4144 
4152 
4160 



4224 



1000 
1008 
1010 
1018 
1020 
1028 
1030 
1038 
1040 



1080 



IORSV 


|IORCSB 


|IORF3 

1 


1 IORDA0 


[IORDA1 

1 


IORDA2 


| IORDA3 

1 


IORLN 


| IORGL 
1 


|IORPO 


(IORKY 

1 


| IORSF 


| IORCL 

i 


I ORGS 


| IORST 

1 


IORBL 


|IORBS 


| IORAP 


| IORDA4 


| IORDA5 

1 


IORSD 




IORDE 






IORDC 






IORPV 






IORPR 




IORDT 


| IORDA6 
1 


I IORBB 

1 


| IORCN 


1 
1 


IORDR 




IORSB0 


(IORSB1 
1 


|IORSB2 
i 


| IORSB3 
1 


| IORSB4 


| IORSB5 
1 


IORSB6 


| IORSB7 
1 


IORSN 


| IORSU 
I 


| IORSL 

1 


| IORHF 


|IORBY5 

1 


IORBY6 


I IORDBA 
1 


IORDA7 


| IORDA8 
1 


| IORDA9 
1 


| IORHE 

I 


| IORF1 


| IORF2 

I 


IORF4 


| IORF5 


IORSA 


1 
I 


IORSE 




| IORSG 


|IORF6 
! 


; IORSH 



RESERVED 



IORRHO | 

I 


IORRHE 


| IORRHF | RESERVED 

1 1 


IORRHC 


IORRZO J 

1 


IORRZE 


| IORRZF | RESERVED 

1 1 


IORRZC 


UNNAMED 


| IORHAF 

1 


| IORHCC 
1 


IORHHH 


IORDCY 


IORDHD 


| IORDRC | 
1 i 


UNNAMED 


IORACY 


IORAHD 


| IORARC | 


UNNAMED 


IORSER | IORSEM 
i 


IORSEB 


| IORSEC 


IORSEH 


IORSCY 


IORSRW 


| IORSCR | IORSKL 
i 1 


| IORDL 


IORR JNCC | IORRJNGC 
I 


|IORRJNTC| IORRJNUE| IORRJNIL| IORRJNBY 
i i I i 


| IORRJNAT| IORRJNSM 
1 1 



IORJESAV 



IORJEFCE 



(CHAIOR continued on page 226) 



CHAIOR 225 



DEC 



HEX 



4368 



1110 



8192 2000 



ORG IORDT 



40 28| 



ORG IORDB 



(CHAIOR continued from page 225) 



IORVB 



IORTBR 



RESERVED 



IORPL 



4096 1000| 

L 

4104 1008J 



IORJESNS 



IORJECSW 



(IORJEFLG I UNNAMED | 
J I I 



ORG IORJECSW 



4104 
4112 
4120 
4128 
4136 
4144 



100 8|IORJECKY 



1010|IORJECC 
I. 



1018| IORJEOV 



1020JIORJENCR 



1028| IORJENSM 
I 



1030|IORRJIL 



IORJECAD 



IORJECST 



IORJECCT 



JL 



IORJEIC (IORJECD | IORJELD | IORJETO | IORJEIR | IORJEBO | IORJEDC 

L 



IORJEIL | IORJENEC 1 IORJENLD | IORJENTO | IORJENBO | IORJENDC | IORJENOV | 

J i I I L 



IORJENCC] IORJENGC| IORJENTCI IORJENUE) IORJENIL| IORJENBY I IORJENAT] 

L 



IORRJCD (lORRJLD | IORRJTO | IORRJIR | IORRJBO |IORRJDC JIORRJOV | 

J I I I i 



IORRJNEC I IORRJNLD | IORRJNTG) IORRJNBOJ IORRJNDC | IORRJNOV | IORRJNCR | 
I I I I I I I 



ORG IORPL 



8192 2000| 
i. 



IORPN 



ORG IORBEG+12288 



IIORPF (UNNAMED 
J I 



IORCA 



2288 8F0| 
L 

ORG IORCW 



IORCW 



2288 8F0IIOROP | IORPP [IORFDA |IORFDB | IORCF (UNNAMED | IORCT 
i I I I I I 1 
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Fields in CHAIOR — by displacement 



DEC 


HEX 


FIELD 




DEC 


HEX 


FIELD 




DEC 


HEX 


FIELD 




0000 


0000 


IORSV 




0055 


0037 


IORSB7 




0077 


004D 


IORP 


(EQU) 


0000 


0000 


IORBEG 




0056 


0038 


IORSN 




0077 


004D 


IORDTSI 


(EQU) 


0002 


0002 


IORCSB 




0057 


0039 


IORSU 




0077 


004D 


IORMC 


(EQU) 


0003 


0003 


IORSWA 


(EQU) 


0059 


003B 


IORSM 


(EQU) 


0077 


004D 


IORPG 


(EQU) 


0003 


0003 


IOREOT 


(EQU) 


0059 


003B 


IORSL 




0077 


004D 


IORF6 




0003 


0003 


IORGET 


(EQU) 


0060 


003C 


IORHF 




0078 


004E 


IORSH 




0003 


0003 


IORRJ 


(EQU) 


0061 


003D 


IORDAA 


(EQU) 


0080 


0050 


IORFE 




0003 


0003 


IOROB 


(EQU) 


0061 


003D 


IORBY5 




2288 


3000 


I CROP 




0003 


0003 


IORCE 


(EQU) 


0062 


003E 


IORDDA 


(EQU) 


2288 


3000 


IORCW 




0003 


0003 


IORF3 




0062 


003E 


IORDCA 


(EQU) 


2289 


3001 


IORPP 




0004 


0004 


IORPRO 


(EQU) 


0062 


003E 


IORBY6 




2290 


3002 


IORFDA 




0004 


0004 


IORPT0 


(EQU) 


0063 


003F 


IORDBA 




2290 


3002 


IORFD 




0004 


0004 


IORCRO 


(EQU) 


0064 


0040 


IORDA7 




2290 


3002 


IORF0 


(EQU) 


0004 


0004 


IORMTO 


(EQU) 


0065 


0041 


IORDA8 




2291 


3003 


ICRFDB 




0004 


0004 


IORDA0 




0066 


0042 


IORDA9 




2292 


3004 


IORCF 




0005 


0005 


IORPR1 


(EQU) 


0067 


0043 


IORRDN 


(EQU) 


2292 


3004 


IORPC 


(EQU) 


0005 


0005 


IORPT1 


(EQU) 


0067 


0043 


IORWTR 


(EQU) 


2292 


3004 


IORSK 


(EQU) 


0005 


0005 


IORCR1 


(EQU) 


0067 


0043 


IORDCDA 


(EQU) 


2292 


3004 


IORSI 


(EQU) 


0005 


0005 


IORMT1 


(EQU) 


0067 


0043 


IORCLE 


(EQU) 


2292 


3004 


IORCO 


(EQU) 


0005 


0005 


IORDA1 




0067 


0043 


IORAPE 


(EQU) 


2292 


3004 


IORCD 


(EQU) 


0006 


0006 


IORIN 


(EQU) 


0067 


0043 


IORMDS 


(EQU) 


2294 


3006 


IORCT 




0006 


0006 


IORMT2 


(EQU) 


0067 


0043 


IOROPSK 


(EQU) 


4096 


1000 


IORJESNS 




0006 


0006 


IORDA2 




0067 


0043 


IOROPP 


(EQU) 


4096 


1000 


IORRHO 




0007 


0007 


IORMT3 


(EQU) 


0067 


0043 


IORHE 




4096 


1000 


IORRHA 




0007 


0007 


IORDA3 




0068 


0044 


IORUE 


(EQU) 


4096 


1000 


IORHA 


(EQU) 


0008 


0008 


IORLN 




0068 


0044 


IORAT 


(EQU) 


4096 


1000 


IORDB 




0009 


0009 


IORGL 




0068 


0044 


IORUR 


(EQU) 


4097 


1001 


IORRHE 




0010 


000A 


IORPO 




0068 


0044 


IORHI 


(EQU) 


4100 


1004 


IORRHF 




0011 


000B 


IORKY 




0068 


0044 


IORER 


(EQU) 


4102 


1006 


IORJEFLG 




0012 


OOOC 


IORSF 




0068 


0044 


IORSC 


(EQU) 


4102 


1006 


IORTAB 


(EQU) 


0013 


000D 


IORCL 




0068 


0044 


IORRS 


(EQU) 


4102 


1006 


IORJEAN 


(EQU) 


0014 


000E 


IORCS 




0068 


0044 


IORIS 


(EQU) 


4102 


1006 


IORJEDB 


(EQU) 


0015 


000F 


IORST 




0068 


0044 


IORSP 


(EQU) 


4102 


1006 


IORJEOT 


(EQU) 


0016 


0010 


IORBL 




0068 


0044 


IORF1 




4102 


1006 


IORJEOC 


(EQU) 


0017 


0011 


IORBS 




0068 


0044 


IORFL 




4102 


1006 


IORJEWE 


(EQU) 


0018 


0012 


IORAP 




0069 


0045 


IORCR 


(EQU) 


4102 


1006 


IORJESN 


(EQU) 


0020 


0014 


IORMT4 


(EQU) 


0069 


0045 


IORSB 


(EQU) 


4102 


1006 


IORRHC 




0020 


0014 


IORDA4 




0069 


0045 


IORRB 


(EQU) 


4104 


1008 


IORJECKY 




0021 


0015 


IORMT5 


(EQU) 


0069 


0045 


IORBH 


(EQU) 


4104 


1008 


IORJECSW 




0021 


0015 


IORDA5 




0069 


0045 


IORIB 


(EQU) 


4104 


1008 


IORRZO 




0022 


0016 


IORSD 




0069 


0045 


IORWE 


(EQU) 


4104 


1008 


IORRZA 




0024 


0018 


IORDE 




0069 


0045 


IORNP 


(EQU) 


4105 


1009 


IORJECAD 




0028 


001C 


IORDC 




0069 


0045 


IORES 


(EQU) 


4105 


1009 


IORRZE 




0032 


0020 


IORPV 




0069 


0045 


IORF2 




4108 


100C 


IORJECST 




0036 


0024 


IORPR 




0070 


0046 


IORAM 


(EQU) 


4108 


100C 


IORRZF 




0040 


0028 


IORVB 




0070 


0046 


IORQI 


(EQU) 


4110 


100E 


IORJECCT 




0040 


0028 


IORCI 


(EQU) 


0070 


0046 


IORIOC 


(EQU) 


4110 


100E 


IORRZC 




0040 


0028 


IORRV 


(EQU) 


0070 


0046 


IORIC 


(EQU) 


4112 


1010 


IORJECC 




0040 


0028 


IORCV 


(EQU) 


0070 


0046 


IORDS 


(EQU) 


4112 


1010 


IORJECT 


(EQU) 


0040 


0028 


IORMD 


(EQU) 


0070 


0046 


IORRD 


(EQU) 


4113 


1011 


IORJEIC 




0040 


0028 


IORDT 




0070 


0046 


IORVT 


(EQU) 


4114 


1012 


IORJECD 




0041 


0029 


IORDA6 




0070 


0046 


IORIP 


(EQU) 


4115 


1013 


IORJELD 




0042 


00 2A 


IORBB 




0070 


0046 


IORF4 




4115 


1013 


IORHAF 




0044 


002C 


IORSO 


(EQU) 


0071 


0047 


IORAL 


(EQU) 


4116 


1014 


IORJETO 




0044 


002C 


IORTC 


(EQU) 


0071 


0047 


IORVA 


(EQU) 


4116 


1014 


IORHCC 




0044 


002C 


IORTO 


(EQU) 


0071 


0047 


IORBP 


(EQU) 


4117 


1015 


IORJEIR 




0044 


002C 


IORCN 




0071 


0047 


IORFC 


(EQU) 


4118 


1016 


IORJEBO 




0044 


002C 


IORBA 




0071 


0047 


IORFP 


(EQU) 


4118 


1016 


IORHHH 




0045 


002D 


IORDR 




0071 


0047 


IORRM 


(EQU) 


4119 


1017 


IORJEDC 




0048 


0030 


IORSB0 




0071 


0047 


IOREC 


(EQU) 


4120 


1018 


IORJEOV 




0048 


0030 


IORSNS 




0071 


0047 


IORGI 


(EQU) 


4120 


1018 


IORDCY 




0049 


0031 


IORSB1 




0071 


0047 


IORF5 




4120 


1018 


IORDTA 




0050 


0032 


IORSB2 




0072 


0048 


IORSA 




4121 


1019 


IORJEIL 




0051 


0033 


IORSB3 




0072 


0048 


IORSNC 




4122 


101A 


IORJENEC 




0052 


0034 


IORSB4 




0073 


0049 


IORSE 




4122 


101A 


IORDHD 




0053 


0035 


IORSB5 




0076 


004C 


IORSG 




4123 


101B 


IORJENLD 




0054 


0036 


IORSB6 




0077 


004D 


IORMOD 


(EQU) 


4124 


101C 


IORJENTO 




(Continued on page 


228) 






































CHAIOR 227 



(Continued from page 227) 





DEC HEX 


FIELD 




DEC HEX 


FIELD 




DEC HEX 


FIELD 






4124 101C IORDRC 




4137 1029 IORSEM 




4150 1036 


► IORRJNOV 






4125 10 ID IORJENBO 




4138 102A IORRJLD 




4150 1036 


» IORDL 






4126 101E IORJENDC 




4138 102A IORSEB 




4151 1037 


' IORRJNCR 






4127 101F IORJENOV 




4139 102B IORRJTO 




4152 1038 


1 IORRJNCC 






4128 1020 IORJENCR 




4140 102C IORRJIR 




4152 1038 


1 IORBDB 






4128 1020 IORACY 




4140 102C IORSEC 




4153 1039 


» IORRJNGC 






4128 1020 IORATA 




4141 102D IORRJBO 




4154 103A IORRJNTC 






4129 1021 IORJENCC 




4142 102E IORRJDC 




4155 103B IORRJNUE 






4130 1022 IORJENGC 




414 2 102E IORSEH 




4156 103C 


: IORRJNIL 






4130 1022 IORAHD 




4143 102F IORRJOV 




4157 103D IORRJNBY 






4131 1023 IORJENTC 




4144 1030 IORRJIL 




4158 103E IORRJNAT 






4132 1024 IORJENUE 




4144 1030 IORSCY 




4159 10 3F IORRJNSM 






4132 1024 IORARC 




4144 1030 IORSCH 




4160 104C 


> IORJESAV 






4133 1025 IORJENIL 




4145 1031 IORRJNEC 




4160 104C 


I IORRJND 


(EQU) 




4134 1026 IORJENBY 




414 5 10 31 IORRJNCT 


(EQU) 


4224 108C 


) IORJEFCE 






4135 1027 IORJENAT 




4146 1032 IORRJNLD 




4228 108*J 


\ IORTBR 






4136 1028 IORJENSM 




4146 1032 IORSRW 




8192 200C 


) IORPN 






4136 1028 IORSER 




4147 1033 IORRJNTO 




8192 200C 


> IORPL 






4136 1028 IORSEK 




4148 1034 IORRJNBO 




8195 2003 


5 IORPF 






4137 1029 IORRJCD 




4148 1034 IORSCR 




8195 2003 


t IORPS 


(EQU) 




4137 1029 IORRJCT 


(EQU) 


4149 1035 IORRJNDC 




8195 2003 


1 IORAG 


(EQU) 




4137 1029 IORJEND 


fEQU) 


4149 1035 IORSKL 




8197 2005 


\ IORCA 




Alphabetical list of 


fields in 


CHAIOR 


















FIELD 


DEC 


HEX 




FIELD 


DEC 


HEX 




FIELD 


DEC 


HEX 






IORACY 


4128 


1020 




IORDA5 


0021 


0015 




IORHAF 


4115 


1013 






IORAG 


8195 


2003 


(EQU) 


IORDA6 


0041 


0029 




IORHCC 


4116 


1014 






IORAHD 


4130 


1022 




IORDA7 


0064 


0040 




IORHE 


0067 


0043 






IORAL 


0071 


0047 


(EQU) 


IORDA8 


0065 


0041 




IORHF 


0060 


003C 






IORAM 


0070 


0046 


(EQU) 


IORDA9 


0066 


0042 




IORHHH 


4118 


1016 






IORAP 


0018 


0012 




IORDB 


4096 


1000 




IORHI 


0068 


0044 


(EQU) 




IORAPE 


0067 


0043 


(EQU) 


IORDBA 


0063 


003F 




IORIB 


0069 


0045 


(EQU) 




IORARC 


4132 


1024 




IORDC 


0028 


001C 




IORIC 


0070 


0046 


(EQU) 




IORAT 


0068 


0044 


(EQU) 


IORDCA 


0062 


003E 


(EQU) 


IORIN 


0006 


0006 


(EQU) 




IORATA 


4128 


1020 




IORDCDA 


0067 


0043 


(EQU) 


IORIOC 


0070 


0046 


(EQU) 




IORBA 


0044 


002C 




IORDCY 


4120 


1018 




IORIP 


0070 


0046 


(EQU) 




IORBB 


0042 


002A 




IORDDA 


0062 


003E 


(EQU) 


IORIS 


0068 


0044 


(EQU) 




IORBDB 


4152 


1038 




IORDE 


0024 


0018 




IORJEAN 


4102 


1006 


(EQU) 




IORBEG 


0000 


0000 




IORDHD 


4122 


101A 




IORJEBO 


4118 


1016 






IORBH 


0069 


0045 


(EQU) 


IORDL 


4150 


1036 




IORJECAD 


4105 


1009 






IORBL 


0016 


0010 




IORDR 


0045 


002D 




IORJECC 


4112 


1010 






IORBP 


0071 


0047 


(EQU) 


IORDRC 


4124 


101C 




IORJECCT 


4110 


100E 






IORBS 


0017 


0011 




IORDS 


0070 


0046 


(EQU) 


IORJECD 


4114 


1012 






IORBY5 


0061 


003D 




IORDT 


0040 


0028 




IORJECKY 


4104 


1008 






IORBY6 


0062 


003E 




IORDTA 


4120 


1018 




IORJECST 


4108 


100C 






IORCA 


8197 


2005 




IORDTSI 


0077 


004D 


(EQU) 


IORJECSW 


4104 


1008 






IORCD 


2292 


3004 


(EQU) 


IOREC 


0071 


0047 


(EQU) 


IORJECT 


4112 


1010 


(EQU) 




IORCE 


0003 


0003 


(EQU) 


IOREOT 


0003 


0003 


(EQU) 


IORJEDB 


4102 


1006 


(EQU) 




IORCF 


2292 


3004 




IORER 


0068 


0044 


(EQU) 


IORJEDC 


4119 


1017 






IORCI 


0040 


0028 


(EQU) 


IORES 


0069 


0045 


(EQU) 


IORJEFCE 


4224 


1080 






IORCL 


0013 


000D 




IORFC 


0071 


0047 


(EQU) 


IORJEFLG 


4102 


1006 






IORCLE 


0067 


0043 


(EQU) 


IORFD 


2290 


3002 




IORJEIC 


4113 


1011 






IORCN 


0044 


002C 




IORFDA 


2290 


3002 




IORJEIL 


4121 


1019 






IORCO 


2292 


3004 


(EQU) 


IORFDB 


2291 


3003 




IORJEIR 


4117 


1015 






IORCR 


0069 


0045 


(EQU) 


IORFE 


0080 


0050 




IORJELD 


4115 


1013 






IORCR0 


0004 


0004 


(EQU) 


IORFL 


0068 


0044 




IORJENAT 


4135 


1027 






IORCR1 


0005 


0005 


(EQU) 


IORFP 


0071 


0047 


(EQU) 


IORJENBO 


4125 


101D 






IORCS 


0014 


000E 




IORF0 


2290 


3002 


(EQU) 


IORJENBY 


4134 


1026 






IORCSB 


0002 


0002 




IORF1 


0068 


0044 




IORJENCC 


4129 


1021 






IORCT 


2294 


3006 




IORF2 


0069 


0045 




IORJENCR 


4128 


1020 






IORCV 


0040 


0028 


(EQU) 


IORF3 


0003 


0003 




IORJEND 


4137 


1029 


(EQU) 




IORCW 


2288 


3000 




IORF4 


0070 


0046 




IORJENDC 


4126 


101E 






IORDAA 


0061 


003D 


(EQU) 


IORF5 


0071 


0047 




IORJENEC 


4122 


101A 






IORDA0 


0004 


0004 




IORF6 


0077 


004D 




IORJENGC 


4130 


1022 






IORDA1 


0005 


0005 




IORGET 


0003 


0003 


(EQU) 


IORJENIL 


4133 


1025 






IORDA2 


0006 


0006 




IORGI 


0071 


0047 


(EQU) 


IORJENLD 


4123 


101B 






IORDA3 


0007 


0007 




IORGL 


0009 


0009 




IORJENOV 


4127 


101F 






IORDA4 


0020 


0014 




IORHA 


4096 


1000 


(EQU) 


IORJENSM 


4136 


1028 






C Continued on 


page 


229) 


















228 CHAIOR 



























(Continued from page 228) 



FIELD 


DEC 


HEX 




FIELD 


DEC 


HEX 




FIELD 


DEC 


HEX 




IORJENTC 


4131 


1023 




IORRDN 


0067 


0043 


(EQU) 


IORSB3 


0051 


0033 




IORJENTO 


4124 


101C 




IORRHA 


4096 


1000 




IORSB4 


0052 


0034 




IORJENUE 


4132 


1024 




IORRHC 


4102 


1006 




IORSB5 


0053 


0035 




IORJEOC 


4102 


1006 


(EQU) 


IORRHE 


4097 


1001 




IORSB6 


0054 


0036 




IORJEOT 


4102 


1006 


(EQU) 


IORRHF 


4100 


1004 




IORSB7 


0055 


0037 




IORJEOV 


4120 


1018 




IORRHO 


4096 


1000 




IORSC 


0068 


0044 


(EQU) 


IORJESAV 


4160 


1040 




IORRJ 


0003 


0003 


(EQU) 


IORSCH 


4144 


1030 




IORJESN 


4102 


1006 


(EQU> 


IORRJBO 


4141 


102D 




IORSCR 


4148 


1034 




IORJESNS 


4096 


1000 




IORRJCD 


4137 


1029 




IORSCY 


4144 


1030 




IORJETO 


4116 


1014 




IORRJCT 


4137 


1029 


(EQU) 


IORSD 


0022 


0016 




IORJEWE 


4102 


1006 


(EQU) 


IORRJDC 


4142 


102E 




IORSE 


0073 


0049 




IORKY 


0011 


000B 




IORRJIL 


4144 


1030 




IORSEB 


4138 


102A 




IORLN 


0008 


0008 




IORRJ IR 


4140 


102C 




IORSEC 


4140 


102C 




IORMC 


0077 


004D 


(EQU) 


IORRJLD 


4138 


102A 




IORSEH 


4142 


102E 




IORMD 


0040 


0028 


(EQU) 


IORRJNAT 


4158 


103E 




IORSEK 


4136 


1028 




IORMDS 


0067 


0043 


(EQU) 


IORRJNBO 


4148 


1034 




IORSEM 


4137 


1029 




IORMOD 


0077 


004D 


(EQU) 


IORRJNBY 


4157 


103D 




IORSER 


4136 


1028 




IORMTO 


0004 


0004 


(EQU) 


IORRJNCC 


4152 


1038 




IORSF 


0012 


oooc 




IORMT1 


0005 


0005 


(EQU) 


IORRJNCR 


4151 


1037 




IORSG 


0076 


004C 




IORMT2 


0006 


0006 


(EQU) 


IORRJNCT 


4145 


1031 


(EQU) 


IORSH 


0078 


004E 




IORMT3 


0007 


0007 


(EQU) 


IORRJND 


4160 


1040 


(EQU) 


IORSI 


2292 


3004 


(EQU) 


IORMT4 


0020 


0014 


(EQU) 


IORRJNDC 


4149 


1035 




IORSK 


2292 


3004 


(EQU) 


IORMT5 


0021 


0015 


(EQU) 


IORRJNEC 


4145 


1031 




IORSKL 


4149 


1035 




IORNP 


0069 


0045 


(EQU) 


IORRJNGC 


4153 


1039 




IORSL 


0059 


003B 




IOROB 


0003 


0003 


(EQU) 


IORRJNIL 


4156 


103C 




IORSM 


0059 


003B 


(EQU) 


IOROP 


2288 


3000 




IORRJNLD 


4146 


1032 




IORSN 


0056 


0038 




IOROPP 


0067 


0043 


(EQU) 


IORRJNOV 


4150 


1036 




IORSNC 


0072 


0048 




IOROPSK 


0067 


0043 


(EQU) 


IORRJNSM 


4159 


103F 




IORSNS 


0048 


0030 




IORP 


0077 


004D 


(EQU) 


IORRJNTC 


4154 


103A 




IORSO 


0044 


002C 


(EQU) 


IORPC 


2292 


3004 


(EQU) 


IORRJNTO 


4147 


1033 




IORSP 


0068 


0044 


(EQU) 


IORPF 


8195 


2003 




IORRJNUE 


4155 


103B 




IORSRW 


4146 


1032 




IORPG 


0077 


004D 


(EQU) 


IORRJOV 


4143 


102F 




IORST 


0015 


000F 




IORPL 


8192 


2000 




IORRJTO 


4139 


102B 




IORSU 


0057 


0039 




IORPN 


8192 


2000 




IORRM 


0071 


0047 


(EQU) 


IORSV 


0000 


0000 




IORPO 


0010 


O00A 




IORRS 


0068 


0044 


(EQU) 


IORSWA 


0003 


0003 


(EQU) 


IORPP 


2289 


3001 




IORRV 


0040 


0028 


(EQU) 


IORTAB 


4102 


1006 


(EQU) 


IORPR 


0036 


0024 




IORRZA 


4104 


1008 




IORTBR 


4228 


1084 




IORPRO 


0004 


0004 


(EQU) 


IORRZC 


4110 


100E 




IORTC 


0044 


002C 


(EQU) 


IORPR1 


0005 


0005 


(EQU) 


IORRZE 


4105 


1009 




IORTO 


0044 


002C 


(EQU) 


IORPS 


8195 


2003 


(EQU) 


IORRZF 


4108 


100C 




IORUE 


0068 


0044 


(EQU) 


IORPTO 


0004 


0004 


(EQU) 


IORRZO 


4104 


1008 




IORUR 


0068 


0044 


(EQU) 


IORPT1 


0005 


0005 


(EQU) 


IORSA 


0072 


0048 




IORVA 


0071 


0047 


(EQU) 


IORPV 


0032 


0020 




IORSB 


0069 


0045 


(EQU) 


IORVB 


0040 


0028 




IORQI 


0070 


0046 


(EQU) 


IORSB0 


0048 


0030 




IORVT 


0070 


0046 


(EQU) 


IORRB 


0069 


0045 


(EQU) 


IORSB1 


0049 


0031 




IORWE 


0069 


0045 


(EQU) 


IORRD 


0070 


0046 


(EQU) 


IORSB 2 


0050 


0032 




IORWTR 


0067 


0043 


(EQU) 


Lstinq of 


CHAIOR 




















LOCATION 


INSTRUCTION SOURCE INST OPER 


COMMENT 










44 00000 


CHAIOR DSECT 




INPUT/OUTPUT REQUEST 








* 








CONTROL BLOCK 






44 00000 






IORBEG DS 


0D 




ALIGN ON DOUBLE WORD 










* 








BOUNDARY 








44 00000 






IORSV DS 


H 




SVC 


FOR IOCAL 






44 00002 






IORCSB DS 


XL1 


CSW 


CHANNEL 


. STATUS BYTE 


44 00003 






IORF3 DS 


XL1 


IORCB FLAG 


BYTE 3 








44 00003 


IORCE EQU 


IORF3 


PENDING • COMPLETE 


WITH 










* 








ERRORS' 










00000080 


IORCEM EQU 


X«! 


80 f 


IORCE FLAG 










44 00003 


IOROB EQU 


IORF3 


IORCB ISSUED BY OBTAIN 


OR 








* 








RETAIN 










00000040 


IOROBM EQU 


X 1 


40' 


IOROB FLAG 










44 00003 


IORRJ EQU 


IORF3 


REMOTE JOB 


ENTRY J 


FLAG 






00000020 


IORRJM EQU 


x f ; 


20 f 


REMOTE JOB 


ENTRY MASK 






44 00003 


IORGET EQU 


IORF3 


ON=GET f OFF 


=PUT 1 


FLAG 






00000010 


IORGETM EQU 


XV 


L0' 


ON= GET , OFF=PUT MASK 






44 00003 


IORBOT EQU 


IORF3 


EOT 


WRITTEN 


BY THIS IORCB 


(Listing 


Of CHAIOR 


continued on page 230) 













CHAIOR 229 



(Listing of CHAIOR continued from page 229) 
LOCATION 



INSTRUCTION SOURCE 
00000008 



INST OPER 



44 00004 



44 00005 



44 00006 



IOREOTM 
44 00003 IORSWA 

00000004 IORSWAM 

IORDA0 
44 00004 IORMT0 

* 
44 00004 IORCR0 

44 00004 IORPT0 

44 00004 IORPR0 

IORDA1 
44 00005 IORMT1 
44 00005 IORCR1 

* 
44 00005 IORPT1 

* 
44 00005 IORPR1 

IORDA2 

* 

44 00006 IORMT2 
44 00006 IORIN 
44 00007 IORDA3 

44 00007 IORMT3 

* 

4 4 00008 IORLN 

44 00009 IORGL 

* 

44 00 00 A IORPO 

44 0000B IORKY 

OO000OOF IORKYM 

00000001 IOREQ1 

00000002 IOREQ2 
00000004 IOREQ4 

IORSF 

IORCL 
IORCS 

IORST 

* 

IORBL 

I ORBS 

IORAP 
IORDA4 

44 00014 IORMT4 
* 
IORDA5 

44 00015 IORMT5 
* 

IORSD 

IORDE 
IORDC 

IORPV 
* 

IORPR 
of CHAIOR continued 



44 O0O0C 

44 0000D 

44 00OOE 

44 0000F 

44 00010 

44 00011 

44 00012 
44 00014 

44 00015 

44 00016 

44 00018 
44 0001C 

44 00020 

44 00024 
C Listing 



EQU 
EQU 

EQU 

DS 
EQU 

EQU 

EQU 

EQU 

DS 

EQU 

EQU 

EQU 

EQU 
DS 

EQU 

EQU 

DS 

EQU 

DS 
DS 

DS 

DS 

EQU 
EQU 
EQU 
EQU 
DS 

DS 

DS 

DS 

DS 

DS 

DS 
DS 
EQU 

DS 
EQU 

DS 

DS 
DS 

DS 



x'os' 

IORF3 

X , 04 i 

XL1 
IORDA0 

IORDA0 

IORDA0 

IORDA0 

XL1 

IORDA1 

IORDA1 

IORDA1 

IORDA1 
XL1 

IORDA2 

IORDA2 

XL1 

IORDA3 

XL1 
XL1 

XL1 

XL1 

X^F* 

X'Ol 1 

X , 02 t 
X f 04 f 
XL1 

XL1 

XL1 

XL1 

XL1 

XL1 

H 

XL1 

IORDA4 

XL1 
IORDA5 



F 
F 



DS F 
on page 231) 



COMMENT 

IOREOT MASK 

SWITCH ACKNOWLEDGEMENTS IN 

THIS IORCB FLG 

SWITCH ACKNOWLEDGEMENTS IN 

THIS IORCB MSK 

D/A SEEK CHECK RETRY CNTR 

MAG TAPE DATA CHECK WRITE 

RETRY CNTR 

CARD RDR/PCH CHNL DATA CHK 

RETRY CNT 

PAPER TAPE EQUIP CHECK 

RETRY CNTR 

PRINTER CODE GEN STOR 

PARITY RETRY 

D/A OVERRUN RETRY CNTR 

MAG TAPE OVERRUN RETRY CNTR 

CARD RDR/PCH BUS-OUT CHECK 

RETRY CNT 

PAPER TAPE BUS OUT CHECK 

RETRY CNTR 

PRINTER BUS OUT CHECK CNTR 

D/A NO RECORD FOUND RETRY 

CNTR 

MAG TAPE DATA CHK CONTROL 

RETRY CNTR 

UNIT RECORD INITIAL 

SELECTION RETRY 

D/A MISSING ADDRESS MARKERS 

RETRY 

MAG TAPE CHAINING CHECK 

RETRY CNTR 

LENGTH OF IORCB (MODULO 64) 

LENGTH OF PAGE LIST (MODULO 

8) 

RELATIVE ORIGIN OF PAGE 

LIST (MODULO 8) 

PROTECTION KEY 

PROTECTION KEY MASK 

CHANNEL PROTECT KEY - 1 

2 

4 

START INPUT/OUTPUT FAILURE 

COUNT 

LENGTH OF CCW LIST (MODULO 

8) 

RELATIVE ORIGIN OF CCW LIST 

(MODULO 8) 

RELATIVE ORIGIN OF START 

CCW 

LENGTH OF DATA BUFFER 

(MODULO 8) 

RELATIVE ORIGIN OF DATA 

BUFFER (MODULO 8) 

ACTUAL PATH 

D/A CHAINING CHK RETRY CNTR 

MAG TAPE DATA CHK RE-READ 

RETRY CNTR 

D/A DATA CHK RETRY CNTR 

MAG TAPE BUS- OUT CHECK 

RETRY CNTR 

SYSTEM SYMBOLIC DEVICE 

ADDRESS 

DATA EXTENT BLOCK POINTER 

DATA EVENT CONTROL BLOCK 

POINTER 

VCON POINTER TO POSTING 

ROUTINE 

RCON POINTER TO POSTING 



230 CHAIOR 



(Listing of CHAIOR continued from page 230 > 



LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 


COMMENT 








* 






ROUTINE 


U4 


00028 




IORDT 


DS 


XL1 


DEVICE TYPE AND CODES 






O0OOOOFO 


IORDTM 


EQU 


X'FO' 


DEVICE TYPE MASK 






00000010 


IORDRM 


EQU 


X'10' 


PRINTER 






00000020 


IORDPM 


EQU 


X'20' 


PAPER TAPE 






00000030 


IORDCM 


EQU 


X'30' 


CARD READER/PUNCH 






00000040 


IORDMM 


EQU 


X^O' 


MAGNETIC TAPE 






00000050 


IORDAM 


EQU 


X'50' 


2321 DIR ACC DEVICE 






00000060 


IOR0 2M 


EQU 


X'60' 


2302 






00000070 


IOR11M 


EQU 


X'70' 


2311 






00000080 


IOR14 


EQU 


X'80' 


2314 






44 00028 


IORMD 


EQU 


IORDT 


MOVE DATA TO USER'S VIRTUAL 
MEMORY 






00000008 


IORMDM 


EQU 


X - 08 f 


MOVE DATA TO USER'S VIRTUAL 
MEMORY MASK 






44 00028 


IORCV 


EQU 


IORDT 


CODE CONVERSION REQUIRED 






00000004 


IORCVM 

* 


EQU 


X , 04' 


CODE CONVERSION REQUIRED 
MASK 






44 00028 


IORRV 

* 


EQU 


IORDT 


READ VARIABLE LENGTH DISK 
RECORDS 






00000002 


IORRVM 

* 


EQU 


X , 02 f 


READ VARIABLE LENGTH DISK 
RECORDS MASK 






44 00028 


IORCI 


EQU 


IORDT 


CONTROL ROUTINE IORCB 






00000001 


IORCIM 


EQU 


X'Ol* 


CONTROL ROUTINE IORCB MASK 


44 


00029 




IORDA6 


DS 


XL1 


D/A NO REC. FOUND ♦ MISS 
ADD MARK 


44 


0002A 


44 00028 


IORBB 

* 


DS 
|ORG| 


H 
IORDT 


LENGTH OF DATA BUFFER IN 
BYTES 


44 


00028 




IORVB 


DS 


F 


POINTER TO IORCB VIRTUAL 
MEMORY BUFFER 


44 


0002C 




IORBA 

* 


DS 


OF 

SS 
XL1 


WORD BOUNDARY ALIGNED LABEL 
FOR DATA BUFFER ADDRE 


44 


0002C 




IORCN 


DS 


CONDITION CODES 






44 0002C 


IORTO 


EQU 


IORCN 


CONDITION CODE FOR TIO 






00000030 


IORTOM 


EQU 


X'30' 


CONDITION CODE FOR TIO MASK 






44 0002C 


IORTC 


EQU 


IORCN 


CONDITION CODE FOR TCH 






oooooooc 


IORTCM 


EQU 


X'OC 


CONDITION CODE FOR TCH MASK 






44 0002C 


IORSO 


EQU 


IORCN 


CONDITION CODE FOR SIO OR 
HIO 






00000003 


IORSOM 


EQU 


X'03' 


CONDITION CODE FOR SIO OR 
HIO MASK 


44 


0002D 




IORDR 


DS 


XL3 


POINTER TO DATA BUFFER 
RESIDENT ADDRESS 


44 


00030 




IORSNS 

* 


DS 


0D 


SENSE BYTES 
6,0-7 


44 


00030 




IORSB0 


DS 


XL1 


SENSE BYTE 


44 


00031 




IORSB1 


DS 


XL1 


SENSE BYTE 1 


44 


00032 




IORSB2 


DS 


XL1 


SENSE BYTE 2 


44 


00033 




IORSB3 


DS 


XL1 


SENSE BYTE 3 


44 


00034 




IORSB4 


DS 


XL1 


SENSE BYTE 4 


44 


00035 




IORSB5 


DS 


XL1 


SENSE BYTE 5 


44 


00036 




IORSB6 


DS 


XL1 


SENSE BYTE 6 


44 


00037 




IORSB7 


DS 


XL1 


SENSE BYTE 7 


44 


00038 




IORSN 


DS 


XL1 


CONDITION CODES FROM SENSE 






00000030 


IORSDM 


EQU 


X'30' 


FOR TEST I/O 






OOOOOOOC 


IORSTM 


EQU 


X'OC 


FOR TEST CHANNEL 






00000003 


IORSSM 


EQU 


X f 03« 


FOR START I/O 


44 


00039 




IORSU 


DS 


XL2 


SENSE STATUS FIELD 


44 


0003B 




IORSL 


DS 


XL1 


SENSE FAILURE FLAGS 






44 0003B 


IORSM 

* 


EQU 


IORSL 


INTERRUPTS STORED FOR OTHER 
DEVICE FLAG 






00000080 


IORSMM 


EQU 


X'80' 


INTERRUPTS STORED FOR OTHER 
DEVICE MASK 


44 


0003C 




IORHF 


DS 


XL1 


HIO RETRY COUNT 


44 


0003D 




IORBY5 


DS 


XL1 


DIRECT ACCESS COUNTERS 






44 0003D 


IORDAA 


EQU 


IORBY5 


APPENDED' SEEK 'RETRY COUNTER 


(Listing 


Of CHAIOR 


continued 


on page 232) 





CHAIOR 231 



(Listing of CHAIOR continued from page 231) 





LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 






0000000F 


IORDMA 


EQU 


X f 0F f 




44 0003E 




IORBY6 


DS 


XL1 






44 0003E 


IORDCA 


EQU 


IORBY6 






OOOOOOCO 


IORXC0 


EQU 


X'CO' 






44 0003E 


IORDDA 


EQU 


IORBY6 






0000003F 


IORX3F 


EQU 


X f 3F - 




44 0003F 




IORDBA 


DS 


XL1 






000000FF 


IORXFF 


EQU 


X'FF' 




44 00040 




IORDA7 


DS 


XL1 




44 00041 




IORDA8 


DS 


XL1 




44 00042 




IORDA9 


DS 


XL1 




44 00043 




IORHE 


DS 


XL1 






00000080 


IORINBD 


EQU 


X , 80 f 






00000040 


IOROUTBD 


EQU 


X^O' 






00000007 


IORAPCNT 


EQU 


X'07' 






44 00043 


IOROPP 


EQU 


IORHE 






00000020 


IOROPPM 


EQU 


X f 20 f 






44 00043 


IOROPSK 


EQU 


IORHE 






00000010 


IOROPSKM 


EQU 


X'lO* 






44 00043 


IORMDS 


EQU 


IORHE 






00000008 


IORMDSM 


EQU 


x'os 1 






44 00043 


IORAPE 


EQU 


IORHE 






00000004 


IORAPEM 


EQU 


X'04 f 






44 00043 


IORCLE 


EQU 


IORHE 






00000002 


IORCLEM 


EQU 


X'02' 






44 00043 


IORDCDA 


EQU 


IORHE 






00000010 


IORDCDAM 


EQU 


X f 10' 






44 00043 


IORWTR 


EQU 


IORDCDA 






00000020 


IORWTRM 


EQU 


X^O' 






44 00043 


IORRDN 


EQU 


IORDCDA 






00000008 


IORRDNM 


EQU 


X f 08 t 




44 00044 




IORFL 


DS 


OF 




44 00044 




IORF1 


DS 


XL1 






44 00044 


IORSP 


EQU 


IORF1 






00000080 


IORSPM 


EQU 


X 9 B0 9 






44 00044 


IORIS 


EQU 


IORF1 






00000040 


IORISM 


EQU 


X f 40 f 






44 00044 


IORRS 


EQU 


IORF1 






00000020 


IORRSM 


EQU 


X 9 20* 






44 00044 


IORSC 


EQU 


IORF1 






00000010 


IORSCM 


EQU. 


X , 10 f 






44 00044 


IORER 


EQU 


IORF1 






00000008 


IORERM 


EQU 


x'os 1 






44 00044 


IORHI 


EQU 


IORFl 






00000004 


IORHIM 


EQU 


X , 04« 






44 00044 


IORUR 


EQU 


IORFl 






00000002 


IORURM 


EQU 


X , 02 t 






44 00044 


IORAT 


EQU 


IORFl 






00000001 


IORATM 


EQU 


X'Ol' 






44 00044 


IORUE 


EQU 


IORFl 




(Listing 


Of CHAIOR 


continued 


on page 233) 


232 CHAIOR 













COMMENT 

IORDAA MASK 

DIRECT ACCESS COUNTERS 

REISSUE ORIG' SEEK' RETRY CTR 

IORDCA MASK 

32 RETRIES CTR (2321) 

IORDDA MASK 

2321 'DATA CHK' MAX NO 

RETRY CTR 

IORDBA MASK AND CTR EQU 255 

(BITS 0-7) 

D/A BUS-OUT CHECK RETRY 

CNTR 

D/A CHANNEL DATA CHK RETRY 

CNTR 

D/A HOME ADDRESS RETRY 

COUNTER 

ALTERNATE PATH RETRY 

COUNTER 

INBOARD FAILURE MASK 

OUTBOARD FAILURE MASK 

ALTERNATE PATH RETRY 

COUNTER MASK 

TAPE-READ OPPOSITE 

N217.4 
N217.4 

TAPE-READ OPPOSITE WITH 
SKIP N217.4 
N217.4 
TAPE-MODE SET 

N217.4 
N217.4 
TAPE-CCW APPENDAGE 

N217.4 
N217.4 
TAPE-CLEANER ACTION 

N217.4 
N217.4 

D/A DATA CHECK FLAG 
D/A DATA CHECK MASK 
WRITE AFTER FAILING READ 
FLAG 

WRITE AFTER FAILING READ 
MASK 

READ WITH NO TRANSMIT FLAG 
READ WITH NO TRANSMIT MASK 
IORCB FLAGS 
IORCB FLAG BYTE 1 
SPECIFIC PATH 
SPECIFIC PATH MASK 
IGNORE SICK INDICATOR 
IGNORE SICK INDICATOR MASK 
REISSUE START INPUT/OUTPUT 
REISSUE START INPUT/OUTPUT 
MASK 

SOFTWARE COMMAND CHAIN 
SOFTWARE COMMAND CHAIN MASK 
ERROR RETRY 
ERROR RETRY MASK 
ISSUE HALT INPUT/OUTPUT 
ISSUE HALT INPUT/OUTPUT 
MASK 

ON UNIT CHECK READ R0 
ON UNIT CHECK READ R0 MASK 
ALTERNATE TRACK FLAG DIR 
ACCESS 
IORAT MASK 

UNIT EXCEPTION REQUIRED 
FLAG 



(Listing of CHAIOR continued from page 232) 



LOCATION INSTRUCTION SOURCE 


INST 


OPER 


00000001 


IORUEM 


EQU 


X'Ol 1 


44 00045 


IORF2 


DS 


XL1 


44 00045 


I ORES 


EQU 


IORF2 


00000080 


IORESM 


EQU 


X f 80 § 


44 00045 


IORNP 


EQU 


IORF2 


00000040 


IORNPM 


EQU 


X f 40 f 


44 00045 


IORWE 


EQU 


IORF2 


00000020 


IORWEM 


EQU 


X'20 - 


44 00045 


IORIB 


EQU 


IORF2 


00000010 


IORIBM 


EQU 


X'lO* 


44 00045 


IORBH 


EQU 


IORF2 


00000008 


IORBHM 


EQU 


x'os 1 


44 00045 


IORRB 


EQU 


IORF2 


00000004 


IORRBM 


EQU 


X'04' 


44 00045 


IORSB 


EQU 


IORF2 


00000002 


IORSBM 


EQU 


X'02 f 


44 00045 


IORCR 


EQU 


IORF2 


00000001 


IORCRM 


EQU 


X'01 1 


44 00046 


IORF4 


DS 


XL1 


44 00046 


IORIP 


EQU 


IORF4 


00000080 


IORIPM 


EQU 


x'so 1 


44 00046 


IORVT 


EQU 


IORF4 


00000040 


IORVTM 


EQU 


X^O* 


44 00046 


IORRD 


EQU 


IORF4 


00000020 


IORRDM 


EQU 


X , 20 f 


44 00046 


IORDS 


EQU 


IORF4 


00000010 


IORDSM 


EQU 


XUO' 


44 00046 


IORIC 


EQU 


IORF4 


00000008 


IORICM 


EQU 


x^os 1 


44 00046 


IORIOC 


EQU 


IORF4 


00000004 


IORIOM 


EQU 


X , 04' 


44 00046 


IORQI 

+ 


EQU 


IORF4 


00000002 


IORQIM 


EQU 


X , 02' 


44 00046 


IORAM 

* 


EQU 


IORF4 


00000001 


IORAMM 


EQU 


X'Ol' 


44 00047 


IORF5 


DS 


XL1 


44 00047 


IORGI 


EQU 


IORF5 


00000080 


IORGIM 


EQU 


X^O 1 


44 00047 


IOREC 


EQU 


IORF5 


00000040 


IORECM 


EQU 


X"40 f 


44 00047 


IORRM 


EQU 


IORF5 


00000020 


IORRMM 


EQU 


X^O 1 


44 00047 


IORFP 


EQU 


IORF5 


00000010 


IORFPM 


EQU 


X'10* 


44 00047 


IORFC 


EQU 


IORF5 


00000008 


IORFCM 


EQU 


x^s - 


44 00047 


IORBP 


EQU 


IORF5 


00000004 


IORBPM 


EQU 


X , 04 t 


44 00047 


IORVA 


EQU 


IORF5 


00000002 


IORVAM 


EQU 


X , 02 i 


44 00047 


I ORAL 

* 


EQU 


IORF5 


00000001 


* 
IORALM 


EQU 


X'Ol' 


(Listing of CHAIOR 


continued 


on page 234) 



COMMENT 

IORUE FLAG 

IORCB FLAG BYTE 2 

PCI EQUAL CHANNEL/DEVICE 

END FLAG 

PCI EQUAL CHANNEL/DEVICE 

END MASK 

NO PATH EXISTS FLAG 

NO PATH EXISTS MASK 

CCW SPECIFICATION ERROR 

FLAG 

CCW SPECIFICATION ERROR 

MASK 

SIO FAILED FLAG 

SIO FAILED MASK 

HIO FAILED 

HIO FAILED MASK 

READ R0 FAILED 

READ R0 FAILED MASK 

SENSE FAILED 

SENSE FAILED MASK 

CHANNEL COMMAND WORDS ARE 

RELOCATED 

CHANNEL COMMAND WORDS ARE 

RELOCATED MASK 

IORCB FLAG BYTE 3 

IORCB IS INTERCEPTED 

IORCB IS INTERCEPTED MASK 

SAVE RETRY COUNT 

SAVE RETRY COUNT MASK 

RESET DEVICE 

RESET DEVICE MASK 

RESET SUPPRESS FLAG Fl FLAG 

RESET SUPPRESS FLAG Fl MASK 

INTERRUPT CODE STORED FLAG 

INTERRUPT CODE STORED MASK 

IORCB CHAINING FLAG 

IORCB CHAINING MASK 

QUEUE CHANNEL INTERRUPT GQE 

FLAG 

QUEUE CHANNEL INTERRUPT GQE 

MASK 

DRUM REQUEST ACCESS METHOD 

FLAG 

DRUM REQUEST ACCESS METHOD 

MASK 

IORCB FLAG BYTE 5 

INCORRECT LENGTH IS AN 

ERROR FLG 

INCORRECT LENGTH IS AN 

ERROR MSK 

ERROR CHECK OCCURED 

ERROR CHECK OCCURED MASK 

MULTIPLE I/O RETURN FLAG 

MULTIPLE I/O RETURN MASK 

FORCE CE/DE/PCI ON FIRST 

SCC 

IOS FLAG TO INDICATE FORCE 
DE ON 1ST SCC 

LINE BEING PREPARED FLAG 

LINE BEING PREPARED MASK 

VSS I/O FLAG 

VSS I/O MASK 

USE ALTERNATE PATH AND 

DISABLE ACTUAL 

PATH TO DEVICE 

MASK 



CHAIOR 233 



(Listing of CHAIOR continued from page 233) 



LOCATION 
44 00048 
44 00048 
44 00049 
44 0004C 
44 0004D 



INSTRUCTION SOURCE INST OPER 



44 0004D 
00000080 
44 0004D 

00000040 
44 0004D 

00000020 

44 0004D 

00000010 
44 0004D 

00000008 



44 0004E 
44 00050 



44 01000 

44 01000 
44 01000 
44 01001 
44 01004 
44 01006 
44 01008 
44 01008 
44 01009 
44 0100C 
44 0100E 
44 01010 
44 01013 
44 01014 
44 01016 
44 01018 

44 01018 

44 0101A 

44 0101C 
44 0101D 
44 01020 

44 01020 

44 01022 

44 01024 
44 01025 
44 01028 
44 01028 
44 01029 
44 0102A 
44 0102C 
44 0102E 
44 01030 

44 01030 
44 01032 
44 01034 
(Listing 



00000050 
44 01000 

44 01000 



IORSNC 

IORSA 

IORSE 

IORSG 

IORF6 

IORPG 

IORPGM 

IORMC 

IORMCM 
IORDTSI 
* 
IORDTSIM 

IORP 

IORPM 
IORMOD 

IORMODM 

* 

IORSH 
IORFE 
IORFAS 

IORDB 

IORHA 

IORRHA 

IORRHO 

IORRHE 

IORRHF 

IORRHC 

IORRZA 

IORRZO 

IORRZE 

IORRZF 

IORRZC 

IORHAF 
IORHCC 
IORHHH 
IORDTA 

IORDCY 

* 

IORDHD 

* 

IORDRC 

IORATA 

IORACY 

* 

IORAHD 
IORARC 



IORSEK 
IORSER 
IORSEM 
IORSEB 
IORSEC 
lORSEH 
IORSCH 

IORSCY 
IORSRW 
IORSCR 
of CHAIOR continued 



DS 

DS 

DS 

DS 

DS 

EQU 

EQU 

EQU 

EQU 
EQU 

EQU 

EQU 

EQU 
EQU 

EQU 

DS 
DS 
EQU 
I ORG | 
DS 
EQU 
DS 
DS 
DS 
DS 
DS 
DS 
DS 
DS 
DS 
DS 
DS 
DS 
DS 
DS 
DS 

DS 

DS 

DS 
DS 
DS 

DS 

DS 

DS 
DS 
DS 
DS 
DS 
DS 
DS 
DS 
DS 

DS 
DS 
DS 
on pag 



0D 

XL1 

XL3 

XL1 

XL1 

IORF6 

X^O' 

IORF6 

X f 40" 
IORF6 

X , 20 i 

IORF6 

X^O" 
IORF6 

X^' 



H 

0D 

IORFE- IORBEG 

IORBEG+4096 

0D 

IORDB 

0D 

XL1 

XL3 

XL1 

H 

0D 

XL1 

XL3 

XL1 

H 

XL3 

XL1 

H 

H 

0D 



COMMENT 

SENSE COMMAND 

SENSE OP CODE 

SENSE ADDRESS 

SENSE FLAGS 

IORCB FLAG BYTE 6 

I/O OPERATION PURGED 

I/O OPERATION PURGED MASK 

EXTERNAL MACH CHECK ERROR 

FLAG 

MACH CHECK MASK 

TASK DELETED FLAG 

N405.1 
TASK DELETED MASK 

N405.1 
IF ON, LAST PCI 

N486 
N486 
MODE OF BULKIO OPERATION 

N486 
0=TIMER DRIVEN; 1=INTRPT 
DRIVEN N48 6 
SENSE COUNT 
END OF FIXED AREA 

FIXED AREA SIZE 



p 



H 

H 

XL1 
XL3 

0D 

H 



XL1 

XL3 

0D 

XL1 

XL1 

H 

H 

H 

0D 

H 
H 

XL1 
e 235> 



DATA BUFFER XSEE NOTE 1< 

READ flHOME ADDRESS ©STORAGE 

READ HA CCW 

OP CODE 

ADDRESS 

FLAGS 

COUNT 

READ RECORD ZERO CCW 

OP CODE 

ADDRESS 

FLAGS 

COUNT 

NOT USED 

•HOME ADDRESS' FLAG BYTE 

8 HOME ADDRESSS %CC< BYTES 

8HOME ADDRESS a %HH< BYTES 

DEFECTIVE TRK ADDR (R0 

COUNT AREA) 

DEFECTIVE TRK CYLINDER 

NO. (CO 

DEFECTIVE TRK R/W HEAD 

NO. (HH) 

DEFECTIVE TRK RECORD NO (R) 

NOT USED 

ALTERNATE TRK ADDR (R0 DATA 

AREA) 

ALTERNATE TRK CYLINDER 

NO. (CO 

ALTERNATE TRK R/W HEAD 

NO. (HH) 

ALTERNATE TRK RECORD NO (R) 

NOT USED 

SEEK ARGUMENT 

TRACK RECORD NO (R) 

EXTENT NO (M) 

BIN OR CELL NO. (BB) 

TRACK CYLINDER NO (CO 

TRACK R/W HEAD NO (HH) 

SEARCH ARG. OR NEXT I/O 

ADDR 

CYLINDER NO (CO 

TRACK R/W HEAD NO. (HH) 

TRACK RECORD NO (R) 



234 CHAIOR 



(Listing of CHAIOR continued from page 234) 



LOCATION INSTRUCTION SOURCE 



INST OPER 



44 01035 IORSKL DS XL1 

44 01036 IORDL DS H 

44 01038 IORBDB DS_ 0D 

44 01000 I ORG I IORDB 

* 

* 

* 

* 
* 

* 
* 
* 

* 
* 
* 

* 
* 

* 
* 



44 01000 
44 01006 
44 01007 
44 01008 

44 01008 
44 01009 
44 0100C 

44 0100E 



44 01008 



44 01010 
44 01011 
44 01012 
44 01013 
44 01014 

44 01015 
44 01016 

44 01017 

44 01018 

44 01019 
(Listing of 



IORJESNS 
IORJEFLG 

IORJECSW 

IORJECKY 
IORJECAD 
IORJECST 
IORJECCT 

* 

* 
* 
* 

IORJECT 
IORJECC 
IORJEIC 
IORJECD 
IORJELD 
IORJETO 

IORJEIR 
IORJEBO 

* 

IORJEDC 

IORJEOV 

IORJEIL 
CHAIOR continued 




XL6 

XL1 

XL1 

XL8 

IORJECSW 

XL1 

XL3 

XL2 

XL2 



44 01010 



EQU 

DS 

DS 

DS 

DS 

DS 

DS 
DS 

DS 

DS 



* 
X 
X 
X 
X 
X 

X 

X 

X 

X 



DS X 
on page 236) 



COMMENT 

KEY LENGTH 

DATA LENGTH 

START OF FIRST DATA BYTE 

THE FOLLOWING SECTION OF 

THE IORCB IS 

USED FOR f REMOTE JOB 

ENTRY' I/O ERROR 

RETRY INFORMATION, AND 

OCCUPIES THE AREA 

NORMALLY OCCUPIED BY THE 

DATA BUFFER 

INDIVIDUAL ERROR COUNTERS 

ARE INCLUDED 

FOR EACH I/O ERROR DEFINED 

AS RETRY ABLE. 

USE OF THESE ERROR 

COUNTERS MAY BE 

QUALIFIED AS TO TYPE OF 

CCW AND WHETHER 

THE SYSTEM IS RECEIVING OR 

TRANSMITTING 

DATA, THESE QUALIFICATIONS 

APPEAR IN THE 

COMMENTS FIELD AND OBSERVE 

THIS NOTATION 

ZZZ DS COUNT 

ZZZ (LC,M/N, M/N, . . . ) 

INDICATES THAT ERROR 

•ZZZ 1 OCCURRED UNDER 

SPECIFIED CONDITIONS 

WHERE: 

LC = LINE CONTROL 

M = R( RECEIVE MODE) OR 

M = T (TRANSMIT MODE) 

N = R(READ CCW) OR 

N = W (WRITE CCW) 

INITIAL ERROR SENSE DATA 

FLAGS (SEE BELOW) 

UNUSED 

INITIAL ERROR CSW 

PROTECTION KEY 

CCW ADDRESS +8 

CSW STATUS 

RESIDUAL BYTE COUNT 

THE FOLLOWING TWO 

SUBSECTIONS ARE 

ACCUMULATIVE ERROR RETRY 

COUNTERS 

INDICATING THE TOTAL 

NUMBER OF ERROR 

OCCURRANCES PER IORCB 

CHANNEL CONTROL BLOCK 
INTERFACE CONTROL CHECK 
CHANNEL DATA CHECK 
UNIT CHECK/LOST DATA (R/R) 
UNIT CHECK/TIME OUT 
(R/R,T/R) 

UNIT CHECK INTERVENTION REQ 
UNIT CHECK/BUS OUT CHECK 
(LC f R/W f T/W) 
UNIT CHECK/ DATA CHECK 
(R/R) 

UNIT CHECK/OVERRUN 
(R/R) 
INCORRECR LENGTH (R/R,T/R) 



CHAIOR 235 



(Listing of CHAIOR continued from page 235) 





LOCATION INSTRUCTION SOURCE 


INST 


OPER 


COMMENT 








* 






THE FOLLOWING ERRORS 








* 






SHOULD NOT OCCUR 




44 


0101A 


IORJENEC 


DS 


X 


UNIT CHECK/EQUIPMENT CHECK 




44 


0101B 


IORJENLD 

* 


DS 


X 


UNIT CHECK/LOST DATA 
(R/W,T/R f T/W) 




44 


0101C 


IORJENTO 


DS 


X 


UNIT CHECK/TIME OUT 
(LC f R/W f T/W) 




44 


0101D 


IORJENBO 


DS 


X 


UNIT CHECK/BUS OUT 
CHECK (R/R, T/R) 




44 


0101E 


IORJENDC 

* 


DS 


X 


UNIT CHECK/DATA CHECK 
(LC,R/W,T/R,T/W) 




44 


0101F 


IORJENOV 

* 


DS 


X 


UNIT CHECK/OVERRUN 
(LC,R/W,T/R # T/W) 




44 


01020 


IORJENCR 


DS 


X 


UNIT CHECK/COMMAND REJECT 




44 


01021 


IORJENCC 


DS 


X 


CHAINING CHECK 




44 


01022 


IORJENGC 


DS 


X 


PROGRAM CHECK 




44 


01023 


IORJENTC 


DS 


X 


PROTECTION CHECK 




44 


01024 


IORJENUE 


DS 


X 


UNIT EXCEPTION 
(LC,R/W,T/W) 




44 


01025 


IORJENIL 

* 


DS 


X 


INCORRECT LENGTH 
(LC,R/W,T/W) 




44 


01026 


IORJENBY 


DS 


X 


BUSY 




44 


01027 


IORJENAT 


DS 


X 


ATTENTION 




44 


01028 


IORJENSM 


DS 


X 


STATUS MODIFIER 






44 01029 


lORJEND 

* 
* 

* 
* 


EQU 


* 


THE FOLLOWING TWO 

SUBSECTIONS ARE ERROR 

RETRY COUNTERS RECORDING 

THE NUMBER OF 

ERROR OCCURRANCES IN THE 

CURRENT 

INTERMITTANT I/O ERROR 

RETRY SEQUENCE 






44 01029 


IORRJCT 


EQU 


♦ 






44 


01029 


IORRJCD 


DS 


X 


CHANNEL DATA CHECK 




44 


0102A 


IORRJLD 


DS 


X 


UNIT CHECK LOST DATA 




44 


0102B 


IORRJTO 


DS 


X 


UNIT CHECK/TIME OUT 
(R/R f T/R) 




44 


0102C 


IORRJIR 


DS 


X 


UNIT CHECK INTERNENTION REQ 




44 


0102D 


IORRJBO 

* 


DS 


X 


UNIT CHECK/BUS OUT CHECK 
(LC # R/W,T/W) 




44 


0102E 


IORRJDC 


DS 


X 


UNIT CHECK/DATA CHECK 
(R/R) 




44 


0102F 


IORRJOV 

* 


DS 


X 


UNIT CHECK/OVERRUN 
(R/R) 




44 


01030 


lORRJIL 

* 


DS 


X 


INCORRECT LENGTH 
THE FOLLOWING ERRORS 
SHOULD NOT OCCUR 






44 01031 


IORRJNCT 


EQU 


* 






44 


01031 


IORRJNEC 


DS 


X 


UNIT CHECK/EQUIPMENT CHECK 




44 


01032 


IORRJNLD 


DS 


X 


UNIT CHECK/LOST DATA 
(R/W,T/R,T/W) 




44 


01033 


IORRJNTO 


DS 


X 


UNIT CHECK/TIME OUT 
(LC f R/W,T/W) 




44 


01034 


IORRJNBO 

* 


DS 


X 


UNIT CHECK/BUS OUT CHECK 
(R/R, T/R) 




44 


01035 


IORRJNDC 

* 


DS 


X 


UNIT CHECK/DATA CHECK 
(R/W,T/R,T/W) 




44 


01036 


IORRJNOV 

* 


DS 


X 


UNIT CHECK/OVERRUN 
(LC,R/W,T/R,T/W) 




44 


01037 


IORRJNCR 


DS 


X 


UNIT CHECK/COMMAND REJECT 




44 


01038 


IORRJNCC 


DS 


X 


CHAINING CHECK 




44 


01039 


IORRJNGC 


DS 


X 


PROGRAM CHECK 




44 


0103A 


IORRJNTC 


DS 


X 


PROTECTION CHECK 




44 


0103B 


IORRJNUE 

* 


DS 


X 


UNIT EXCEPTION 
(LC,R/W,T/W) 




44 


0103C 


IORRJNIL 


DS 


X 


INCORRECT LENGTH 
(LC,R/W,T/W) 




(Listing of CHAIOR 


continued < 


on page 237) 
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p 



(Listing of CHAIOR continued from page 236) 



LOCATION 
44 0103D 
44 0103E 
44 0103F 

44 01040 
44 01040 

44 01080 
44 01080 



INSTRUCTION SOURCE INST OPER 



44 01040 



00000084 
00000011 



00000019 

00000017 

44 01006 
00000080 
44 01006 

00000040 

44 01006 

00000020 

44 01006 
00000010 
44 01006 
00000008 
44 01006 

00000004 
44 01006 

00000002 



44 01084 



44 02000 
44 02000 
44 02003 



00000114 
00000023 
44 02000 
44 02000 



44 02003 
00000080 
44 02003 

00000020 



44 02004 
44 02005 
( Listing 



IORRJNBY DS 
IORRJNAT DS 
IORRJNSM DS 
IORRJND EQU 

DS 
IORJESAV DS 
# 

DS 
IORJEFCE DS 



X 
X 
X 

* 
OF 



COMMENT 
BUSY 

ATTENTION 
STATUS MODIFIER 



PREVIOUS ERROR 



XL ( IORRJND- IORJESNS ) 
SAVE AREA 

OF 

XL4 FARTHEST CCW EXECUTED 
NOTE: RETRY THRESHOLD VALUES IN THE RJE AND 
SDT TABLES MUST 



* 
* 
* 

* 

# 

IORJESZ 

IORJDSZ 

IORJELN 

* 

IORRJLN 

IORJESN EQU 
IORJESNM EQU 
IORJEWE EQU 

IORJEWEM EQU 



IORJEOC 

* 

IORJEOCM 

♦ 

IORJEOT EQU 

IORJEOTM EQU 

IORJEDB EQU 

IORJEDBM EQU 

IORJEAN EQU 

IORJEANM EQU 
IORTAB EQU 

IORTABM EQU 

IORTBR DS 

IORJTSZ EQU 

IORJTDSZ EQU 

* 



HAVE A ONE-TO ONE CORRESPONDENCE WITH 

THE 'SHOULD OCCUR' 

ERROR RETRY COUNTERS AT IORRJCT. ONE 

RETRY THRESHOLD 

WILL EXIST IN THOSE TABLES FOR 'SHOULD 

NOT OCCUR ERRORS 1 

LENGTH DATA FOR ABOVE 
SECTION OF IORCB 
♦-IORJESNS BYTE LENGTH 
(IORJESZ+7)/8 DOUBLE WORD LENGTH 
ROUNDED UP TO 
DOUBLE WORD BOUNDARY 
IORJEND-IORJECT BYTE LENGTH OF 

SECTION 1 
IORRJND- IORRJCT BYTE LENGTH OF 

SECTION 2 
IORJEFLG ERROR SHOULD NOT OCCUR FLAG 
X'80 f ERROR SHOULD NOT OCCUR MASK 
IORJEFLG ERROR OCCURRED ON WRITE ENQ 

FLAG 
X^O" ERROR OCCURRED ON WRITE ENQ 

MASK 
IORJEFLG ONE CARD READ INTO BUFFER 
FLAG 
EQU X^O' ONE CARD READ INTO BUFFER 
MASK 

IO ERROR ON WR EOT 
IORJEOT MASK 
DISREGARD PREVIOUS BUFFER 



EQU 

EQU 



EQU 
EQU 



EQU 



IORPL 

IORPN 

IORPF 
IORAG 
IORAGM 
IORPS 

* 
IORPSM 

# 

IORCA 



1 QRG 1 

DS 
t ORG l 

DS 

DS 

EQU 
EQU 
EQU 

EQU 

DS 
DS 



IORJEFLG 

X^O' 

IORJEFLG 

x'os 1 

IORJEFLG 



EOT WRITTEN AFTER SOLID RD 
NAK ERROR 



X t 04 t 
IORJEFLG 



TAB RECORD FLAG 
N412.2 
X , 02 f TAB RECORD MASK 

N412.2 
XL144 RJE PRINTER TAB RECORD 

N412.2 
♦-IORJESNS TOTAL BUFFER LENGTH 

N412.2 
(IORJTSZ+7)/8 TOTAL DOUBLEWORD 

BUFFER LNG N412.2 
IORBEG 4-8192 



D 

IORPL 

XL3 

XL1 
IORPF 
X'80' 
IORPF 

X^O 1 

XL1 
XL3 



PAGE LIST (SEE NOTE 2) 

HIGH ORDER 20 BITS OF 

VIRTUAL ADDRESS 

PAGE LIST FLAGS 

ANY PAGE 

ANY PAGE MASK 

SHARED PAGE FLAG 

N405.1 
SHARED PAGE MASK 

N405.1 
NOT USED 
CORE LOCATION OF VIRTUAL 



of CHAIOR continued on page 238) 
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(Listing of CHAIOR continued from page 237) 



LOCATION INSTRUCTION 
44 03000 



44 03000 



SOURCE 

* 

IORCW 



INST OPER 



COMMENT 



BUFFER PAGES 
IORBEG+12288 



CHANNEL COMMAND WORD LIST 
(SEE NOTE 3) 



44 03000 



44 03000 
44 03001 

44 03002 
44 03002 



44 03002 
00000080 
0000000F 



44 03003 
44 03004 



44 03004 
00000080 
44 03004 
00000040 
44 03004 
00000020 

44 03004 
00000010 
44 03004 

00000008 



IOROP 

IORPP 

* 

IORFD 

IORFDA 

* 

IORF0 

IORF0M 

IORFDM 

IORFDB 

IORCF 

IORCD 

IORCDM 

IORCO 

IORCOM 

IORSI 

IORSIM 

# 

IORSK 

IORSKM 

IORPC 

* 

IORPCM 



IORCW 

XL1 

XL1 



44 03005 
44 03006 



OPERATION CODE 
POSITION OF PAGE LIST ENTRY 
(MODULO 8) 
OH FLAGS AND DISPLACEMENT 
XL1 FLAGS AND HI ORDER 4 BITS 

OF DISPLACEMENT 
IORFDA INHIBIT RELOCATION OF CCW 

ADDRESS FLAG 
X , 80 i INHIBIT RELOCATION OF CCW 

ADDRESS MASK 
X'OF' DISPLACEMENT MASK - 4 HI 

ORDER BITS 
XL1 DISPLACEMENT- LOW ORDER 8 

BITS 
XL1 CHANNEL COMMAND WORD FLAGS 
IORCF CHAIN DATA 
X^O' CHAIN DATA MASK 
IORCF CHAIN COMMAND 
X'40" CHAIN COMMAND MASK 
IORCF SUPPRESS INCORRECT LENGTH 
X^O' SUPPRESS INCORRECT LENGTH 

MASK 
IORCF SKIP 
X , 10 f SKIP MASK 
IORCF PROGRAM CONTROLLED 

INTERRUPTION 
X^S' PROGRAM CONTROLLED 

INTERRUPTION MASK 
XL1 THIS BYTE AND PRECEDING 3 

BITS MUST=0 
H BYTE COUNT 

NOTE 1- THE DATA BUFFER IS VARIABLE IN LENGTH AND 
MUST BE ADDRESSED 

USING THE CONTENTS OF THE IORBS FIELD AS 
A BASE ADDRESS. THE 

EXTENT (IN DOUBLE WORDS) OF THE DATA 
BUFFER IS SPECIFIED BY 

THE CONTENTS OF THE FIELD LABELED IORBL. 
NOTE 2- THE PAGE LIST IS VARIABLE IN LENGTH 
(MAXIMUM SIZE = 8 DOUBLE 

WORDS) AND MUST BE ADDRESSED USING THE 
CONTENTS OF THE IORPO 

FIELD AS A BASE ADDRESS. THE EXTENT (IN 
DOUBLE WORDS) OF THE 



DS 

DS 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 
EQU 
EQU 

EQU 

DS 

DS 



IORCT 

* 
* 
* 
* 
* 

* 
* 
* 
* 

* 

* NOTE 

* IN LENGTH AND MUST 

* BE ADDRESSED USING THE CONTENTS OF THE 

* FIELD LABELED IORCS AS 

* A BASE ADDRESS. THE EXTENT (IN DOUBLE 

* WORDS) OF THE CHANNEL 

* COMMAND WORD LIST IS SPECIFIED BY THE 

* CONTENTS OF THE FIELD 

* LABELED IORCL. 



PAGE LIST IS SPECIFIED BY THE CONTENTS OF 
THE FIELD LABELED 

IORGL. 
3- THE CHANNEL COMMAND WORD LIST IS VARIABLE 
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Interrupt Queue Entry (CHAIQE) 

The Interrupt Queue Entry (IQE) contains interrupt data from the VPSW and sense 
and status data from the ISA that is required by the Task Monitor's Scanner- 
Dispatcher. Some IQE data is moved to a user-defined communications area (COW) for 
analysis of conditions and status at interrupt time. 

The IQE is built by the Queue LE routine in the Task Monitor for each interrupt. 
The IQE is queued on the Interrupt Request Entry (IRE) for that type of interrupt. 
The IQE occupies 32 bytes of virtual storage, aligned on doubleword boundaries. 

CHAIQE Storage map 



DEC 




HEX 




| IQEID 


(IQELE 


(UNNAMED | 
I 1 


IQEFPR | 




IQEBPR 


1 IQEDET | 
1 1 








IQEOVY 





ORG 


IQEOVY 


13 


D 


16 


101 

L 


24 


18| 

1. 


ORG 


IQEOVY 


13 


D 


16 


10! 



| UNNAMED | 

I L 



IQEINT 



IQEPSW 



± 



IQEPIM 



UNNAMED 



I UNNAMED 



± 



IQESVC 



UNNAMED 



UNNAMED 



ORG IQEOVY 



13 
16 



D 






| IQEXML | 
1 1 


IQEXMN | 


10| 

1 


IQEMSG 


1 

1 






1 

1 




UNNAMED 





ORG IQEOVY 



13 
16 

24 



D 




1 

1 


UNNAMED 


| IQEASI | 
1 1 


10| 

1 


IQESNS 


1 

1 


UNNAMED 




18| 
1 


IQEATM 


1 
1 


UNNAMED 





(CHAIQE continued on page 240 > 



CHAIQE 239 



DEC 
ORG 


HEX 
IQEOVY 


13 


D 


16 


101 



ORG IQEOVY 



13 
16 



D 
101 



ORG IQEOVY 



CCHAIQE continued from page 239) 



| IQETIM | 



IQETNO 



UNNAMED 



UNNAMED 



UNNAMED 



(UNNAMED | 
J L 



IQESTA 



UNNAMED 



13 


D 




| UNNAMED | 
i I 


16 


10 1 
i 


IQEVAD 


| IQERAD | 
I 1 


24 


18| 

1 


IQEGRO 


| IQEGR1 I 
1 1 



Fields in CHAIQE — by displacement 

DEC HEX FIELD DEC HEX FIELD 

0000 0000 IQEID 0014 000E IQESTA 

0002 0002 IQELE 0014 000E IQETNO 

0004 0004 IQEFPR 0014 000E IQEXMN 

0008 0008 IQEBPR 0014 000E IQESVC 

0012 000C IQEDET 0014 000E IQEINT 

0013 000D IQETIM 0015 000F IQEASI 
0013 000D IQEXML 0016 0010 IQEVAD 
0013 000D IQEOVY 0016 0010 IQESNS 

Alphabetical list of fields in CHAIQE 



FIELD 

IQEASI 

IQEATM 

IQEBPR 

IQEDET 

IQEFPR 

IQEGRO 

IQEGR1 

IQEID 



DEC HEX 
0015 000F 
0024 0018 
0008 0008 
0012 000C 
0004 0004 
0024 0018 
0028 001C 
0000 0000 



FIELD 

IQEINT 

IQELE 

IQEMSG 

IQEOVY 

IQEPIM 

IQEPSW 

IQERAD 

IQESNS 



DEC 

0014 

0002 

0016 

0013 

0020 

0016 

0020 

0016 



HEX 

OOOE 

0002 

0010 

000D 

0014 

0010 

0014 

0010 



Assembler listing of CHAIQE 



LOCATION INSTRUCTION SOURCE 
45 00000 CHAIQE 



INST OPER 
DSECT 



45 00000 

45 00000 
45 00002 

45 00003 
45 00004 
45 00008 
45 0000C 
(Listing 



IQEID 
IQELE 
000000D3 IQELEC 

IQEFPR 
IQEBPR 
IQEDET 
of CHAIQE continued 



DS 

DS 

DS 

EQU 

DS 

DS 

DS 

DS 



OD 

CL2 

CL1 

C , L i 

CL1 

F 

F 

CL1 



DEC 


HEX 


FIELD 


0016 


0010 


IQEMSG 


0016 


0010 


IQEPSW 


0020 


0014 


IQERAD 


0020 


0014 


IQEPIM 


0024 


0018 


IQEGRO 


0024 


0018 


IQEATM 


0028 


001C 


IQEGR1 



FIELD 


DEC 


HEX 


IQESTA 


0014 


OOOE 


IQESVC 


0014 


OOOE 


IQETIM 


0013 


OOOD 


IQETNO 


0014 


OOOE 


IQEVAD 


0016 


0010 


IQEXML 


0013 


OOOD 


IQEXMN 


0014 


OOOE 



COMMENT 

INTERRUPT QUEUE ENTRY 

COMMONLY USED PORTIONS OF QE 

ID EQUALS QE 

CODE FOR LE TYPE QE 

LE TYPE CODE 

UNUSED 

FORWARD POINTER 

BACKWARD POINTER 

DE TYPE CODE 



on page 241) 
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(Listing of CHAIQE continued from page 240) 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 


COMMENT 






00000000 


IQEDEP 


EQU 


X'00 f 


PROGRAM 






00000001 


IQEDES 


EQU 


X'01' 


SVC 






00000002 


IQEDEX 


EQU 


X'02 f 


EXTERNAL 






00000003 


IQEDEA 


EQU 


X'03' 


ASYNCHRONOUS 






00000004 


IQEDTT 


EQU 


X , 04 i 


TIMER 






00000005 


IQEDEI 


EQU 


x'os* 


SYNCHRONOUS 


45 


0000D 






IQEOVY 


DS 


CL19 


OVERLAID FIELDS FOR VARIOUS 
INT. TYPES 






45 


OOOOD 




|ORG| 


IQEOVY 












* FIELDS 


USED 


FOR PROGRAM INTERRUPTS 


45 


0000D 








DS 


CL1 


UNUSED 


45 


0000E 






IQEINT 


DS 


CL2 


INTERRUPT CODEFROM VPSW 


45 


00010 






IQEPSW 


DS 


F 


ADDR IN VPSW AT INTERRUPT 


45 


00014 






IQEPIM 


DS 


F 


PROGRAM INTERRUPT MASK 


45 


00018 








DS 


CL8 


UNUSED 






45 


OOOOD 




|ORG| 


IQEOVY 












* FIELDS 


USED 


FOR SVC INTER9UPTS 


45 


0000D 








DS 


CL1 


UNUSED 


45 


0000E 






IQESVC 


DS 


CL2 


SVC INTEGER FROM VPSW 


45 


00010 








DS 


F 


VPSW ADDR - USES IQEPSW 


45 


00014 








DS 


CL12 


UNUSED 






45 


OOOOD 




|ORG| 


IQEOVY 












* FIELDS 


USED 


FOR EXTERNAL INTERRUPTS 


45 


0000D 






IQEXML 


DS 


CL1 


MESSAGE LENGTH 


45 


0O00E 






IQEXMN 


DS 


CL2 


MESSAGE NUMBER 


45 


00010 






IQEMSG 


DS 


F 


PTR TO MESSAGE AREA 


45 


00014 








DS 


CL12 


UNUSED 






45 


OOOOD 




|ORG| 


IQEOVY 












* FIELDS 


USED 


FOR ASYNCHRONOUS INTERRUPTS 


45 


OOOOD 








DS 


CL2 


UNUSED 


45 


0000F 






IQEASI 


DS 


CL1 


TYPE CODE FO-9 ASYNCHRONOUS 






00000005 


IQEATC 


EQU 


X , 05 t 


ATTENTION KEY 


45 


00010 






IQESNS 


DS 


F 


SENSE INFO 


45 


00014 








DS 


F 


UNUSED 


45 


00018 






IQEATM 


DS 


F 


ATTENTION TYPE MASK 






00000001 


IQEANM 


EQU 


X^Ol' 


ATTENTION KEY MASK 


45 


0001C 








DS 


CL4 


UNUSED 






45 


OOOOD 




IORG| 


IQEOVY 












* FIELDS 


USED 


FOR TIMER 


INTERRUPTS 


45 


OOOOD 






IQETIM 


DS 


CL1 


TIMER TYPE - TASK OR REAL 






O0O0OOD9 


IQETMR 


EQU 


C f R f 


REAL TIMER 






00000OE3 


IQETMT 


EQU 


c i T t 


TASK TIMER 


45 


OOOOE 






IQETNO 


DS 


CL2 


TIMER NUMBER 


45 


00010 








DS 


F 


VPSW ADDR - USES IQEPSW 


45 


00014 








DS 


CL12 


UNUSED 






45 


OOOOD 




[ORG J 


IQEOVY 












* FIELDS 


USED 


FOR SYNCHRONOUS INTERRUPTS 


45 


OOOOD 








DS 


CL1 


UNUSED 


45 


OOOOE 






IQESTA 


DS 


CL2 


CSW STATUS INFORMATION 


45 


00010 








DS 


F 


SENSE INFO - USES IQESNS 


45 


00014 








DS 


CL12 


UNUSED 






45 


OOOOD 


* 


10RGI 


IQEOVY 


FIELDS USED FOR LE TYPE QE'S 


45 


OOOOD 








DS 


CL3 


UNUSED 


45 


00010 






IQEVAD 


DS 


F 


VCON FOR LE 


45 


00014 






IQERAD 


DS 


F 


RCON FOR LE 


45 


00018 






IQEGRO 


DS 


F 


INFO FOR REG 


45 


0001C 






IQEGR1 


DS 


F 


INFO FOR REG 1 
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Interrupt Request Entry (CHAIRE> 



The Interrupt Request Entry CIRE) describes the priority status, and mode of 
operation for the routine specified in its Interrupt Control Block (ICB) . 

The IRE is built by the Specify Interrupt Routine (SIR) in the Task Monitor • It 
is deleted by the Delete Interrupt Routine (DIR). 

An IRE is built each time an ICB is made available to the system via a SIR macro 
instruction; it is then queued on the appropriate Interrupt Device Entry (IDE) in the 
Task Monitor's Interrupt Table (CHBITB) . 
The IRE occupies 32 bytes of virtual storage, aligned on doubleword boundaries. 



p 



CHAIRE Storage map 



DEC 



8 
16 
24 



HEX 

Of 



81 



101 



18 1 



IREID 



| IRELE | IREACT 



IREBPR 



IREPDS 



IREICB 



IREFPR 



IREAPR 



IREQEP 



IREINS | IREDLT | IREINH | IREPRY 



Fields in CHAIRE — by displacement 



DEC HEX FIELD 
0000 0000 IREID 

0002 0002 IRELE 

0003 0003 IREACT 

0004 0004 IREFPR 
0008 0008 IREBPR 



DEC 


HEX 


FIELD 


DEC 


HEX 


FIELD. 


0012 


oooc 


IREAPR 


0029 


001D 


IREDLT 


0016 


0010 


IREPDS 


0030 


001E 


IREINH 


0020 


0014 


IREQEP 


0031 


001F 


IREPRY 


0024 


0018 


IREICB 









0028 001C IREINS 



Alphabetical list of fields in CHAIRE 



FIELD 


DEC HEX 


FIELD 


DEC HEX 


IREACT 


0003 0003 


IREICB 


0024 0018 


IREAPR 


0012 OOOC 


IREID 


0000 0000 


IREBPR 


0008 0008 


IREINH 


0030 001E 


IREDLT 


0029 001D 


IREINS 


0028 001C 


IREFPR 


0004 0004 


IRELE 


0002 0002 


.stinq of 


CHAIRE 


SOURCE 


INST 




LOCATION 


INSTRUCTION 


C OPER 




46 00000 


CHAIRE 


DSECT 


46 00000 






DS 


0D 


46 00000 




IREID 


DS 


CL2 


46 00002 




IRELE 


DS 


CL1 




000000D3 


IRELEC 


EQU 


C^' 


46 00003 




IREACT 


DS 


CL1 




000000C1 


IREACC 


EQU 


C^' 


46 00004 




IREFPR 


DS 


F 


46 00008 




IREBPR 


DS 


F 


46 0000C 




IREAPR 


DS 


F 


46 00010 




IREPDS 


DS 


F 


46 00014 




IREQEP 


DS 


F 


46 00018 




IREICB 


DS 


F 


46 0001C 




IREINS 


DS 


CL1 




00000001 


IREINC 


EQU 


X f 01 f 


46 0001D 




IREDLT 


DS 


CL1 




00O0OOC4 


IREDLC 


EQU 


C'D' 


46 0001E 




IREINH 


DS 


CL1 




00000001 


IREPRV 


EQU 


X'01' 




00000000 


IRENPR 


EQU 


X , 00 t 




00000000 


IREENA 


EQU 


X f 00' 




00000010 


IREDIS 


EQU 


X'lO' 


46 0001F 




IREPRY 


DS 


CL1 



FIELD DEC HEX 

IREPDS 0016 0010 

IREPRY 0031 001F 

IREQEP 0020 0014 



COMMENT 
START DSECT 

ID = 'RE 1 

LE CODE INDICATOR 

CODE FOR REL 

ACTIVITY CODE 

ACTIVE INDICATOR 

FORWARD PTR 

BACKWARD PTR 

ACTIVE PTR TO A LOWER 

PRIORITY 

PTR TO PUSHDOWN SAVE AREA 

PTR TO FIRST QE 

PTR TO ICB 

INSERT CODE 

INSERTED 

DELETE CODE 

DELETED 

P-NP INHIBIT SWITCH 

PRIVILEGED 

NON- PRIVILEGED 

INTERRUPTS ENABLED 

INTERRUPTS DISABLED 

PRIORITY 
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Interrupt Storage Area (CHAISA) 

The Interrupt Storage Area (ISA) , a prefixed storage area for virtual storage, 
serves as a virtual storage holding area during task interrupts. 

The ISA includes a set of old and new Virtual Program Status W Drds (VPSW) for all 
presently defined task interrupts. The ISA also contains space to save general pur- 
pose registers, floating point registers, channel status word, sense data, constants, 
and flags used by virtual storage programs. 

The ISA page (4096 bytes) is located at segment zero, page zero of virtual 
storage, and is aligned on doubleword boundaries. 

CHAISA Storage map 



DEC 





HEX 




48 


30 


56 


38 


64 


40 



1560 
1568 



1648 
1656 



1680 



618 
620 



1600 


640 


1608 


648 


1616 


650 



670 
678 



690 



= 




UNNAMED 








= 


| ISASNS | 


| ISACSW | 


= 




RESERVED 








= 


| ISAPIF | ISAPIC 
I i 


1 

I 




ISAPICT 






| ISAPI13 




i 
» 






- 








ISAPI14 




| ISAORP 1 


| ISAORV 




1 
1 




ISAORE 






I ISARS | 


| ISAOV | 


| ISAVS | 


(ISADTY (UNNAMED |ISAF5 
f 1 1 


|ISAU1 | 
i 1 


ISARS P 


1 
I 


ISARTN 
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DEC 
1688 



1712 
1720 
1728 



HEX 



CCHAISA continued from page 243) 



1760 
1768 
1776 
1784 

1800 



1832 

1840 
1848 
1856 
1864 
1872 
1880 
1888 
1896 
1904 

1920 



698 


ISALOG | 


6B0 


I SAMS A 




UNNAMED | 


6B8 


ISASOF | ISASOC 
1 




XSASOI | 


6C0 


ISAS13 










ISAS14 




6E0 


UNNAMED 




ISA113 | 


6E8 


ISA1SA 




ISA114 | 


6F0 


ISA115 




ISA10 | 


6F8 


IS All 










ISA12 




708 


ISA15 I 


728 


ISAPSF | UNNAMED 
I 


1 
I 


UNNAMED | 


730 


ISAIOP | 


738 


ISA1F0 | 


740 


ISA1F2 | 


748 


ISA1F4 | 


750 


ISA1F6 | 


758 


| UNNAMED 




ISA213 I 


760 


ISA2SA 




ISA214 | 


768 


| ISA215 




ISA20 | 


770 


ISA21 










ISA22 




780 


ISA25 | 
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DEC 
1952 

1960 

1968 

1976 

1984 

1992 

2000 

2008 

2016 

2024 

2032 

2040 

2048 

2056 

2064 

2072 

2080 

2088 

2096 

2104 

2112 

2120 

2128 

2136 

2144 

2152 

2160 

2168 

2176 



HEX 



7A0| 








UNNAMED | 


7A8 | ISA20P | 


7B0| 








ISA2F0 I 


7B8( 








ISA2F2 | 


7C0| 








ISA2F4 | 


7C8| 








ISA2F6 | 


7D0 [ ISAPT 


| ISACP | I SAIN 
[ I 


| ISAIC | 
1 1 


7D8| 








ISAOS | 


7E0[ 








ISAOX | 


7E8| 








ISAOA | 


7F0| 








ISAOT I 


7F8 1 








ISAOI | 


800| 








ISANP | 


808 I 








ISANS | 


810| 








ISANX | 


818 | 








ISANA | 


820| 








ISANT | 


828 | 








ISANI J 


830| 








ISANR | 


838) 








ISANV | 


840| 




ISAPP3 




|ISAF1 (ISAABN |ISAF3 |ISAF4 | 
I 1 1 1 i 


848 | 




ISAVMP 




| ISANAS | UNNAMED | 
I 1 1 


850| 




ISATDT 




(ISAFA |ISAFB | ISAVLKCT| ISAVLK [ 

t 1 1 1 1 


858] ISASPN 


|ISAP3 

1 


1ISAP1 | UNNAMED | 
1 t 1 


860) 








ISACVP | 


868) 




ISATDY 




| ISASDS | 
i 1 


870) 




ISASLP 




| ISAJLC | 
» 1 


878 | ISAUTH 


(ISAEF |ISALCK 
1 1 


(ISAVAR | 1SATMP | 
i I I 


880| 








ISARCB 
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DEC 


HEX 






















ORG 


ISASNS 






















48 


30|ISASN1 
i I 










UNNAMEE 


> 






i 
I 


ORG 


ISASNS 






















48 


30JISASN2 
I I 










UNUSED 








1 
I 


ORG 


ISACSW 






















56 


38 | ISAKEY 

1 ! 


ISAF10 


i : 


CSARCL 


| ISAIC1 
1 


| ISAIC2 | 
i I 




ISACNT 


1 
I 


ORG 


ISAS14 
6C4 






















1732 




ISAS14R 




1 
1 


1736 


6C8| 

1 




ISAS15R 








ISASOR 




i 
I 


1744 


6D0| 

1 




ISAS1R 








ISAS2R 




i 
1 


1752 


6D8| 

1 




ISAS3R 








ISAS4R 




i 

I 


Fields 


in CHAISA 


— by displacement 


















DEC 
0048 


HEX 
0030 


FIELD 
ISASN2 




DEC 
1600 


HEX 
0640 


FIELD 
ISAORP 


DEC 
1772 


HEX 
06EC 


FIELD 
IS AIR 






0048 


0030 


ISASN1 




1600 


0640 


ISAOR 


1776 


06F0 


ISA115 






0048 


0030 


ISAN28 


(EQU) 


1608 


0648 


ISAORV 


1780 


06F4 


ISA10 






0048 


0030 


ISAN27 


(EQU) 


1612 


064C 


ISAORE 


1784 


06F8 


ISA11 






0048 


0030 


ISAN26 


(EQU) 


1616 


0650 


ISARS 


1788 


06FC 


ISA12 






0048 


0030 


ISAN25 


(EQU) 


1648 


0670 


ISAOV 


1800 


0708 


ISA15 






0048 


0030 


ISAN24 


(EQU) 


1656 


0678 


ISAVS 


1832 


0728 


ISANPIR 


(EQU) 




0048 


0030 


ISAN23 


(EQU) 


1680 


0690 


ISADTY 


1832 


0728 


ISAPSF 






0048 


0030 


ISAN22 


(EQU) 


1682 


0692 


ISAIP 


(EQU) 1840 


0730 


ISAIOP 






0048 


0030 


ISAN21 


(EQU) 


1682 


0692 


ISACI 


(EQU) 1848 


0738 


ISA1F0 






0048 


0030 


ISAN18 


(EQU) 


1682 


0692 


ISAF5 


1856 


0749 


ISA1F2 






0048 


0030 


ISAN17 


(EQU) 


1683 


0693 


ISAU1 


1864 


0748 


ISA1F4 






0048 


0030 


ISAN16 


(EQU) 


168^ 


0694 


ISARSP 


1872 


0750 


ISA1F6 






0048 


0030 


ISAN15 


(EQU) 


1686 


0696 


ISARTN 


1880 


0758 


I SALS 2 






0048 


0030 


ISAN14 


(EQU) 


1688 


0698 


ISALOG 


1884 


075C 


ISA213 






0048 


0030 


ISAN13 


(EQU) 


1712 


06B0 


ISAMSA 


1888 


0760 


ISA2SA 






0048 


0030 


ISAN12 


(EQU) 


1720 


06B8 


ISAPF 


(EQU) 1892 


0764 


ISA214 






0048 


0030 


ISAN11 


(EQU) 


1720 


06B8 


ISASOF 


1892 


0764 


ISA2R 






0048 


0030 


ISASNS 




1720 


06B8 


ISASO 


1896 


0768 


ISA215 






0049 


0031 


UNUSED 




1720 


06B8 


ISASSA 


1900 


076C 


ISA20 






0056 


0038 


ISAKEY 




1722 


06BA 


ISASOC 


1904 


0770 


ISA21 






0056 


0038 


ISACSW 




1724 


06BC 


ISASOI 


1908 


0774 


ISA22 






0057 


0039 


ISAF10 




1728 


06C0 


ISAS13 


1920 


0780 


ISA25 






0058 


003A 


ISARCL 




1728 


06C0 


ISASR 


1960 


07A8 


ISA20P 






0060 


00 3C 


ISAIC1 




1732 


06C4 


ISAS14R 


1968 


07B0 


ISA2F0 






0061 


003D 


ISAIC2 




1732 


06C4 


ISAS14 


1976 


07B8 


ISA2F2 






0062 


003E 


I SAC NT 




1736 


06C8 


ISAS15R 


1984 


07C0 


ISA2F4 






1560 


0618 


ISAPIP 


(EQU) 


17 40 


06CC 


ISAS0R 


1992 


07C8 


ISA2F6 






1560 


0618 


ISAPIF 




1744 


06DO 


ISAS1R 


2000 


07D0 


ISAII 


(EQU) 




1560 


0618 


ISAPIV 




1748 


06D4 


ISAS2R 


2000 


07D0 


ISATR 


(EQU) 




1560 


0618 


ISAPISA 




1752 


06D8 


ISAS3R 


2000 


07D0 


ISAAI 


(EQU) 




1562 


061A 


ISAPIC 




1756 


06DC 


ISAS4R 


2000 


07D0 


ISAXI 


(EQU) 




1564 


061C 


ISAPICT 




1760 


06E0 


ISALS1 


2000 


07D0 


ISAAP 


(EQU) 




1568 


0620 


ISAPI13 




1764 


06E4 


ISA113 


2000 


07D0 


ISAPP2 


(EQU) 




1568 


0620 


ISAPIR 




1768 


06E8 


ISA1SA 


2000 


07D0 


ISAPV 


(EQU) 




1572 


0624 


ISAPI14 




1772 


06EC 


ISA114 


2000 


07D0 


ISAPT 






(Continued on page 


247) 

















r 
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i 



DEC 

2000 

2001 

2001 

2001 

2001 

2001 

2001 

2001 

2001 

2002 

2004 

2008 

2016 

2024 

2032 

2040 

2048 

2056 

2064 

2072 

2080 

2088 

2096 

2104 

2112 

2116 



HEX 

07DO 

07D1 

07 Dl 

07D1 

07D1 

07 Dl 

07D1 

07 Dl 

07D1 

07 D2 

07D4 

07D8 

07EO 

07E8 

07FO 

07F8 

0800 

0808 

0810 

0818 

0820 

0828 

0830 

0838 

0840 

0844 



FIELD 

ISAOP 

ISASF 

ISAEU 

ISADO 

ISAFO 

ISAPM 

ISACC 

ISALC 

ISACP 

ISAIN 

ISAIC 

ISAOS 

ISAOX 

ISAOA 

ISAOT 

ISAOI 

ISANP 

I SANS 

ISANX 

I SANA 

ISANT 

ISANI 

ISANR 

ISANV 

ISAPP3 

I SARIN 



CEQU) 
(EQU) 
CEQU) 
(EQU) 
(EQU) 
CEQU) 
CEQU) 



CEQU) 



DEC 

2116 

2116 

2116 

2116 

2116 

2116 

2116 

2117 

2117 

2117 

2117 

2117 

2118 

2118 

2118 

2118 

2118 

2118 

2118 

2118 

2119 

2119 

2119 

2119 

2119 

2119 



HEX 

0844 

0844 

0844 

0844 

0844 

0844 

0844 

0845 

0845 

0845 

0845 

0845 

0846 

0846 

0846 

0846 

0846 

0846 

0846 

0846 

0847 

0847 

0847 

0847 

0847 

0847 



FIELD 

ISAVSC 

ISASHUT 

ISASPP 

ISAHLD 

ISAPCS 

ISAF1 

ISAFLG 

ISAABNF4 

ISAABNF3 

ISAABNF2 

ISAABNF1 

ISAABN 

ISACF 

ISAVEF 

ISALP 

ISADF 

ISAD2 

ISAP2 

ISACPU 

ISAF3 

ISATI 

ISASP 

ISAPS 

ISASI 

ISAAT 

ISADL 



(EQU) 
CEQU) 
CEQU) 
CEQU) 
CEQU) 



CEQU) 
CEQU) 

CEQU) 
CEQU) 

CEQU) 
CEQU) 

CEQU) 
CEQU) 
CEQU) 
CEQU) 
CEQU) 

CEQU) 
CEQU) 
CEQU) 
CEQU) 
CEQU) 
CEQU) 



Alphabetical list of fields in CHAISA 



FIELD 



DEC 
2117 



ISAABN 
ISAABNF1 2117 
ISAABNF2 2117 
ISAABNF3 2117 
ISAABNF4 2117 
ISAAI 2000 



ISAAP 

ISAAT 

ISACC 

ISACF 

ISACI 

ISACNT 

ISACP 

ISACPU 

ISACSW 

ISACVP 

ISADF 

ISADL 

ISADO 

ISADTY 

ISAD2 

ISAEF 

ISAEU 

ISAFA 

ISAFB 

ISAFLG 

ISAFO 

ISAF1 

ISAF10 

ISAF3 

ISAF4 

ISAF5 

ISAHLD 

ISAIC 

ISAIC1 

ISAIC2 

ISAII 

ISAIN 

ISAIP 



2000 
2119 
2001 
2118 
1682 
0062 
2001 
2118 
0056 
2144 
2118 
2119 
2001 
1680 
2118 
2169 
2001 
2132 
2133 
2116 
2001 
2116 
0057 
2118 
2119 
1682 
2116 
2004 
0060 
0061 
2000 
2002 
1682 



C Continued on 



HEX 

0845 

0845 

0845 

0845 

0845 

07DO 

07D0 

0847 

07D1 

0846 

0692 

003E 

07D1 

0846 

0038 

0860 

0846 

0847 

07D1 

0690 

0846 

0879 

07D1 

0854 

0855 

0844 

07D1 

0844 

0039 

0846 

0847 

0692 

0844 

07D4 

003C 

003D 

07D0 

07 D2 

0692 

page 



CEQU) 
CEQU) 
CEQU) 
CEQU) 
CEQU) 
CEQU) 
CEQU) 
CEQU) 
CEQU) 
CEQU) 



CEQU) 

CEQU) 
CEQU) 
CEQU) 

CEQU) 

CEQU) 

CEQU) 



CEQU) 



(EQU) 

CEQU) 
248) 



FIELD 

ISAJLC 

ISAKEY 

ISALC 

ISALCK 

ISALOG 

ISALP 

ISALS1 

ISALS2 

ISAMSA 

I SANA 

ISANAS 

ISANI 

ISANP 

ISANPIR 

ISANR 

ISANS 

ISANT 

ISANV 

ISANX 

ISAN11 

ISAN12 

ISANI 3 

ISAN14 

ISAN15 

ISANI 6 

ISANI 7 

ISANI 8 

ISAN21 

ISAN22 

ISAN23 

ISAN24 

ISAN25 

ISAN26 

ISAN27 

ISAN28 

ISAOA 

ISAOI 

ISAOLT 

ISAOP 



DEC 

2164 

0056 

2001 

2170 

1688 

2118 

1760 

1880 

1712 

2072 

2124 

2088 

2048 

1832 

2096 

2056 

2080 

2104 

2064 

0048 

0048 

0048 

0048 

0048 

0048 

0048 

0048 

0048 

0048 

0048 

0048 

0048 

0048 

0048 

0048 

2024 

2040 

2119 

2000 



HEX 

0874 

0038 

07D1 

087A 

0698 

0846 

06E0 

0758 

06B0 

0818 

084C 

0828 

0800 

0728 

0830 

0808 

0820 

0838 

0810 

0030 

0030 

0030 

0030 

0030 

0030 

0030 

0030 

0030 

0030 

0030 

0030 

0030 

0030 

0030 

0030 

07E8 

07 F8 

0847 

07D0 



DEC HEX FIELD 

2119 0847 ISAWO CEQU) 

2119 0847 ISAOLT CEQU) 

2119 0847 ISAF4 

2120 0848 ISAVMP 
2124 084C ISANAS 
2128 0850 ISATDT 

2132 0854 ISAFA 

2133 0855 ISAFB 

2134 856 ISAVLKCT 

2135 0857 ISAPPIR CEQU) 

2135 0857 ISAVLK 

2136 0858 ISASPN 

2138 085A ISAP3 

2139 085B ISAP1 
214 4 0860 ISACVP 
2152 0868 ISATDY 
2156 086C ISASDS 
2160 0870 ISASLP 
2164 0874 ISAJLC 

2168 0878 ISAUTH 

2169 0879 ISAEF 

2170 087A ISALCK 

2171 087B ISAVAR 
217 2 087C ISATMP 
2176 0880 ISARCB 



CEQU) 
CEQU) 



CEQU) 



CEQU) 
CEQU) 
(EQU) 
CEQU) 
CEQU) 
CEQU) 
CEQU) 
CEQU) 
CEQU) 
CEQU) 
CEQU) 
CEQU) 
CEQU) 
CEQU) 
CEQU) 
CEQU) 



CEQU) 



FIELD 

ISAOR 

ISAORE 

ISAORP 

ISAORV 

ISAOS 

ISAOT 

ISAOV 

ISAOX 

ISAPCS 

ISAPF 

ISAPIC 

ISAPICT 

ISAPIF 

ISAPIP 

ISAPIR 

ISAPISA 

ISAPIV 

ISAPI13 

ISAPI14 

ISAPM 

ISAPPIR 

ISAPP2 

ISAPP3 

ISAPS 

ISAPSF 

ISAPT 

ISAPV 

ISAP1 

ISAP2 

ISAP3 

ISARCB 

ISARCL 

ISARIN 

ISARS 

ISARSP 

ISARTN 

ISASDS 

ISASF 

ISASHUT 



DEC 

1600 

1612 

1600 

1608 

2008 

2032 

1648 

2016 

2116 

17 20 

1562 

1564 

1560 

1560 

1568 

1560 

1560 

1568 

1572 

2001 

2135 

2000 

2112 

2119 

1832 

2000 

2000 

2139 

2118 

2138 

2176 

0058 

2116 

1616 

1684 

1686 

2156 

2001 

2116 



HEX 

0640 

064C 

0640 

0648 

07D8 

07F0 

0670 

07E0 

0844 

6B8 

061A 

061C 

0618 

0618 

0620 

0618 

0618 

0620 

0624 

07D1 

0857 

07D0 

0840 

0847 

0728 

07D0 

07D0 

085B 

0846 

085A 

0880 

003A 

0844 

0650 

0694 

0696 

086C 

07D1 

0844 



CEQU) 

CEQU) 



CEQU) 



CEQU) 
CEQU) 
CEQU) 

CEQU) 



CEQU) 
CEQU) 

CEQU) 



CEQU) 
CEQU) 



CHAISA 247 



(Continued from page 247) 



FIELD 


DEC 


HEX 


FIELD 


DEC 


HEX 




FIELD 


DEC 


HEX 


IS AS I 


2119 


0847 (EQU) ISATDT 


2128 


0850 




ISA10 


1780 


06F4 


IS AS LP 


2160 


0870 


ISATDY 


2152 


0868 




ISA11 


1784 


06F8 


ISASNS 


0048 


0030 


ISATI 


2119 


0847 


(EQU) 


ISA113 


1764 


06E4 


ISASN1 


0048 


0030 


ISATMP 


2172 


087C 




ISA114 


1772 


6EC 


ISASN2 


0048 


0030 


ISATR 


2000 


07D0 


(EQU) 


ISA115 


1776 


06F0 


ISASO 


1720 


06B8 


ISAUTH 


2168 


0878 




ISA12 


1788 


06FC 


ISASOC 


1722 


06BA 


ISAU1 


1683 


0693 




ISA15 


1800 


0708 


ISASOF 


1720 


06B8 


IS AVAR 


2171 


087B 




ISA2F0 


1968 


07B0 


ISASOI 


1724 


06BC 


ISAVEF 


2118 


0846 


(EQU) 


ISA2F2 


1976 


07B8 


ISASP 


2119 


0847 (EQU) ISAVLK 


2135 


0857 




ISA2F4 


1984 


07C0 


ISASPN 


2136 


0858 


ISAVLKCT 


2134 


0856 




ISA2F6 


1992 


07C8 


ISASPP 


2116 


08 44 (EQU) ISAVMP 


2120 


0848 




ISA20P 


1960 


07A8 


ISASR 


1728 


O6C0 


ISAVS 


1656 


0678 




ISA2R 


1892 


0764 


ISASSA 


1720 


06B8 


ISAVSC 


2116 


0844 


(EQU) 


ISA2SA 


1888 


0760 


ISASOR 


1740 


06CC 


ISAWO 


2119 


0847 


(EQU) 


ISA20 


1900 


076C 


ISAS1R 


1744 


06D0 


ISAXI 


2000 


07 DO 


(EQU) 


ISA21 


1904 


0770 


ISAS13 


1728 


06C0 


ISA1F0 


1848 


0738 




ISA213 


1884 


075C 


ISAS14 


1732 


06C4 


ISA1F2 


1856 


0740 




ISA214 


1892 


0764 


ISAS14R 


1732 


06C4 


ISA1F4 


1864 


0748 




ISA215 


1896 


0768 


ISAS15R 


1736 


06C8 


ISA1F6 


1872 


0750 




ISA22 


1908 


0774 


ISAS2R 


1748 


06D4 


ISAIOP 


1840 


0730 




ISA25 


1920 


0780 


ISAS3R 


1752 


06D8 


ISA1R 


1772 


06EC 




UNUSED 


0049 


0031 


ISAS4R 


1756 


06DC 


ISA1SA 


1768 


06E8 











Assembler listing of CHAISA 



LOCATION INSTRUCTION SOURCE INST OPER 



47 00000 



CHAISA 

* 



47 00000 
47 00000 
47 00030 



DSECT 

DS 
DS 
DS 



0D 
12F 

D 



COMMENT 

INTERRUPT STORAGE 

AREA ISA 

UNUSED 
SENSE DATA 









♦BE DEFINED. 








47 00030 




|ORG| 


ISASNS 




47 00030 




ISASN1 


DS 


XL1 






47 00030 


ISAN11 


EQU 


ISASN1 






00000080 


ISA11M 


EQU 


X^O' 






47 00030 


ISAN12 


EQU 


ISASN1 






00000040 


ISA12M 


EQU 


X'40 f 






47 00030 


ISAN13 


EQU 


ISASN1 






00000020 


ISA13M 


EQU 


X , 20 f 






47 00030 


ISAN14 


EQU 


ISASN1 






00000010 


ISA14M 


EQU 


X i 10 i 






47 00030 


ISAN15 


EQU 


ISASN1 






00000008 


ISA15M 


EQU 


x^s - 






47 00030 


ISAN16 


EQU 


ISASN1 






00000004 


ISA16M 


EQU 


X , 04 t 






47 00030 


ISAN17 


EQU 


ISASN1 






00000002 


ISA17M 


EQU 


X , 02 i 






47 00030 


ISAN18 


EQU 


ISASN1 






00000001 


ISA18M 


EQU 


X'Ol* 




47 00031 






DS 


CL7 






47 00030 




|ORG| 


ISASNS 




47 00030 




ISASN2 


DS 


XL1 






47 00030 


ISAN21 


EQU 


ISASN2 






00000080 


ISA21M 


EQU 


X - 80 f 






47 00030 


ISAN22 


EQU 


ISASN2 






00000040 


ISA22M 


EQU 


X^O 1 






47 00030 


ISAN23 


EQU 


ISASN2 






00000020 


ISA23M 


EQU 


X f 20 f 




(Listing 


Of CHAISA 


continued 


on page 249) 


248 CHAISA 













ISASNS 

*** 

♦ ♦♦ THE FOLLOWING DETAIL OF THE SENSE DATA FIELD 

♦APPLIES ONLY TO THE 

♦♦♦ 2702. FOR OTHER DEVICES THE DEFINITION OF THE 

♦FIELD SHOULD BE 

♦*♦ REDEFINED BY INSERTING CARDS IN THIS DSECT, 

♦BEGINNING WITH AN 

♦♦♦ ORG ISASNS CARD. THE ENTIRE EIGHT BYTES SHOULD 



SENSE BYTE ZERO 

2702 COMMAND REJECT 

2702 COMMAND REJECT MASK 

270 2 INTERVENTION REQUIRED 

2702 INTERV REQ MASK 

270 2 BUS OUT CHECK 

2702 BUS OUT CHECK MASK 

2702 EQUIPMENT CHECK 

2702 EQUIPMENT CHECK MASK 

2702 DATA CHECK 

2702 DATA CHECK MASK 

2702 OVERRUN 

2702 OVERRUN MASK 

2702 RECEIVING CHECK 

2702 RECEIVING CHECK MASK 

2702 TIME OUT 

2702 TIME OPT MASK 

2702 UNUSED 

SENSE DATA FOR 2701 

SENSE BYTE ZERO 

2701 COMMAND REJECT 

2701 COMMAND REJECT MASK 

2701 INTERVENTION REQUIRED 

INTERVENTION REQUIRED MASK 

2701 BUS OUT CHECK 

2701 BUS OUT CHECK MASK 



(listing of CHAISA continued from page 248) 



LOCATION INSTRUCTION SOURCE 



47 00038 

47 00038 
47 00039 

47 0003A 

47 0003C 



47 00030 
00000010 
47 00030 
00000008 
47 00030 
00000004 
47 00030 
00000002 
47 00030 
00000001 

47 00038 



47 0003D 



47 0003E 

47 00618 
47 00618 
47 00618 



00000080 
00000040 
00000020 
00000010 
00000008 
00000004 
00000002 
00000001 

00000080 
00000040 
00000020 
00000010 
00000008 
00000004 
00000002 
00000001 

47 00618 



47 00618 
00000080 



47 0061A 
47 0061C 
47 00620 

47 00620 
47 00624 
47 00640 

47 00640 
47 00648 
47 0064C 
47 00650 

47 00670 
47 00678 

47 00690 



00000001 
00000002 
00000003 
00000004 
00000005 



ISAN24 
ISA24M 
ISAN25 
ISA25M 
ISAN26 
ISA26M 
ISAN27 
ISA27M 
ISAN28 
ISA28M 
ISACSW 

ISAKEY 
ISAF10 

ISARCL 

ISAIC1 
ISAC11 
ISAC12 
ISAC13 
ISAC14 
ISAC15 
ISAC16 
ISAC17 
ISAC18 
ISAIC2 
ISAC21 
ISAC22 
ISAC23 
ISAC24 
ISAC25 
ISAC26 
ISAC27 
ISAC28 
I SAC NT 

ISAPISA 

ISAPIV 

ISAPIF 

ISAPIP 

ISAPIPM 

ISAPIC 

ISAPICT 

ISAPIR 

ISAPI13 
ISAPI14 
ISAOR 

ISAORP 

ISAORV 

ISAORE 

ISARS 

* 

ISAOV 

ISAVS 

ISADTY 

* 

ISADTY 1 
ISADTY2 
ISADTY3 
ISADTY4 
ISADTY 5 



47 00691 
47 00692 



ISAF5 
47 00692 ISACI 
(Listing of CHAISA continued on page 250) 



INST 
EQU 
EQU 
EQU 

EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
PS 
I ORG 1 
DS 
DS 

DS 

DS 

EQU 

EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
DS 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
DS 

l ORG j 
DS 
DS 
DS 
EQU 
EQU 
DS 
DS 
DS 

DS 
DS 
DS 

DS 
DS 
DS 
DS 

DS 
DS 

DS 

EQU 

EQU 

EQU 

EQU 

EQU 

DS 

DS 

EQU 



OPER 

ISASN2 

X^O' 

ISASN2 

X'Q8* 

ISASN2 

X'04' 

ISASN2 

X , 02» 

ISASN2 

X'Ol" 

D 

ISACSW 

XL1 

XL1 

XL2 

XL1 

X^O 1 

X'40 f 

X'20' 

X'10' 

X'08* 

X'04 f 

X'02" 

X'01' 

XL1 

X^O' 

X^O* 

X^O' 

X'lO 1 

x'os 1 

X , 04 i 

X , 02 i 

X'Ol' 

H 

♦♦1496 

0XL40 

0D 

XL2 

ISAPIF 

X^O' 

H 

F 

0XL32 

F 

7F 

0CL16 

D 

F 
F 
8F 

D 
6F 

XL1 

X'Ol 1 

X , 02 i 

X , 03' 

X , 04" 

X'05 f 

XL1 

XL1 

ISAF5 



COMMENT 

2701 EQUIPMENT CHECK 

2701 EQUIPMENT CHECK MASK 

2701 DATA CHECK 

2701 DATA CHECK MASK 

2701 OVER RUN 

2701 OVER RUN MASK 

2701 LOST DATA 

2701 LOST DATA MASK 

2701 TIME OUT 

2701 TIME OUT MASK 

CHANNEL STATUS WORD 

CSW KEY 

UNUSED FOR RELATIVE 

POSITIONING 

RELATIVE CCW LOCATION DW 

MOD 

INTERRUPT CODE BYTE 1 

ATTENTION 

STATUS MODIFIER 

CONTROL UNIT END 

BUSY 

CHANNEL END 

DEVICE END 

UNIT CHECK 

UNIT EXCEPTION 

INTERRUPT CODE BYTE 2 

PCI 

INCORRECT LENGTH 

PROGRAM CHECK 

PROTECTION CHECK 

CHANNEL DATA CHECK 

CHANNEL CONTROL CHECK 

INTERFACE CONTROL CHECK 

CHAINING CHECK 

BYTE COUNT 

PGM INT SHORT SAVE AREA 

OLD PGM INT. VPSW 

FLAGS 

PRIVILEGED STATUS INDICATOR 

PRIVILEGED STATUS MASK 

INTERRUPT CODE 

INSTRUCTION COUNTER 

SHORT SAVE REG, SAVE AREA 

13-4 

REGISTER 13 

REGISTERS 14 TO 4 

RECOVERABLE DATA SET PAGING 

ERROR VPSW 

OLD VPSW PORTION 

VM ADDRESS PORTION 

EXT. ADDRESS PORTION 

SHORT SAVE AREA FOR RECOV. 

DATA SET PAGING 

OLD VSS INTERRUPT VPSW 

SHORT SAVE AREA FOR VSS 

INTERRUPTS 

TERMINAL TYPE 

NSRB 403 
1050 PTTC/8 
2741 CORRESPONDENCE 
2741 PTTC/8 
TELETYPE TTY35 
1052-7 OPERATOR CONSOLE 
UNUSED 

24 OR 32 BIT MODE FLAGS 
CURRENT SYSTEM INDICATOR 
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(Listing of CHAISA continued from page 249) 



LOCATION INSTRUCTION SOURCE 



INST OPER 



COMMENT 



(VMA) 

CURRENT SYSTEM MASK 

l=ON 

CURRENT SYSTEM PACKING 

INDICATOR (VMA) 

CURRENT SYSTEM PACKING MASK 

l=ON 



00000002 ISACIM EQU X , 02 i 
47 00692 ISAIP EQU ISAF5 
00000008 ISAIPM EQU X f 08' 

*********** ****************** **************************** ************** 

* TASK INTERRUPT HANDLING MACROS ARE REQUIRED TO 

* REFER TO ISAU1 

* WITH AN ABSOLUTE ADDRESS OF 1683 DECIMAL. 

* THEREFORE, IF THIS 

* CELL IS MOVED THOSE MACROS MUST BE REDEFINED. 
47 00693 ISAU1 DS XL1 1683 Ul FLAG 

00000080 ISAU1M EQU X^O* 
*********************************************************************** 



47 
47 
47 
47 

47 
47 
47 



00694 
00696 
00698 
O06B0 

006B4 
006B8 
006B8 



47 006B8 



47 006B8 
00000080 



47 
47 
47 

47 
47 

47 
47 
47 
47 
47 
47 
47 
47 
47 

47 
47 
47 

47 
47 
47 
47 
47 
47 
47 



47 
47 
47 
47 
47 
47 
47 
47 
47 



006BA 
006BC 
006C0 

006CO 
006C4 

006C4 
006C8 
006CC 
006D0 
006D4 
006D8 
006DC 
006E0 
006E0 

006E4 
006E8 
00 6 EC 

006EC 
006F0 
006F4 
006F8 
006FC 
00708 
00728 



47 006C4 



47 00728 
00000080 



00729 
0072C 
00730 
00738 
00740 
00748 
00750 
00758 
00758 



ISARSP 
ISARTN 
ISALOG 
ISAMSA 

* 

ISASSA 

ISASO 

* 

ISASOF 

ISAPF 

ISAPFM 

ISASOC 

ISASOI 

ISASR 

* 

ISAS13 

ISAS14 

ISAS14R 

ISAS15R 

ISAS0R 

ISAS1R 

ISAS2R 

ISAS3R 

ISAS4R 

ISALS1 

IS All 3 
ISA1SA 
ISA1R 

ISA114 

ISA115 

ISA10 

ISA11 

ISA12 

ISA15 

ISAPSF 

ISANPIR 
ISANPIRM 



ISAIOP 
ISA1F0 
ISA1F2 
ISA1F4 
ISA1F6 
ISALS2 



DS 
DS 
DS 
DS 

DS 
DS 
DS 

DS 

EQU 

EQU 

DS 

DS 

DS 

DS 
DS 

1 QRG 1 
DS 
DS 
DS 
DS 
DS 
DS 
DS 
DS 
DS 

DS 
DS 
DS 

DS 
DS 
DS 
DS 
DS 
DS 
DS 

EQU 

EQU 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 



H 
H 
XL24 

F 

F 

0XL40 

0D 

XL2 

ISASOF 

X , 80 f 

H 

F 

0XL32 

IF 

7F 

ISAS14 

F 

F 

F 

F 

F 

F 

F 

0XL120 

IF 

IF 
IF 
0XL28 

IF 
IF 
IF 
IF 
3F 
8F 
XL1 

ISAPSF 

X f 80 f 

XL3 

IF 

D 

D 

D 

D 

D 

0XL120 

IF 



RSPRV INSTRUCTION 

RTRN INSTRUCTION 

1688 CHANNEL LOGOUT 

LOCATION OF MINIMAL SAVE 

AREA 

UNUSED 

1720 SHORT SAVE AREA 

SHORT SAVE AREA OLD VIRTUAL 

PSW 

1720 FLAGS 

PRIVILEGED STATUS IND. 

INTERRUPT CODE 

INSTRUCTION COUNTER 

1728 SHORT SAVE REG. SAVE 

AREA 13-4 

REGISTER 13 

REGISTERS 14 TO 4 

REGISTER 14 

REGISTER 15 

REGISTER 

REGISTER 1 

REGISTER 2 

REGISTER 3 

REGISTER 4 

1760 LONG SAVE AREA 1 

LENGTH OF LONG SAVE AREA - 

30 WDS 

REG. 13 SAVE AREA 

SAVE AREA OF CALLED PROGRAM 

1772 BEGINNING OF REG SAVE 

AREA 

REGISTER 14 

REGISTER 15 

REGISTER 

REGISTER 1 

REGISTER 2-4 

REGISTER 5-12 

FLAGS SAVED IN LONG SAVE 

AREA 

NON-PRIV PROG INTR FLAG 

RECOVERY=l NO RECOVERY=0 

UNUSED 

UNUSED 

OLD PSW SAVE AREA 

FP REGISTER 

FP REGISTER 2 

FP REGISTER 4 

FP REGISTER 6 

1880 LONG SAVE AREA 2 

LENGTH OF LONG SAVE AREA - 
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250 CHAISA 



(Listing of CHAISA continued from page 2S0) 



LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 


COMMENT 








* 






30 WDS 


47 


0075C 




ISA213 


DS 


IF 


REG. 13 SAVE AREA 


47 


00760 




ISA2SA 


DS 


IF 


SAVE AREA OF CALLED PROGRAM 


47 


00764 




ISA2R 


DS 


0XL28 


1892BEGINNING OF REG SAVE 
AREA 


47 


00764 




ISA214 


DS 


IF 


REGISTER 14 


47 


00768 




ISA215 


DS 


IF 


REGISTER 15 


47 


0076C 




ISA20 


DS 


IF 


REGISTER 


47 


00770 




ISA21 


DS 


IF 


REGISTER 1 


47 


00774 




ISA22 


DS 


3F 


REGISTER 2-4 


47 


00780 




ISA25 


DS 


8F 


REGISTER 5-12 


47 


007A0 






DS 


2F 


NOT USED 


47 


007A8 




ISA20P 


DS 


D 


OLD PSW SAVE AREA 


47 


007B0 




ISA2F0 


DS 


D 


FP REGISTER 


47 


007B8 




ISA2F2 


DS 


D 


FP REGISTER 2 


47 


007C0 




ISA2F4 


DS 


D 


FP REGISTER 4 


47 


007C8 




ISA2F6 


DS 


D 


FP REGISTER 6 


47 


007D0 




ISAOP 


DS 


0D 


OLD PROGRAM VIRTUAL PSW 


47 


007D0 




ISAPT 

* 


DS 


X 


STATE AND MASK FLAG 
13472 






47 007D0 


ISAPV 


EQU 


ISAPT 


PRIVLEGE STATE FLAG 
13472 






00000080 


ISAPVM 

* 


EQU 


X'80 f 


NON- PRI VLEG ED=1 
13472 






47 007D0 


ISAPP2 


EQU 


ISAPT 


PAGING INTERRUPT FLAG 
13472 






00000020 


ISAPP2M 

* 


EQU 


X^O 1 


PAGING INTERRUPT MASK 
13472 






47 007DO 


ISAAP 


EQU 


ISAPT 


ASYNCRONOUS PROGRAM 
INTERRUPT 13472 






00000010 


ISAAPM 

* 


EQU 


X'10 f 


PROGRAM INTERRUPT MASK 
13472 






0000001F 


ISASTM 

* 


EQU 


X'lF 1 


PROGRAM INTERRUPT MASK 
13472 






47 007D0 


ISAXI 

* 


EQU 


ISAPT 


EXTERNAL INTERRUPT FLAG 
13472 






00000008 


ISAXIM 

* 


EQU 


X , 08 i 


EXTERNAL INTERRUPT MASK 
13472 






47 007D0 


ISAAI 


EQU 


ISAPT 


ASYNCHRONOUS INTERRUPT MASK 






00000004 


ISAAIM 


EQU 


X , 04 f 








47 007D0 


ISATR 


EQU 


ISAPT 


TIMER INTERRUPT MASK 






00000002 


ISATRM 


EQU 


X f 02 f 








47 007D0 


ISAII 


EQU 


ISAPT 


I/O INTERRUPT MASK 






00000001 


ISAIIM 


EQU 


X'Ol' 




47 


007D1 




ISACP 


DS 


XL1 


ILC,CC,AND PROGRAM MASK 






47 007D1 


ISALC 


EQU 


ISACP 


INSTRUCTION LENGTH CODE 
(ILC) 






OOOOOOCO 


ISALCM 


EQU 


X'CO 1 








47 007D1 


ISACC 


EQU 


ISACP 


CONDITION CODE (CC) 






00000030 


ISACCM 


EQU 


X f 30' 








47 007D1 


ISAPM 


EQU 


ISACP 


PROGRAM MASK 






0000000F 


ISAPMM 


EQU 


X'OF* 








47 007D1 


ISAFO 


EQU 


ISACP 


FLOATING POINT OVERFLOW 
MASK 






00000008 


ISAFOM 


EQU 


x^os^ 








47 007D1 


ISADO 


EQU 


ISACP 


DECIMAL OVERFLOW MASK 






00000004 


ISADOM 


EQU 


X f 04 1 








47 007D1 


ISAEU 


EQU 


ISACP 


EXPONENTIAL UNDERFLOW MASK 






00000002 


ISAEUM 


EQU 


X , 02 i 








47 007D1 


ISASF 


EQU 


ISACP 


SIGNIFICANCE MASK 






00000001 


ISASFM 


EQU 


X'01' 




47 


007D2 




I SAIN 


DS 


XL2 


INTERRUPT CODE 


47 


007D4 




ISAIC 


DS 


F 


INSTRUCTION COUNTER 


47 


007D8 




ISAOS 

* 


DS 


D 


OLD SUPERVISOR CALL VIRTUAL 
PSW 


47 


007E0 




ISAOX 


DS 


D 


OLD EXTERNAL VIRTUAL PSW 


47 


007E8 




ISAOA 


DS 


D 


OLD ASYNCHRONOUS I/O 
VIRTUAL PSW 


(Listing 


of CHAISA 


continued 


on page 252) 
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LOCATION INSTRUCTION SOURCE 



INST OPER 



47 007F0 
47 007F8 

47 00800 
47 00808 

47 00810 
47 00818 

47 00820 
47 00828 

47 00830 

47 00838 
47 00840 

47 00844 
47 00844 



47 00845 



47 00846 



47 00847 



(Listing 



47 00844 
00000080 
47 00844 

00000040 
47 00844 

00000020 

47 00844 
00000010 
47 00844 
00000008 
47 00844 
00000004 

47 00845 
00000080 
47 00845 

00000002 
47 00845 
00000004 
47 00845 

00000001 
00000083 

47 00846 
000000C0 
47 00846 

00000020 
47 00846 

00000010 
47 00846 
00000008 
47 00846 
00000004 
47 00846 
00000002 
47 00846 
00000001 

47 00847 
00000080 
47 00847 
00000040 
of CHAISA 



ISAOT 
ISAOI 

ISANP 
ISANS 

ISANX 
I SANA 

* 

ISANT 
ISANI 

ISANR 
* 

ISANV 
ISAPP3 

ISAFLG 

ISAF1 

ISAPCS 

ISAPCSM 

ISAHLD 

* 

ISAHLDM 
ISASPP 

ISASPPM 

ISASHUT 

ISASHUTM 

ISAVSC 

ISAVSCM 

I SARIN 

ISARINM 

ISAABN 

ISAABNF1 

ISAABN1M 

ISAABNF2 

ISAABN2M 

ISAABNF3 

ISAABN 3M 

ISAABNF4 

* 

ISAABN4M 

ISAABNM 

ISAF3 

ISACPU 

ISACPUM 

ISAP2 

ISAP2M 
ISAD2 

ISAD2M 
ISADF 
ISADFM 
ISALP 
ISALPM 
ISAVEF 
ISAVEFM 
ISACF 
ISACFM 
ISAF4 
ISAOLT 
ISAOLTM 
ISAWO 
ISAWOM 
continued 



DS 
DS 

DS 
DS 

DS 

DS 

DS 

DS 

DS 

DS 
DS 



EQU 
EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

DS 

EQU 

EQU 

EQU 



EQU 
EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

DS 

EQU 

EQU 

EQU 

EQU 



D 
D 

D 
D 

D 
D 

D 
D 



D 
F 



DS OF 

DS XL1 

EQU ISAF1 

EQU X'80 f 

EQU ISAF1 



X f 40 f 
ISAF1 

X f 20 f 

ISAF1 
X'lO 1 
ISAF1 

x'os* 

ISAF1 

X'04' 

XL1 

ISAABN 

X^O* 

ISAABN 



EQU X , 02' 

EQU ISAABN 

EQU X f 04 f 

EQU ISAABN 

EQU X^Ol - 

EQU X 9 B3 9 

DS XL1 

EQU ISAF3 

EQU X'CO* 

EQU ISAF3 



X^O' 
ISAF3 

X'lO* 

ISAF3 

X'OB* 

ISAF3 

X*04 f 

ISAF3 

X f 02 f 

ISAF3 

X'Ol' 

XL1 

ISAF4 

X^O" 

ISAF4 

X f 40 f 



COMMENT 

OLD TIMER VIRTUAL PSW 

OLD SYNCHRONOUS I/O VIRTUAL 

PSW 

NEW PROGRAM VIRTUAL PSW 

NEW SUPERVISOR CALL VIRTUAL 

PSW 

NEW EXTERNAL VIRTUAL PSW 

NEW ASYNCHRONOUS I/O 

VIRTUAL PSW 

NEW TIMER VIRTUAL PSW 

NEW SYNCHRONOUS I/O VIRTUAL 

PSW 

NEW RECOV. DATA SET PAGING 

VPSW 

NEW VSS VPSW 

PUSHDOWN POINTER FOR TYPE- 3 

LINKAGE 

FULL WORD OF FLAGS 

2116 FLAG BYTE 1 

PCS PROGRAM INTERRUPT FLAG 

PCS PROGRAM INTERRUPT MASK 

SYSIN TERMINAL IS BEING 

HELD N393 

N393 

SPECIAL PRIVILEGE PROGRAM 

FLAG 

SPECIAL PRIVILEGE PROGRAM 

MASK 

FORCED SHUTDOWN FLAG 

FORCED SHUTDOWN MASK 

VSS CONNECTED FLAG 

VSS CONNECTED MASK 

IT I RESET FLAG 

ITI RESET MASK 

ABEND FLAGS 

ABEND IN TASK BEING CREATED 

RECURSION IN COMPCODE 2 
ABEND 

LOGOFF IN PROCESS 

RECURSION IN COMPCODE ABEND 
1 

ABEND IN PROCESS 

2118 FLAG BYTE 3 

CPU NUMBER (2 BITS) 

CPU NUMBER MASK 

P2 FLAG - DATA SET PAGING 

INT. 

SECOND IMPLICIT DYNAMIC 
LOAD FL 

DYNAMIC LOADER BIT 

LOGON IN PROGRESS FLAG 

VSS ACTIVE FLAG 

CLEANUP FLAG 

FLAG BYTE 4 
INTERLOCK FOR OLTS 



i 



on page 253) 
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(Listing of CHAISA continued from page 252) 



i 



LOG 


: AT ION 


INSTRUCTION 
47 00847 


SOURCE 
ISADL 


INST 
EQU 


OPER 


COMMENT 




ISAF4 


IMPLICIT DYNAMIC LINKAGE 










♦ 






FLAG 






00000020 


ISADLM 


EQU 


X'20' 








47 


00847 


ISAAT 


EQU 


ISAF4 


ATTENTION FLAG 






00000010 


ISAATM 


EQU 


X"10 f 








47 


00847 


IS AS I 


EQU 


ISAF4 


SYSTEM INDICATOR (VMA) 






00000008 


ISASIM 


EQU 


X'08 f 








47 


00847 


ISAPS 

* 


EQU 


ISAF4 


PUBLIC SEGMENT INDICATOR 
(VMA) 






00000004 


ISAPSM 


EQU 


X , 04 i 








47 


00847 


ISASP 

* 


EQU 


ISAF4 


SYSTEM PACKING PARAMER 
CVMA) 






00000002 


ISASPM 


EQU 


X'02' 








47 


00847 


ISATI 

* 


EQU 


ISAF4 


TASK INITIATION FLAG 
1 = ON 






00000001 


ISATIM 


EQU 


X f 01 f 




47 


00848 








DS 


OF 




47 


00848 






ISAVMP 


DS 


F 


VIRTUAL MEMORY PACKING 
ORIGIN 


47 


0084C 






I SAN AS 

* 


DS 


XL2 


NEXT AVAILABLE SEGMENT 
16235 


47 


0084E 






* 


DS 


XL2 


RESERVED 
16235 


47 


00850 






ISATDT 

* 


DS 


F 


TDT ORIGIN - DATA 
MANAGEMENT 


47 


00854 






ISAFA 


DS 


XL1 


2132 FLAG A 


47 


00855 






ISAFB 


DS 


XL1 


2133 FLAG B 


47 


00856 






ISAVLKCT 


DS 


XL1 


VAM INTERLOCK HELD COUNT 


47 


00857 






ISAVLK 


DS 


XL1 


VAM INTERLOCK WAIT FLAG 






00000080 


ISAVLKM 


EQU 


X^O' 


VAM INTERLOCK WAIT MASK 






47 


00857 


ISAPPIR 


EQU 


ISAVLK 


PRIV PROG INTR FLAG 






00000040 


ISAPPIRM 


EQU 


X'40 f 


RECOVERY=l NO RECOVERY=0 


47 


00858 






ISASPN 

* 


DS 


H 


SHARED PAGE TABLE NUMBER OF 
PUB SEG 


47 


0085A 






ISAP3 


DS 


C 


P3 FLAG — ONE BYTE COUNTER 


*********************************************************************** 










* TASK INTERRUPT HANDLING MACROS ARE REQUIRED TO 










* REFER 


TO ISAP1 












* WITH AN ABSOLUTE ADDRESS OF 2139 DECIMAL. 










* THEREFORE, 


IF THIS 












* CELL IS MOVED THOSE 


MACROS MUST BE REDEFINED. 


47 


0085B 






ISAP1 


DS 


XL1 


PI FLAG 






00000080 


ISAP1M 


EQU 


X^O' 




47 


0085C 








DS 


F 


UNUSED 


47 


00860 






ISACVP 


DS 


D 


CURRENT VIRTUAL PSW (COPY) 


47 


00868 






ISATDY 


DS 


F 


POINTER TO DYNAMIC LOADER 
TABLE 


47 


0086C 






ISASDS 


DS 


F 


POINTER TO SDST 


47 


00870 






IS AS LP 


DS 


F 


SYSLIB DCB 


47 


00874 






ISAJLC 


DS 


F 


JOB LIB DCB CHAIN 


47 


00878 






ISAUTH 


DS 


XL1 


2168 AUTHORITY CODE 


47 


00879 






ISAEF 

* 


DS 


XL1 


ENTER FLAG — ONE BYTE 
COUNTER 


47 


0087A 






ISALCK 

* 


DS 


XL1 


2170 TASK INTERRUPT 
INHIBITION LOCK BYTE 


47 


0087B 






IS AVAR . 


DS 


XL1 


VARIABLE LENGTH SEGMENT 
INCRMNT 


47 


0087C 






ISATMP 

* 


DS 


F 


POINTER TO TASK MONITOR 
PSECT 


47 


00880 






ISARCB 


DS 


240D 


IORCB AREA 
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Internal Symbol Dictionary (CHAISD) 



The Internal Symbol Dictionary (ISD) is used by the program checkout subsystem 
(PCS) for processing checkout statements. 

An ISD is produced by the Assembler, FORTRAN Compiler, or Linkage Editor. The 
Assembler and FORTRAN ISDs contain a section name table identifying control sections 
by name and version, and a symbol table listing relocatable values. The Assembler 
ISD maintains a using table containing USING and DROP statements. The FORTRAN ISD 
maintains a number table containing an entry for each source statement and offset in 
a FORTRAN program. 

The Linkage Editor ISD contains a series of control sections listing the output 
control section name, the number of these output control sections, and the name and 
displacement of the input control section. 
The ISD resides in virtual storage and is aligned on word boundaries. 



» 



CHAISD Storage map 



DEC 


8 

16 



HEX 



0| 

1 


ISDTYP 


1 

1 


ISDLVL | 

1 


ISDLNG | 


8| 
1 




ISDDST 


1 

1 


ISDNSN | 


10 | 
1 




ISDNUT 


1 

1 


ISDNSM | 



ORG ISDNUT 



16 101 



ISDNST 



ORG ISDDST 



8 

16 



8| 

I. 

10 i 

L 



ISDDPI 



ISDOMN 



ISDOMN (CONT) 



ISDNIM 



ORG CHAISD 



81 



ISDSNM 



ISDVID 



ORG CHAISD 



0|ISDSXN | 



ISDDIS 



| ISDFLG 



UNNAMED 



|ISDSNR 



81 



ISDBAS 



ORG CHAISD 



ISDSMN 



8|ISDSTP IISDNDM [ 



ISDELN 



IISDSNO 



ISDDCS 



_L 



(CHAISD continued on page 255) 
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DEC 


HEX 
















ORG 


ISDSNO 
C 
















12 


1 

I 


ISDIMV 


I 

1 


16 


10| 

I 




ISDSLN 






I 

1 


ISDDMF 


1 
1 


ORG 


CHAISD 



















0] 

\ 




ISDSTN 






i 


ISDSDI 


1 
1 


ORG 


CHAISD 



















01 
I 








ISDIMN 




I 


8 


81 
1 




ISDDNX 






I 

1 


ISDDIM 


1 


16 


10| 
I 




ISDOCS 






i 
i 






ORG 


CHAISD 

















0| 
1 








ISDCSN 






8 


8| 

1 




ISDNCS 






1 
1 






ORG 


CHAISD 

















0[ 
\ 








ISDINM 




. 


8 


81 

1 




ISDTXT 






1 

1 






Fields 


in CHAISD 


— by displacement 












DEC 
0000 


HEX 
0000 


FIELD 
ISDINM 


DEC 
0001 


HEX 
0001 


FIELD 
ISDDIS 


DEC HEX 
0010 O0OA 


FIELD 
ISDELN 




0000 


0000 


ISDICS 


0002 


0002 


ISDLVL 


0012 000C 


ISDDIM 




0000 


0000 


ISDCSN 


0004 


0004 


ISDSDI 


0012 000C 


ISDIMV 




0000 


0000 


ISDCSH 


0004 


0004 


ISDFLG 


0012 000C 


ISDSNO 




0000 


0000 


ISDIMN 


0004 


0004 


ISDLNG 


0012 000C 


ISDOMN 




0000 


0000 


ISDIMH 


0007 


0007 


ISDSNR 


0012 000C 


ISDNSN 




0000 


0000 


ISDSTN 


0008 


0008 


ISDTXT 


0013 000D 


ISDDCS 




0000 


0000 


ISDSNT 


0008 


0008 


ISDNCS 


0016 0010 


ISDOCS 




0000 


0000 


ISDSMN 


0008 


0008 


ISDDNX 


0016 0010 


ISDSLN 




0000 


0000 


ISDSYM 


0008 


0008 


ISDSTP 


0016 0010 


ISDNST 




0000 


0000 


ISDSXN 


0008 


0008 


ISDBAS 


0016 0010 


ISDNUT 




0000 


0000 


ISDUSE 


0008 


0008 


ISDVID 


0020 0014 


ISDDMF 




0000 


0000 


ISDSNM 


0008 


0008 


ISDDPI 


0020 0014 


ISDNIM 




0000 


0000 


ISDSCT 


0008 


0008 


ISDDST 


0020 0014 


ISDNSM 




0000 


0000 


ISDTYP 


0009 


0009 


ISDNDM 
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Alphabetical list of fields in CHAISD 





FIELD 
ISDBAS 


DEC HEX 
0008 0008 


FIELD DEC HEX 
ISDIMV 0012 000C 


FIELD DEC HEX 
ISDSLN 0016 0010 




ISDCSH 


0000 0000 


ISDINM 0000 0000 


ISDSMN 0000 0000 




IS DCS N 


0000 0000 


ISDLNG 0004 0004 


ISDSNM 0000 0000 




ISDDCS 


0013 00OD 


ISDLVL 0002 0002 


ISDSNO 0012 000C 




ISDDIM 


0012 000C 


ISDNCS 0008 0008 


ISDSNR 0007 0007 




ISDDIS 


0001 0001 


ISDNDM 0009 0009 


ISDSNT 0000 0000 




ISDDMF 


0020 0014 


ISDNIM 0020 0014 


ISDSTN 0000 0000 




ISDDNX 


0008 0008 


ISDNSM 0020 0014 


ISDSTP 0008 0008 




ISDDPI 


0008 0008 


ISDNSN 0012 000C 


ISDSXN 0000 0000 




ISDDST 


0008 0008 


ISDNST 0016 0010 


ISDSYM 0000 0000 




ISDELN 


0010 000A 


ISDNUT 0016 0010 


ISDTXT 0008 0008 




ISDFLG 


0004 0004 


ISDOCS 0016 0010 


ISDTYP 0000 0000 




ISDICS 


0000 0000 


ISDOMN 0012 000C 


ISDUSE 0000 0000 




ISDIMH 


0000 0000 


ISDSCT 0000 0000 


ISDVID 0008 0008 




ISDIMN 


0000 0000 


ISDSDI 0004 0004 




Assembler 


listincr of 


CHAISD 










LOCATION 


INSTRUCTION SOURCE 


INST OPER 


COMMENT 








48 00000 


CHAISD 

* 


DSECT 


ISD HEADING 

INTERNAL SYMBOL DICTIONARY 




48 


00000 




ISDTYP 


DS H 


TYPE 








00000000 


ISDLED 


EQU 


LINKAGE EDITOR 








00000004 


ISDASM 


EQU 4 


ASSEMBLER 








00000008 


ISDFOR 


EQU 8 


FORTRAN 




48 


00002 




ISDLVL 


DS H 


LEVEL 




48 


00004 




ISDLNG 


DS F 


LENGTH 




48 


00008 




ISDDST 


DS F 


DELTA TO SYMBOL TABLE 




48 


OOOOC 




ISDNSN 


DS F 


NO. OF SECTION NAMES 




48 


00010 


48 00010 


ISDNUT 


DS F 
|ORGl ISDNUT 


NO. OF USING TABLES 




48 


00010 




ISDNST 


DS F 


NO. OF STATEMENT NOS. 




48 


00014 


48 00008 


ISDNSM 


DS F 
|ORG| ISDDST 


NO. OF SYMBOLS 




48 


00008 




ISDDPI 


DS F 


DELTA TO PRECEDING ISD 




48 


OOOOC 




ISDOMN 


DS CL8 


OUTPUT MODULE NAME 




48 


00014 




ISDNIM 


DS F 


NUMB. OF INPUT MODULES 








00000018 


ISDHSZ 


EQU *- CHAISD 


SIZE OF ISD HEADING 








48 00000 




|ORG| CHAISD 






48 


00000 




ISDSCT 


DS OF 


SECTION NAME TBL 




48 


00000 




ISDSNM 


DS CL8 


SECTION NAME 




48 


00008 




ISDVID 


DS CL8 


VERSION ID 








00000010 


ISDSSZ 


EQU *- ISDSCT 


SIZE OF SECTION NAME TABLE 








48 00000 




|ORG| CHAISD 






48 


00000 




ISDUSE 


DS OF 


USING TABLE 




48 


00000 




ISDSXN 


DS XL1 


SECTION NUMBER 




48 


00001 




ISDDIS 


DS XL3 


DISPLACEMENT 








00000004 


ISDUHS 


EQU *- ISDUSE 


SIZE OF USING TABLE HEADER 




48 


00004 




ISDFLG 


DS XL1 


UNUSED/ABS FLAGS 








00000080 


ISDUNU 


EQU X^O* 


UNUSED BIT 








00000001 


ISDABS 


EQU X'01 f 


ABSOLUTE 








00000081 


ISDUAB 


EQU X i 81 f 


BOTH 




48 


00005 






DS XL2 


NOT USED 




48 


00007 




ISDSNR 


DS XL1 


SECTION NUMBER REGISTER 1 
ETC 




48 


00008 




ISDBAS 


DS F 


BASE VALUE OR DISP 








00000008 


ISDUES 


EQU * -ISDFLG 


SIZE OF USING TABLE ENTRY 








48 00000 




[ORG I CHAISD 






48 


00000 




ISDSYM 


DS OF 


SYMBOL TABLE 




48 


00000 




ISDSMN 


DS CL8 


NAME 




48 


00008 




ISDSTP 


DS XL1 


TYPE 








00000001 


ISDINS 


EQU 1 


INSTRUCTION 








00000002 


ISDEQU 


EQU 2 


IMMEDIATE VALUE (EQUATE) 








00000003 


ISDSNA 


EQU 3 


SECTION NAME 








00000004 


ISDINT 


EQU 4 


INTEGER CONSTANT 








00000005 


ISDREL 


EQU 5 


REAL NUMBER 




(Listing 


of CHAISD 


continued 


on page 257) 
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(Listing of CHAISD continued from page 256) 



LOCATION 



INSTRUCTION 

00000006 

00000007 

00000008 

00000009 

O000OO0A 

0000000B 

oooooooc 

0000000D 
0000O00E 
00000080 
00000040 



48 00009 
48 OOOOA 
48 O0O0C 
48 0000D 

48 0000C 



48 0000C 
OOOOOOOC 



48 00010 
48 00014 



00000018 
48 00000 



48 00000 
48 00000 
48 00004 



00000008 
48 00000 



48 00000 
48 00000 
48 00008 
48 0000C 
48 00010 



00000014 
48 00000 



48 00000 
48 00000 
48 00008 



OOOOOOOC 
48 00000 



48 00000 
48 00000 
48 00008 



OOOOOOOC 



SOURCE 
ISDCHC 
ISDHEX 
ISDBIN 
ISDPAC 
ISDZON 
ISDSAD 
ISDOTH 
ISDCOM 
ISDLOG 
ISDDSB 
ISDDUM 
ISDNDM 
ISDELN 
ISDSNO 
ISDDCS 

ISDIMV 
ISDDIV 

ISDSLN 
ISDDMF 
ISDSTS 

ISDSNT 
ISDSTN 
ISDSDI 
ISDSNS 

ISDIMH 
ISDIMN 
ISDDNX 
ISDDIM 
ISDOCS 

ISDMHS 

ISDCSH 
ISDCSN 
ISDNCS 
ISDCSS 

ISDICS 
ISDINM 
ISDTXT 

ISDISZ 



INST OPER COMMENT 
EQU 6 CHAR. CONSTANT 

EQU 7 HEX. CONSTANT 

EQU 8 BINARY CONSTANT 

EQU 9 PACKED DECIMAL CONSTANT 

EQU 10 ZONED DECIMAL CONSTANT 
EQU 11 S ADCON 
EQU 12 OTHER ADCON 
EQU 13 COMPLEX 
EQU 14 LOGICAL 
EQU X'80' DSECT BIT 

EQU X'40 f DUMMY VARIABLE IN SUBRO ARG 
DS XL1 NO. OF DIMENSIONS 
DS H ENTRY LENGTH 

DS XL1 SECTION NO. 
DS XL3 DISP. IN CTL SECTION 
[ORG | ISDSNO 
DS F IMMEDIATE VALUE 

EQU ISDIMV- ISDSYM POSN. OF IMMED. VALUE 

ENTRY 

SYMBOL LENGTH 

DIMENSION FACTOR 

SIZE OF SYMBOL TABLE 



EQU 



F 

F 

♦-ISDSYM 

CHAISD 

OF 

F 

F 

* -ISDSNT 

CHAISD 

OF 

CL8 

F 

F 

F 

*- ISDIMH 

CHAISD 

OF 

CL8 

F 

*-ISDCSH 

CHAISD 

OF 

CL8 

F 

*- ISDICS 



TABLE 



STATEMENT NO 
STMT NO. 
DISPLACEMENT 
SIZE OF STMNT NO. 



TABLE 



INPUT MODULE HEADING 

INPUT MODULE NAME 

DELTA TO NEXT INPUT MODULE 

DELTA TO ISD FOR MODULE 

NO OF OUTPUT CS FROM INPUT 

MOD 

SIZE OF MODULE HEADING 

OUTPUT CTL SECTION 

OUTPUT CONTROL SECTION NAME 

NUMB OF INPUT CS. 

SIZE OF CTL SECTION HEADING 

INPUT CTL SECTION 

NAME 

TEXT ORIGIN-RELATIVE TO 

O.C.S. 

SIZE OF INPUT CTL SECTION 
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Task Monitor Interruption Table (CHAITB) 



The Task Monitor Interruption Table CITB) maintains information for queuing and 
dispatching interruptions. 

ITB r located in the Task Monitor PSECT, contains two sections? the preface, and 
the body. The preface maintains request activity information, and necessary pointers 
and flags. The body maintains the following entries: 

• Device entry (DE) - contains information for the device type for each interrup- 
tion type. Each DE carries a queue of request entries. 

• Request entry (RE) - contains information for interruption type, interruption 
handling routines, and dispatching priority. Predefined REs exist for standard 
IBM routines; additional entries may be added or deleted. Each RE carries a 
Queue Entry queue. 

• Queue entry (QE) - contains information for real or simulated interruption or 
dispatch. 

The 4096- byte ITB resides in the Task Monitor PSECT, aligned on doubleword 
boundaries. 



p 



CHAITB Storage map 



DEC 



HEX 



8 


8 


16 


10 


24 


18 


32 


20 


40 


28 


48 


30 


56 


38 


64 


40 


72 


48 


80 


50 



112 70 



144 90 



| ITBDEP | ITBDES | 


| ITBDEX | ITBDEA I 


| ITBDET | ITBDEI | 


| ITBNAP | ITBHAR | 


| ITBCAP | ITBQCT | 


I ITBRDP | ITBRDS | 


| ITBRSD | ITBRXC | 


| ITBRXN | ITBRPV | 
i 1 1 


| ITBRNP | ITBSDT | 


| ITBHDE | ITBACT | 


| ITBPDE | 


| ITBSDE | 


| ITBXDE | 



(CHAITB continued on page 259) 
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DEC HEX 



tCHAITB continued from page 258) 



176 


B0| 


ITBTDE | 


208 


DO 


ITBDPR | 


240 


F0 


ITBDSR | 


272 


110 


| ITBSDR | 


304 


130 


ITBXXR | 


336 


150 


| ITBUXR | 


368 


170 


ITBMPR | 


400 


190 


| ITBMNR | 



(CHAITB continued on page 260) 
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DEC HEX 

432 1B0 



472 1D8 
4480 1E0 



(CHAITB continued from page 259) 



520 
528 

544 

560 



208 
210 

220 

230 



592 



4088 



250 



FF8 



ITBDPI 




= 


| 1 UNNAMED | 
1 1 1 


ITBDIC 


| | ITBAIC | 
1 i \ 


1 ITBDPC | 


1 ITBDCO | 


| ITBE01 | 


| RESERVED | 


| | ITBPFP | 
1 1 1 



Fields in CHAITB — by displacement 



p 



DEC 


HEX 


FIELD 


DEC 


HEX 


FIELD 


DEC 


HEX 


FIELD 


0000 


0000 


ITBDEP 


0048 


0030 


ITBRSD 


0240 


00F0 


ITBDSR 


0004 


0004 


ITBDES 


0052 


0034 


ITBRXC 


0272 


0110 


ITBSDR 


0008 


0008 


ITBDEX 


0056 


0038 


ITBRXN 


0304 


0130 


ITBXXR 


0012 


oooc 


ITBDEA 


0060 


003C 


ITBRPV 


0336 


0150 


ITBUXR 


0016 


0010 


ITBDET 


0064 


0040 


ITBRNP 


0368 


0170 


ITBMPR 


0020 


0014 


ITBDEI 


0068 


0044 


ITBSDT 


0400 


0190 


ITBMNR 


0024 


0018 


ITBNAP 


0072 


0048 


ITBHDE 


0432 


01B0 


ITBDPI 


0028 


001C 


ITBHAR 


0076 


004C 


ITBACT 


0480 


01E0 


ITBDIC 


0032 


0020 


SYSCAP 


(EQU) 0080 


0050 


ITBPDE 


0524 


020C 


ITBAIC 


0032 


0020 


ITBCAP 


0112 


0070 


ITBSDE 


0528 


0210 


ITBDPC 


0036 


0024 


ITBQCT 


0144 


0090 


ITBXDE 


0544 


0220 


ITBDCO 


0040 


0028 


ITBRDP 


0176 


00B0 


ITBTDE 


0560 


0230 


ITBE01 


0044 


002C 


ITBRDS 


0208 


00D0 


ITBDPR 


4092 


OFFC 


ITBPFP 


Alphabetical list of 


fields in 


CHAITB 












FIELD 


DEC 


HEX 


FIELD 


DEC HEX 


FIELD 


DEC HEX 


ITBACT 


0076 


004C 


ITBDEX 


0008 0008 


ITBMNR 


0400 0190 


ITBAIC 


0524 


020C 


ITBDIC 


0480 01EO 


ITBMPR 


0368 0170 


ITBCAP 


0032 


0020 


ITBDPC 


0528 0210 


ITBNAP 


0024 0018 


ITBDCO 


0544 


0220 


ITBDPI 


0432 01B0 


ITBPDE 


0080 0050 


ITBDEA 


0012 


OOOC 


ITBDPR 


0208 00D0 


ITBPFP 


4092 OFFC 


ITBDEI 


0020 


0014 


ITBDSR 


0240 00F0 


ITBQCT 


0036 0024 


ITBDEP 


0000 


0000 


ITBE01 


0560 0230 


ITBRDP 


0040 0028 


ITBDES 


0004 


0004 


ITBHAR 


0028 001C 


ITBRDS 


0044 002C 


ITBDET 


0016 


0010 


ITBHDE 


0072 0048 


ITBRNP 


0064 0040 


(Continued on 


page 


261) 
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(Continued from page 260) 

FIELD DEC HEX FIELD DEC HEX FIELD DEC HEX 

ITBRPV 0060 003C ITBSDE 0112 0070 ITBUXR 0336 0150 

I ITBRSD 00U8 0030 ITBSDR 0272 0110 ITBXDE 0144 0090 

V ITBRXC 0052 0034 ITBSDT 0068 0044 ITBXXR 0304 0130 

ITBRXN 0056 0038 ITBTDE 0176 O0B0 SYSCAP 0032 0020 (EQU) 



( 
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Assembler listing of CHAITB 



LOCATION INSTRUCTION SOURCE 



INST OPER 



COMMENT 



49 00000 



49 00000 
49 00000 
49 00004 
49 00008 
49 0000C 

49 00010 
49 00014 

49 00018 

49 0001C 

49 00020 

49 00024 
49 00028 

49 0002C 
49 00030 
49 00034 
49 00038 

49 0003C 
49 00040 
49 00044 



49 00048 
49 0004C 



49 00050 
49 00050 
49 00070 
49 00090 
49 OO0B0 
49 000D0 
49 000F0 
49 00110 
49 00130 
49 00150 
49 00170 
49 00190 
49 001B0 
49 001DC 
49 001E0 
49 0020C 
49 00210 

49 00220 

49 00230 



49 00020 



CHAITB 


DSECT 


INTERRUPT TABLE 


* 






ITB 




DS 


OD 




ITBDEP 


DS 


F 


PTR TO PROGRAM DE 


ITBDES 


DS 


F 


PTR TO SVC DE 


ITBDEX 


DS 


F 


PTR TO EXTERNAL DE 


ITBDEA 


DS 


F 


PTR TO FIRST ASYNCHRONOUS 


♦ 






I/O DE 


ITBDET 


DS 


'F 


PTR TO TIMER DE 


ITBDEI 


DS 


F 


PTR TO FIRST SYNCHRONOUS 


* 






I/O DE 


ITBNAP 


DS 


F 


PTR TO NEXT AVAILABLE BLOCK 


* 






IN TABLE 


ITBHAR 


DS 


F 


PTR TO HIGHEST PRIORITY 


* 






ACTIVE RE 


ITBCAP 


DS 


F 


PTR TO CURRENT ACTIVE RE 


SYSCAP 


EQU 


ITBCAP 


FOR SYSTEM REFERENCE 


ITBQCT 


DS 


F 


QE COUNT 


ITBRDP 


DS 


F 


PTR TO REL FOR PROGRAM 


* 






DIAGNO 


ITBRDS 


DS 


F 


PTR TO REL FOR SVC DIAGNO 


ITBRSD 


DS 


F 


PTR TO SHUTDOWN REL 


ITBRXC 


DS 


F 


PTR TO EXTERNAL REL 


ITBRXN 


DS 


F 


PTR TO EXTERNAL REL NO USER 


♦ 






MATCH 


ITBRPV 


DS 


F 


PTR TO PRIVILEGED REL 


ITBRNP 


DS 


F 


PTR TO NON-PRIVILEGED REL 


ITBSDT 


DS 


F 


PTR TO SYSIN SDAT 


* *** 


THE 


NEXT FIELD 


IS THE HIGHEST VALID DE 


* TYPE 


SHIFTED LEFT 2 




* *** 


IT IS USED WHEE 


I SEARCHING THE DE CHAIN TO 


* DETERMINE WHEN 




* **♦ 


THE 


END HAS BEEN REACHED. 


ITBHDE 


DS 


F 


HIGHEST VALID DE TYPE 


ITBACT 


DS 


F 


COUNT OF DISPATCHED 


♦ 






NON-PRIV N369.2 


♦ 






INTERRUPT ROUTINES 


♦ 






N369.2 




DS 


OD 




ITBPDE 


DS 


8F 


PROGRAM DE 


ITBSDE 


DS 


8F 


SVC DE 


ITBXDE 


DS 


8F 


EXTERNAL DE 


ITBTDE 


DS 


8F 


TIMER DE 


ITBDPR 


DS 


8F 


DIAGNO REL FOR PROGRAM 


ITBDSR 


DS 


8F 


DIAGNO REL FOR SVC 


ITBSDR 


DS 


8F 


SHUTDOWN REL 


ITBXXR 


DS 


8F 


EXTERNAL REL 


ITBUXR 


DS 


8F 


EXTERNA! REL NO USER MATCH 


ITBMPR 


DS 


8F 


PRIVILEGED REL 


ITBMNR 


DS 


8F 


NON- PRIVILEGED REL 


ITBDPI 


DS 


11F 


ICB FOR DIAGNO RELS 




DS 


F 


NOT USED 


ITBDIC 


DS 


11F 


DUMMY ICB FOR OTHER RELS 


ITBAIC 


DS 


F 


PTR TO DUMMY ICB 


ITBDPC 


DS 


4F 


COM AREA FOR DIAGNO 


* 






DISPATCHES 


ITBDCO 


DS 


4F 


DUMMY COM AREA FOR DUMMY 


♦ 






ICB 


ITBE01 


DS 


8F 


FIRST AVAILABLE BLOCK IN 


* 






TABLE 


* *♦♦ 


THE 


SPACE FROM 


ITBE01 TO THE LAST WORD IN 



49 00FFC 



49 0OFFC 



* THE TABLE IS DIVIDED 

* *** INTO 110 BLOCKS OF 8 WORDS EACH TO BE USED 

* AS DE f RE O R QE, 

[ ORG | CHAITB+409 2 
ITBPFP DS F PTR TO NEXT PAGE OF ITB IF 

* NEEDED 



262 CHAITB 



Data Set Header/Trailer Label 1 (CHALB1) 

The Data Set Header/Trailer Label 1 (LB1) contains the system data and device- 
dependent information required to locate, and verify, the data set and its 
references. The information contained in LB1 also serves to protect the data set 
from unauthorized use. 

LB1 is IBM Standard File Label 1 which is 80 EBCDIC characters written on nine- 
track tape or BCD written on seven-track tape. In addition, LB1 must be written in 
even parity. The format of a tape volume is: 
I. Volume labels (up to 8). 
II. Data Set plus data set labels. 

1. standard header labels 1 and 2 

2. User header labels (up to 8) 

3. Tape mark 

4. Data Set Records 

5. Tape mark 

6. Standard Trailer labels 1 and 2 

7. User trailer labels (up to 8) 

8. Tape mark 

III. Additional data sets as in II above. 
IV. Tape mark. 

Standard header label 1 and standard trailer label 1 are identical in format and 
are also identical in content for a given data set, except for the label identifica- 
tion and block count. 

The LB1 table occupies 80 bytes of virtual storage, aligned on doubleword 
boundaries . 

ChALBl Storage map 



DEC 





16 
2*4 

32 
40 
48 
56 

72 



HEX 
01 



101 



18i 



201 



30 | 

I 
38| 



48) 
I 



LB1LID 




| LB1DSL | 
1 i 














LB1DID 






i 


LB1DSS | 


LB1DSS 


(CONT) 




i 

1 




LB1VSN 


|L31DSN | 
1 1 


LB1DSN 


(CONT) 




1 
1 




LB1GEN 


ILB1VNG | 
i 1 


LB1VNG | 
1 








LB1CDT 




| LB1EDT | 
1 » 




LB1EDT 


(CONT) 




| LB1DSQ 

1 


I LB1BCT 1 
I i 


LB1BCT (CONT) 




i 
i 














LB1SCD 




| LB1RS1 | 
i 1 



Fields in CHALB1 — by displacement 



DEC 


HEX 


FIELD 


DEC 


HEX 


FIELD 


DEC 


HEX 


FIELD 


0000 


0000 


LB1LID 


0031 


001F 


LB1DSN 


0054 


0036 


LB1BCT 


0000 


0000 


LB1 


0035 


0023 


LB1GEN 


0060 


003C 


LB1SCD 


0003 


0003 


LB1DSL 


0039 


0027 


LB1VNG 


0073 


0049 


LB1RS1 


0004 


0004 


LB1DID 


0041 


0029 


LB1CDT 


0080 


0050 


LB1END 


0021 


0015 


LB1DSS 


0047 


002F 


LB1EDT 








0027 


001B 


LB1VSN 


0053 


0035 


LB1DSQ 









(EQU) 
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Alphabetical list of fields in CHALB1 



FIELD 

LB1 

LB1BCT 

LB1CDT 

LB1DID 

LB1DSL 

LB1DSN 



DEC HEX 
0000 0000 
0051* 0036 
0041 0029 
0004 0004 
0003 0003 
0031 001F 



FIELD 

LB1DSQ 

LB1DSS 

LB1EDT 

LB1END 

LB1GEN 

LB1LID 



DEC HEX 
0053 0035 
0021 0015 
0047 002F 
0080 0050 
0035 0023 
0000 0000 



FIELD 
LB1RS1 
LB1SCD 
LB1VNG 
(EQU) LB1VSN 



DEC HEX 
0073 0049 
0060 003C 
0039 0027 
0027 001B 



9 



Assembler listing of CHALB1 



LOCATION INSTRUCTION SOURCE 



4A 00000 



4A 00000 
4A 00000 
4A 00003 
4A 00004 
4A 00015 
4A 0001B 
4A 0001F 
4A 00023 
4A 00027 

4A 00029 
4A 0002F 
4A 00035 
4A 00036 
4A 0003C 
4A 00049 



4A 00050 
00000050 



CHALB1 

LB1 

LB1LID 

LB1DSL 

LB1DID 

LB1DSS 

LB1VSN 

LB1DSN 

LB1GEN 

LB1VNG 

LB1CDT 
LB1EDT 
LB1DSQ 
LB1BCT 
LB1SCD 
LB1RS1 
LB1END 
LB1SZ 



INST OPER 
DSECT 

DS OF 

DS CL3 

DS CL1 

DS CL17 

DS CL6 

DS CL4 

DS CL4 

DS CL4 

DS CL2 

DS CL6 

DS CL6 

DS CL1 

DS CL6 

DS CL13 

DS CL7 

EQU * 

EQU LB1END-LB1 SIZE OF TAPE LABEL 1 



COMMENT 



LABEL IDENTIFIER 
DATA SET LABEL NUMBER 
DATA SET IDENTIFIER 
DATA SET SERIAL NUMBER 
VOLUME SEQUENCE NUMBER 
DATA SET SEQUENCE NUMBER 
GENERATION NUMBER 
VERSION NUMBER OF 
GENERATION 
CREATION DATE 
EXPIRATION DATE 
DATA SET SECURITY NUMBER 
BLOCK COUNT 
SYSTEM CODE 
RESERVED IN LABEL1 
END OF LABEL 1 
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Data Set Header/Trailer Label 2 (CHALB2) 

The Data Set Header/Trailer Label 2 (LB2) contains the data set attributes. These 
attributes assist in reading the data set from the tape and also serve as a source of 
fill for the null parameters in the Data Control Block (DCB) • 

LB2 is IBM OS/360 Standard Tape File Label 2 which is written in EBCDIC on nine- 
track tape or in BCD in seven-track tape. In addition, LB2 must be written in even 
parity. The format of a tape volume is: 
I. Volume labels (up to 8). 
II. Data Set plus data set labels. 

1. Standard header labels 1 and 2 

2. User header labels (up to 8) 

3. Tape mark 

4. Data Set Records 

5. Tape mark 

6. Standard Trailer labels 1 and 2 

7. User trailer labels (up to 8) 

8. Tape mark 

III. Additional data sets as in II above. 
IV. Tape mark. 

Standard header label 2 and standard trailer label 2 are identical in format and 
are also identical in content for a given data set, except for the label identifica- 
tion and block count. 

The LB2 table occupies 80 bytes of virtual storage, aligned on doubleword 
boundaries. 

CHALB2 Storage map 



DEC 




HEX 



8 


8 


16 


10 



32 



48 



20 



30 



| LB2LID 




[LB2DSL |LB2RFM | 
f 1 1 


LB2BFS 




| LB2BFS (CONT) 


I 
1 




LB2RLN 




|LB2DEN | 
1 1 


(LB2DSP | 
f 1 






LB 2 J ID 












1 
i 


LB2TRT 


| LB2PCC | 
« 1 












LB2RSV 






1 
1 


LB2BOF 


1 
1 












LB2RS2 





Fields in CHALB2 — by displacement 



DEC HEX FIELD 
0000 0000 LB2LID 
0000 0000 LB2 

0003 0003 LB2DSL 

0004 0004 LB2RFM 

0005 0005 LB2BFS 



DEC HEX FIELD 
0010 000A LB2RLN 

0015 000F LB2DEN 

0016 0010 LB2DSP 

0017 0011 LB2JID 
0034 0022 LB2TRT 



DEC HEX 

0036 0024 

0037 0025 
0050 0032 
0052 0034 
0080 0050 



FIELD 

LB2PCC 

LB2RSV 

LB2BOF 

LB2RS2 

LB2END 



(EQU) 
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Alphabetical list of fields in CHALB2 



FIELD 
LB2 


DEC 
0000 


HEX 
0000 


LB2BFS 


0005 


0005 


LB2BOF 


0050 


0032 


LB2DEN 


0015 


OOOF 


LB2DSL 


0003 


0003 



FIELD 

LB2DSP 

LB2END 

LB2JID 

LB2LID 

LB2PCC 



DEC HEX 
0016 0010 



FIELD 



LB2RFM 
0080 0050 (EQU) LB2RLN 
0017 0011 LB2RSV 
0000 0000 LB2RS2 
0036 0024 LB2TRT 



DEC HEX 
0004 0004 
0010 000A 
0037 0025 
0052 0034 
0034 0022 



Assembler listing of CHALB2 



LOCATION INSTRUCTION SOURCE INST OPER 





4B 


00000 


CHALB2 


DSECT 




4B 00000 






LB2 


DS 


OF 


4B 00000 






LB2LID 


DS 


CL3 


4B 00003 






LB2DSL 


DS 


CL1 


4B 00004 






LB2RFM 


DS 


CL1 


4B 00005 






LB2BFS 


DS 


CL5 


4B 0000A 






LB2RLN 


DS 


CL5 


4B O0O0F 






LB2DEN 


DS 


CL1 


4B 00010 






LB2DSP 


DS 


CL1 


4B 00011 






LB2JID 


DS 


CL17 


4B 00022 






LB2TRT 


DS 


CL2 


4B 00024 






LB2PCC 


DS 


CL1 


4B 00025 






LB2RSV 


DS 


CL13 


4B 00032 






LB2BOF 


DS 


CL2 


4B 00034 






LB2RS2 


DS 


CL28 




4B 


00050 


LB2END 


EQU 


* 




00000050 


LB2SZ 


EQU 


LB2E1 



COMMENT 



LABEL IDENTIFIER 

FILE LABEL NUMBER 

RECORD FORMAT 

BLOCK LENGTH 

LOGICAL RECORD LENGTH 

DENSITY 

FILE POSITION 

JOB/STEP IDENTIFICATION 

TAPE RECORDING TECHNIQUE 

PRINT CONTROL CHARACTER 

RESERVED IN LABEL2 

BUFFER OFFSET (ASCII) 

RESERVED IN LABEL2 

END OF LABEL 2 



LB2END-LB2 SIZE OF TAPE LABEL 2 
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System Operator Log (CHALOG) Header 

The System Operator Log (SYSLOG) contains a record of the communications between 
the operator and the system. 

Each data set in SYSLOG, a generation data group, is VAM sequential and contains 
the log information for a startup-to- shut down session. 

SYSLOG occupies a minimum of 33 bytes of virtual storage, aligned on doubleword 
boundaries. 

CHALOG Storage map 



DEC 


8 

16 

24 



HEX 



0| 

1 




LOGLEN 


1 

1 




LOGDAT 


8| 
1 




LOGDAT (CONT) 


1 

1 




LOGTIM 


10 | 
1 


LOGTIM 


(CONT) | 

1 




LOGSPR 




18| 
1 






LOGUSE 







Fields in CHALOG — by displacement 



DEC HEX FIELD 
0000 0000 LOGLEN 
0004 0004 LOGDAT 



DEC HEX FIELD 
0012 0O0C LOGTIM 
0018 0012 LOGSPR 



DEC HEX FIELD 
0024 0018 LOGUSE 
0032 0020 LOGMES 



Alphabetical list of fields in CHALOG 



FIELD 

LOGDAT 

LOGLEN 



DEC HEX 
0004 0004 
0000 0000 



FIELD 

LOGMES 

LOGSPR 



DEC HEX 
0032 0020 
0018 0012 



FIELD DEC HEX 
LOGTIM 0012 000C 
LOGUSE 0024 0018 



Assembler listing of CHALOG 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 




4C 


00000 


CHALOG 


DSECT 




4C 00000 






DS 


0D 


4C 00000 






LOGLEN 


DS 


F 


4C 00004 






LOGDAT 


DS 


CL8 


4C 0000C 






LOGTIM 


DS 


CL6 


4C 00012 






LOGSPR 


DS 


6C 


4C 00018 






LOGUSE 

LOGMES 

* 


DS 


8C 


4C 00020 






DS 


OC 



COMMENT 

HEADER FOR MESSAGES TO 

BE PUT IN SYSLOG- ( 

LENGTH OF MESSAGE 

(INCLUDING HEADING OF 32 BYTES) 

DATE f MM/DD/YY' FORMAT 

TIME ' HH:MM' FORMAT 

SIX SPARE BYTES 

EIGHT CHARACTER USER- ID OF 

MESSAGE SENDER 

MESSAGE TEXT MAX. OF 18888 

CHARACTERS 
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Message Control Block (CHAMCB) 



The Message Control Block (MCB) controls message transmission between tasks • It 
contains a length indicator which counts the number of doublewords of textual infor- 
mation, a code to determine the type of intertask message being sent, and indicators 
that a message reply is expected or that a message constitutes a reply to some other 
message. 

The MCB also contains an SVC which the supervisor recognizes as a VSEND, or inter- 
task communication operation, consisting of: task identification of the sending and 
receiving tasks; and, the address of a Message Event control Block (M£B) , if a reply 
is expected. 

The MCB serves the users of the VSEND operation; e.g.. Device Management, Batch 
Monitor, etc. 

The MCB occupies a maximum of 1920 bytes of virtual storage, aligned on doubleword 
boundaries, and is contained within one page of storage. 



t 



CHAMCB Storage map 



DEC 




HEX 



| MCBLNG | MCBCOD | MCBRCD 

I 1 I 

8 J MCBSND | MCBRCV 

i I 



± 



MCBCD1 | 
L 



MCB SVC 



MCBSPR 



MCBECB 



Fields in CHAMCB — by displacement 



DEC HEX FIELD 

0000 0000 MCBLNG 

0001 0001 MCBCN 
0001 0001 MCBRE 
0001 0001 MCBRX 
0001 0001 MCBCOD 



DEC HEX FIELD 

0002 0002 MCBRCD 

(ECU) 0003 0003 MCBCD1 

(EQU) 0004 0004 MCBSVC 

CEQU) 0006 0006 MCBSPR 

0008 0008 MCBSND 



DEC HEX FIELD 
0010 000A MCBRCV 
0012 000C MCBMEB 
0012 00OC MCBECB 
0016 0010 MCBTXT 



(EQU) 



Alphabetical list of fields in CHAMCB 



FIELD 

MCBCD1 

MCBCN 

MCBCOD 

MCBECB 

MCBLNG 



DEC HEX 
0003 0003 



FIELD 
MCBMEB 



0001 0001 (EQU) MCBRCD 



0001 0001 
0012 OO0C 
0000 0000 



MCBRCV 

MCBRE 

MCBRX 



DEC HEX 



FIELD 



0012 000C (EQU) MCBSND 

0002 0002 MCBSPR 

0010 OO0A MCBSVC 

0001 0001 (EQU) MCBTXT 

0001 0001 (EQU) 



DEC HEX 
0008 0008 
0006 0006 
0004 0004 
0016 0010 



Assembler listing of CHAMCB 



LOCATION INSTRUCTION SOURCE 



4E 00000 



4E 00000 
4E 00000 

4E 00001 



4E 00001 
00000080 
4E 00001 

00000040 
4E 00001 
00000020 



4E 00002 
4E 00003 
(Listing 



Of CHAMCB 



CHAMCB 
MCBLNG 

MCBCOD 

MCBRX 

MCBRXM 

MCBRE 

* 

MCBREM 

MCBCN 

MCBCNM 

MCBRCD 

MCBCD1 

continued 



INST OPER 
DSECT 

DS 0D 

DS XL1 

DS XL1 

EQU MCBCOD 

EQU X^O' 

EQU MCBCOD 

EQU X f 40' 

EQU MCBCOD 

EQU X^O* 

DS XL1 

DS XL1 

on page 269) 



COMMENT 



MESSAGE LENGTH IN DOUBLE 

WORDS 

FLAG BYTE 

MCBCOD REPLY EXPECTED FLAG 

REPLY EXPECTED MASK 

REPLY FLAG- MEB ADDRESS 

IMPLIED IF ON (1) 

REPLY MASK 

REPLY CANCELLATION MESSAGE 

REPLY CANCELLATION MESSAGE 

MASK 

RETURN CODE FOR MEB 

MCB MESSAGE CODE 
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(Listing of CHAMCB continued from page 268) 



LOCATION 


4E 


00004 


HE 


00004 


4E 


00006 


4E 


00008 


4E 


0000A 


HE 


OOOOC 


4E 


OOOOC 


4E 


00010 


4E 


00010 



<IE OOOOC 



SOURCE 


INST 


OPER 


COMMENT 




DS 


OH 




MCBSVC 


DS 


H 


VSEND SVC 


MCBSPR 


DS 


H 


SPARE SPACE 


MCBSND 


DS 


H 


TID OF THE SENDING TASK 


MCBRCV 


DS 


H 


TID OF THE RECEIVING TAS] 




DS 


OF 




MCBECB 


DS 


F 


ADDRESS OF EVENT CONTROL 


* 






BLOCK 


MCBMEB 


EQU 


MCBECB 


EVENT CONTROL BLOCK 




DS 


OD 




MCBTXT 


DS 


OC 


MESSAGE TEXT 
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Multiplexer Channel Table (CHAMCH) 



The Multiplexer Channel Table (CHAMCH) contains status information concerning the 
connection between the multiplexer channel and its assigned control units. CHAMCH 
occupies from 4 to 64 bytes of core storage, aligned on word boundaries. 



t 



CHAMCH Storage map 



DEC 




HEX 



0|MCHF (UNNAMED | 



UNNAMED 



ORG MCHBEG 



0|MCHF1 |MCHF2 | 



MCHCTD 



Fields in CHAMCH — by displacement 



DEC HEX FIELD 
0000 0000 MCHF1 
0000 0000 MCHFLG 
0000 0000 MCHS 
0000 0000 MCHR 



DEC HEX FIELD 

0000 0000 MCHE 

0000 0000 MCHP 

CEQU) 0000 0000 MCHF 

(EQU) 0000 0000 MCHBEG 



DEC HEX FIELD 
(EQU) 0001 0001 MCHF2 
(EQU) 0002 0002 MCHCTD 



Alphabetical list of fields in CHAMCH 



FIELD 
MCHBEG 


DEC 
0000 


HEX 
0000 




FIELD 
MCHFLG 


DEC 
0000 


HEX 
0000 


FIELD 
MCHR 


DEC HEX 

0000 0000 (EQU) 


MCHCTD 


0002 


0002 




MCHF1 


0000 


0000 


MCHS 


0000 0000 (EQU) 


MCHE 


0000 


0000 


(EQU) 


MCHF2 


0001 


0001 






MCHF 


0000 


0000 




MCHP 


0000 


0000 (EQ1 


J) 
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Assembler listing of CHAMCH 



LOCATION 



INSTRUCTION 
4F 00000 



4F 00000 

l*F 00000 
4F 00001 
4F 00002 

4F 00000 
4F 00000 



UF 00000 



<*F 00000 
00000080 
4F 00000 
00000040 
4F 00000 
00000020 
*4F 00000 

00000001 



i*F 00001 
MF 00002 



SOURCE INST OPER COMMENT 

CHAMCH DSECT MULTIPLEXOR CHANNEL (N) 

* TABLE (N=0 TO 31) 
MCHBEG DS OF ALIGN TABLE ON WORD 

* BOUNDARY 
MCHF DS C NOT USED 

DS XL1 RESERVED 
DS H NOT USED 

(ORG | MCHBEG 
DS OH FLAG FIELD 

DS X FIRST BYTE OF FLAG FIELD 

EQU MCHF1 PARTITIONED FLAG 
EQU X'SO - PARTITIONED FLAG MASK 
EQU MCHF1 NONEXISTENT FLAG 
EQU X f 40" NONEXISTENT FLAG MASK 
EQU MCHF1 RESERVED FLAG 
EQU X'20» RESERVED MASK 
EQU MCHF1 SELECTOR SUBCHAN ON MPX 

FLAG 
EQU X^l' SELECTOR SUBCHAN ON MPX 

MASK 
DS X SECOND BYTE OF FLAG FIELD 

DS H CONTROL UNIT TABLE 

DISPLACEMENT 

WORD ENTRY (I.E., FIELDS 



MCHFLG 

MCHF1 

MCHP 

MCHPM 

MCHE 

MCHEM 

MCHR 

MCHRM 

MCHS 

MCHSM 

MCHF 2 
MCHCTD 

* 

* NOTE 1- 

* LABELED 

* 
* 
* 
* 
* 
* 
* 
* 
* 
* 



FOR EVERY CONTROL 



THERE IS A ONE 

MCHFLG AND 

MCHCTD ARE REPEATED) 

UNIT ADDRESS ON THIS 

CHANNEL BEGINNING WITH ZERO AND 

CONTINUING IN SEQUENTIAL 

ORDER UP TO AND INCLUDING THE HIGHEST 

ACTIVE ADDRESS (I.E., 

HIGHEST CONTROL UNIT ADDRESS THAT HAS 

BEEN SPECIFIED AS 

HAVING A CONTROL UNIT PHYSICALLY COUPLED 

TO IT) . 



I ( 
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Message Event Control Block (CHAMEB) 

The Message Event Control Block (MEB) controls both the waiting for completion of 
a VSEND event and the posting of the event. 

The MEB aids the message control block (MCB) in inter-task communication. When an 
MCB is constructed to send a message which requires a reply, an MEB is also con- 
structed containing an AWAIT or TWAIT SVC. 

The MEB furnishes data to the main operator control program, batch monitor, and 
CLI, etc. 

Sixteen bytes of virtual storage are allocated to the MEB, aligned on doubleword 
boundaries. 

CHAMEB Storage map 



DEC 




HEX 
Of 



MEBECB 



MEBSVC 



MEBTID 



MEBKEY 



1. 



MEBMCB 



UNNAMED 



Fields in CHAMEB — by displacement 



DEC HEX FIELD 
0000 0000 MEBEV 
0000 0000 MEBWT 
0000 0000 MEBECB 



DEC HEX FIELD 

CEQU) 0002 0002 MEBSVC 

(EQU) 0004 0004 MEBTID 

0006 0006 MEBKEY 



DEC HEX FIELD 
0008 0008 MEBMCB 



Alphabetical list of fields in CHAMEB 



FIELD 
MEBECB 


DEC HEX 
0000 0000 


FIELD 
MEBMCB 


DEC HEX 
0008 0008 


FIELD DEC HEX 

MEBWT 0000 0000 (EQU) 


MEBEV 


0000 0000 


(EQU) MEBSVC 


0002 0002 




MEBKEY 


0006 0006 


MEBTID 


0004 0004 




.stinq of 


CHAMEB 










LOCATION 


INSTRUCTION SOURCE 


INST OPER 


COMMENT 




50 00000 


CHAMEB 


DSECT 


MESSAGE EVENT CONTROL BLOCK 


50 00000 




* 


DS 


0D 


DOUBLE WORD BOUNDARY 
ALIGNMENT 


50 00000 




MEBECB 


DS 


XL2 


EVENT COMPLETION FLAGS 




50 00000 


MEBWT 


EQU 


MEBECB 


WAIT FLAG 




00000080 


MEBWTM 


EQU 


x'so' 


WAIT MASK 




50 00000 


MEBEV 


EQU 


MEBECB 


EVENT COMPLETION FLAG 




00000040 


MEBEVM 


EQU 


x , 40 i 


EVENT COMPLETION MASK 


50 00002 




MEBSVC 


DS 


H 


SCV HALFWORD 


50 00004 




MEBTID 


DS 


H 


TID OF RECEIVING TASK 


50 00006 




MEBKEY 


DS 


H 


RETURN CODE 


50 00008 




MEBMCB 


DS 


F 


ADDRESS OF MCB 


50 0000C 






DS 


F 


UNUSED 
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Merge List (CHAMGL) 

The PL/I merge list supplies the Object Data Set Converter CODC) with object 
module names for conversion to TSS object modules, CHAMGL is built by the PL/I Pro- 
gram Language Controller (PLC). 
The 128-byte Merge List is aligned on word boundaries, 

CHAMGL Storage map 



DEC 




HEX 
01 



MGLCNT 



MGLPTR 



MGLNME 



16 



10 1 



Fields in CHAMGL — by displacement 



UNNAMED 



DEC HEX FIELD 
0000 0000 MGLCNT 



DEC HEX FIELD 
0004 0004 MGLPTR 



DEC HEX FIELD 
0008 0008 MGLNME 



Alphabetical list of fields in CHAMGL 



FIELD 
MGLCNT 


DEC HEX 
0000 0000 


FIELD DEC HEX 
MGLNME 0008 0008 


Assembler listing of 


CHAMGL 






LOCATION 


INSTRUCTION 


SOURCE 


INST OPER 




51 00000 


CHAMGL 


DSECT 


51 00000 




MGLCNT 


DS F 


51 00004 




MGLPTR 


DS F 


51 00008 




MGLNME 


DS D 


51 00010 






DS 14D 



FIELD 
MGLPTR 



DEC HEX 
0004 0004 



COMMENT 

DSECT FOR MERGELIST BLOCKS 

COUNT OF MODULE NAMES IN 

THIS BLOCK 

FOREWARD POINTER TO NEXT 

BLOCK 

FIRST MODULE NAME IN THE 

BLOCK 

SPACE RESERVED FOR 14 MORE 

NAMES 
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Symbol Control Block (CHAMSW) 

The Symbol Control Block is used to define a symbol and contains all of the 
symbol attributes. It may also be used to resolve a literal. During language area 
processing, one SCB will exist for each symbol or literal in the polish string. 

CHAMSW Storage map 



DEC 


8 

16 
24 
32 
40 



HEX 



01 

1 




MSWLEN 




MSWSI ZE | 


8| 
1 




MSWUNUS 


|MSWTYPE [MSWCLASS (MSWFLAGS I MSWBLNK1| 
i I 1 1 1 


10| 
i 




MSWBASE 




MSWPTR | 


18 | 
1 


MSWSDEV 


| MSWCYL 
1 


I MSWTRK | MSWREC 


(MSWDEVC [MSWMODE I 
1 1 i 


20| 
[ 




MSWQUAL 




MSWBKPT | 


28 | 
1 






MSWSYMB 





Fields in CHAMSW — by displacement 



DEC 

0000 

0004 

0008 

0012 

0012 

0012 

0012 

0013 

0013 

0013 

0013 

0013 

0013 

0014 

0014 

0014 

0014 

0014 



HEX 

0000 

0004 

0008 

000C 

000C 

000C 

000C 

000D 

000D 

000D 

000D 

000D 

000D 

000E 

000E 

O0OE 

000E 

O00E 



FIELD 

MSWLEN 

MSWSI ZE 

MSWUNUS 

MSWINT 

MSWCHAR 

MSWHEX 

MSWTYPE 

MSWNAD 

MSWLIT 

MSWEXT 

MSWSP 

MSWSYS 

MS WC LASS 

MSWRCD 

MSWTRCK 

MSWCYLR 

MSWPHYS 

MSWWKAR 



(EQU) 
(EQU) 
(EQU) 

(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 

(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 



HEX 

000E 

000E 

O00E 

O0OE 

000F 

000F 

O0OF 

000F 

000F 

000F 

000F 

000F 

000F 

0010 

0014 

0018 

001A 

001B 



FIELD 

MSWSUBJ 

MSWNULL 

MSWUNDF 

MSWFLAGS 

MSWBUND 

MSWBINT 

MSWBINS 

MSWBEOF 

MSWBOVF 

MSWBREC 

MSWBFLG 

MSWBRET 

MSWBLNK1 

MSWBASE 

MSWPTR 

MSWSDEV 

MSWCYL 

MSWTRK 



(EQU) 

(EQU) 
(EQU) 

(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 




FIELD 

MSWREC 

MSW2301 

MSW2314 

MSW2311 

MSW14 03 

MSW2400 

MSW2540 

MSWTERM 

MSWDEVC 

MSWMODE 

MSWEXTN 

MSWVM1 

MSWVM 

MSWRM1 

MSWRM 

MSWQUAL 

MSWBKPT 

MSWSYMB 



(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 



(EQU) 
(EQU) 
(EQU) 
(EQU) 

(EQU) 



Alphabetical list of fields in CHAMSW 



FIELD 

MSWBASE 

MSWBEOF 

MSWBFLG 

MSWBINS 

MSWBINT 

MSWBKPT 

MSWBLNK1 

MSWBOVF 

MSWBREC 

MSWBRET 

MSWBUND 

MSWCHAR 

MSWCLASS 

MSWCYL 

MSWCYLR 

MSWDEVC 

MSWEXT 

MSWEXTN 



DEC 

0016 

0015 

0015 

0015 

0015 

0036 

0015 

0015 

0015 

0015 

0015 

0012 

0013 

0026 

0014 

0030 

0013 

0032 



HEX 

0010 

000F 

000F 

OOOF 

000F 

0024 

OOOF 

OOOF 

OOOF 

OOOF 

OOOF 

000C 

000D 

001A 

000E 

001E 

000D 

0020 



(EQU) 
(EQU) 
(EQU) 
(EQU) 



(EQU) 
(EQU) 
(EQU) 
(EQU) 

(EQU) 



(EQU) 

(EQU) 

(EQU) 



FIELD 

MSWFLAGS 

MSWHEX 

MSWINT 

MSWLEN 

MSWLIT 

MSWMODE 

MSWNAD 

MSWNULL 

MSWPHYS 

MSWPTR 

MSWQUAL 

MSWRCD 

MSWREC 

MSWRM 

MSWRM1 

MSWSDEV 

MSWSIZE 

MSWSP 



DEC 

0014 

0012 

0012 

0000 

0013 

0031 

0013 

0014 

0014 

0020 

0032 

0014 

0028 

0032 

0032 

0024 

0004 

0013 



HEX 

000E 
000C 

oooc 

0000 
000D 
001F 
000D 
0O0E 
O00E 
0014 
0020 
000E 
001C 
0020 
0020 
0018 
0004 
000D 



(EQU) 
(EQU) 

(EQU) 

(EQU) 
(EQU) 
(EQU) 



(EQU) 

(EQU) 
(EQU) 



(EQU) 



FIELD 

MSWSUBJ 

MSWSYMB 

MSWSYS 

MSWTERM 

MSWTRCK 

MSWTRK 

MSWTYPE 

MSWUNDF 

MSWUNUS 

MSWVM 

MSWVM1 

MSWWKAR 

MSW1403 

MSW2301 

MSW2311 

MSW2314 

M5W2400 

MSW2540 



DEC 

0014 

0040 

0013 

0030 

0014 

0027 

0012 

0014 

0008 

0032 

0032 

0014 

0030 

0030 

0030 

0030 

0030 

0030 



HEX 

000E 

0028 

000D 

001E 

000E 

001B 

OOOC 

O00E 

0008 

0020 

0020 

OOOE 

001E 

001E 

001E 

001E 

001E 

001E 



(EQU) 

(EQU) 
(EQU) 
(EQU) 



(EQU) 

(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
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Assembler listing of CHAMSW 



<v 



LOCATION INSTRUCTION SOURCE INST OPER 

53 00000 CHAMSW DSECT 
********************* SYMBOL CO 
53 00000 MSWLEN DS CL4 

* 



COMMENT 



NTROL BLOCK ******** 
BYTES NEEDED FOR AN ITEM 
0-64K 
********************************************************************** 

5 3 00004 MSWSIZE DS CL4 NUMBER MEMORY ELEMENTS 

* NEEDED 0-64K 
*********************************************************************** 

* CLASSIFICATION 

53 00008 MSWUNUS DS CL4 UNUSED BYTES TO KEEP MSW DW 

* BOUNDARY 
*********************************************************************** 



53 


OOOOC 


MSWTYPE 


DS 


CL1 


DESIGNATION ASTO VALUE 




53 OOOOC 


MSWHEX 


EQU 


MSWTYPE 






00000001 


MSWHEXM 


EQU 


X'Ol 1 


HEX 




53 OOOOC 


MSWCHAR 


EQU 


MSWTYPE 






00000002 


MSWCHARM 


EQU 


X , 02 f 


CHARACTER 




53 OOOOC 


MSWINT 


EQU 


MSWTYPE 






00000003 


MSWINTM 


EQU 


X'03' 


INTEGER 


*********************************************************************** 


53 


0000D 


MSWCLASS 


DS 


CL1 


DESIGNATES TYPE OF SYMBOL 




53 O0O0D 


MSWSYS 


EQU 


MSWCLASS 






00000001 


MSWSYSM 


EQU 


X'Ol 1 


SYSTEM- $ 




53 0000D 


MSWSP 


EQU 


MSWCLASS 






00000002 


MSWSPM 


EQU 


X , 02 i 


SP 




53 0000D 


MSWEXT 


EQU 


MSWCLASS 






00000003 


MSWEXTM 


EQU 


X'03' 


EXTERNAL 




53 0000D 


MSWLIT 


EQU 


MSWCLASS 






00000004 


MSWLITM 


EQU 


X f 04 f 


LITERAL 




53 0000D 


MSWNAD 


EQU 


MSWCLASS 






00000005 


MSWNADM 

* 


EQU 


X'OS' 


IMMEDIATE DATA - NO ADDRESS 
FLAG 


*********************************************************************** 


53 


OOOOE 


MSWFLAGS 


DS 


CL1 






53 OOOOE 


MSWUNDF 


EQU 


MSWFLAGS 


- UNDEFINED SYMBOL X § 80 f 




00000080 


MSWUNDFM 


EQU 


X'80' 






53 OOOOE 


MSWNULL 


EQU 


MSWFLAGS 


1 - NULL MSW X'40* 




00000040 


MSWNULLM 


EQU 


X^O* 






53 OOOOE 


MSWSUBJ 


EQU 


MSWFLAGS 


2 - SUBJECT MSW X^O' 




00000020 


MSWSUBJM 


EQU 


X^O' 






53 OOOOE 


MSWWKAR 


EQU 


MSWFLAGS 


3 - DATA IN WORK AREA X'lO 1 




00000010 


MSWWKARM 


EQU 


X'10 1 






53 OOOOE 


MSWPHYS 


EQU 


MSWFLAGS 


4 - PHYSICAL DATA X^S* 




00000008 


MSWPHYSM 


EQU 


X f 08 f 






53 OOOOE 


MSWCYLR 


EQU 


MSWFLAGS 






00000004 


MSWCYLRM 


EQU 


X , 04 t 


BIT 5 - CYLINDER = 




53 OOOOE 


MSWTRCK 


EQU 


MSWFLAGS 






00000002 


MSWTRCKM 


EQU 


X'02' 


BIT 6 - TRACK = 




53 OOOOE 


MSWRCD 


EQU 


MSWFLAGS 






00000001 


MSWRCDM 


EQU 


X'Ol' 


BIT 7 - RECORD = 


********************************************************************** 


53 


0000F 


MSWBLNK1 


DS 


CL1 


KEYWORD FLAGS 




53 0000F 


MSWBRET 


EQU 


MSWBLNK1 






00000080 


MSWBRETM 


EQU 


X^O" 


MORE DATA TO FORMAT DUMP 




53 0000F 


MSWBFLG 


EQU 


MSWBLNK1 






00000040 


MSWBFLGM 


EQU 


X^O' 


ALL OF AT OR PATCH TABLE 




53 0000F 


MSWBREC 


EQU 


MSWBLNK1 






00000020 


MSWBRECM 


EQU 


X^O' 


RECORD OVER 4096 BYTES 




53 0000F 


MSWBOVF 


EQU 


M^WBLNKl 






00000010 


MSWBOVFM 


EQU 


X'lO 1 


SET OVERFLOW CONDITION 




53 OOOOF 


MSWBEOF 


EQU 


MSWBLNK1 






00000008 


MSWBEOFM 

* 


EQU 


X f 08 f 


END OF FILE CONDITION FROM 
I/O 




53 OOOOF 


MSWBINS 


EQU 


MSWBLNK1 






00000004 


MSWBINSM 

* 


EQU 


X , 04 f 


ONE BYTE OF INSTRUCTION IN 
ACB 




53 OOOOF 


MSWBINT 


EQU 


MSWBLNK1 






00000002 


MSWBINTM 


EQU 


X , 02 i 


TWO BYTES OF INSTRUCTION IS 
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(Listing of CHAMSW continued from page 275) 



LOCATION INSTRUCTION 

53 000OF 
00000001 
******************** 

53 00010 
******************** 

53 00014 



INST OPER 



********* 
53 00018 
53 0001a 
53 0001B 
53 0001C 
53 0001E 



*********** 



53 0001F 
********* 

53 00020 



53 0001E 
00000000 
53 0001E 
00000001 
53 0001E 
00000002 
53 0001E 
00000003 
53 0001E 
00000004 
53 0001E 
00000005 
53 0001E 
00000006 

*********** 



53 00020 
00000000 
53 00020 
00000001 
53 00020 
00000002 
53 00020 
00000003 
53 00020 
00000004 



******************** 
53 00024 

******************** 
53 00028 

******************** 



SOURCE 

* 

MSWBUND EQU 

MSWBUNDM EQU 

*************** 

MSWBASE DS 
*************** 

MSWPTR DS 

*************** 

MSWSDEV DS 

MSWCYL DS 

MSWTRK DS 

MSWREC DS 

MSWDEVC DS 

MSWTERM EQU 

MSWTERMM EQU 

MSW2540 EQU 

MSW2540M EQU 

MSW2400 EQU 

MSW2400M EQU 

MSW1403 EQU 

MSW14 03M EQU 

MSW2311 EQU 

MSW2311M EQU 

MSW2314 EQU 

MSW2314M EQU 

MSW2301 EQU 

MSW2301M EQU 

MSWMODE DS 
*************** 

MSWQUAL DS 

* 

MSWRM EQU 

MSWRMM EQU 

MSWRM1 EQU 

MSWRM1M EQU 

MSWVM EQU 

MSWVMM EQU 

MSWVM 1 EQU 

MSWVM1M EQU 

MSWEXTN EQU 

MSWEXTNM EQU 
* 
* 

*************** 

MSWBKPT DS 
* 
*************** 

MSWSYMB DS 
* 
*************** 



MSWBLNK1 
X'Ol' 
********* 

CL4 
********* 

CL4 

********* 
CL2 
CLl 
CL1 
CL2 
CLl 

MSWDEVC 
X'OO' 
MSWDEVC 
X'Ol* 
MSWDEVC 
X , 02 f 
MSWDEVC 
X f 03 f 
MSWDEVC 
X , 04* 
MSWDEVC 
X'05 1 
MSWDEVC 

x'06 f 

CLl 
********* 

CL4 



COMMENT 
ACB 

UNUSED FLAG 
*************************** 

ADDRESS OF MEMORY AREA 
*************************** 

CONSTANT USED TO CALCULATE 
ADDRESS 
*************************** 

DEVICE ADDRESS 
CYLINDER NUMBER 
TRACK NUMBER 
RECORD NUMBER 
DEVICE CODE IN HEX 

TERMINAL 

2540 CARD READ PUNCH 



2400 MAGNETIC TAPE 

1403 PRINTER 

2311 DISK STORAGE DRIVE 

2314 STORAGE FACILITY 

2301 DRUM STORAGE 

MODE SET 
*************************** 

SYMBOL RESIDES IN RM OR VM 
ONE BYTE EQUALS 
QUALIFICATION 

REAL MEMORY UNQUALIFIED 

REAL MEMORY QUALIFIED 

VIRTUAL MEMORY UNQUALIFIED 

VIRTUAL MEMORY QUALIFIED 

EXTERNAL QUALIFIATION 
THREE BYTES EQUAL 
PREFIX FOR RM 
OR TASKID 
************************************ 

CL4 POINTS TO ORIGINAL MSW FOR 
$ OR SP 
********************* *j* ************* 

CL8 STRING OF ALPHA OR NUMERIC 
CHAR 
************************************ 



MSWQUAL 

X'OO' 

MSWQUAL 

X'Ol 1 

MSWQUAL 

X , 02 l 

MSWQUAL 

X , 03 f 

MSWQUAL 

X , 04' 



276 CHAMSW 



Multiterminal Status Control Block (CHAMTS) 

There are two types of CHAMTS used by RTAM: a system CHAMTS contains a pointer to 
the system Terminal Control Table; an application CHAMTS contains pointers to the 
application Terminal Control Table. Both types of CHAMTS serve as the basic communi- 
cation links between a task, in virtual storage, and the resident portion of RTAM; 
they enable both virtual and resident storage programs to reference the Terminal Con- 
trol Tables. CHAMTS occupies 64 bytes of storage. 

CHAMTS Storage map 



DEC 


8 

16 

24 

32 

40 
48 



HEX 



0| 

1 




MTSCPTB 




|MTSLCK | 
1 1 


UNNAMED 


8| 
1 








MTSAPN 






10| 
1 




MTSTCP 




1 

1 




MTSBUF 


18| 
1 


MTSMAX 


1 
1 


MTSCUR 


1 
1 


MTSBLH 


| MTSDSH 

i 



20|MTSFLG1 (MTSFLG2 

i I L 

28 I 



MTSVMP 



MTSSLT 



MTSRCT 



MTSCSW 



301 



I. 



MTSTLM 



i 



MTSRAN 



UNNAMED 



Fields in CHAMTS — by displacement 



DEC HEX FIELD 
0000 0000 MTSCPTB 
000 4 0004 MTSLCK 
0008 0008 MTSAPN 
0016 0010 MTSTCP 
0020 0014 MTSBUF 
0024 0018 MTSMAX 



DEC HEX FIELD 
0026 001A MTSCUR 
0028 001C MTSBLH 
0030 001E MTSDSH 

0032 0020 MTSFLG1 

0033 0021 MTSFLG2 

0034 0022 MTSVMP 



DEC HEX FIELD 
0036 0024 MTSSLT 
0038 0026 MTSRCT 
0040 0028 MTSCSW 
0048 0030 MTSTLM 
0050 0032 MTSRAN 



Alphabetical list of fields in CHAMTS 



FIELD 

MTSAPN 

MTSBLH 

MTSBUF 

MTSCPTB 

MTSCSW 

MTSCUR 



DEC HEX 
0008 0008 
0028 001C 
0020 0014 
0000 0000 
0040 0028 
0026 001A 



FIELD 

MTSDSH 

MTSFLG1 

MTSFLG2 

MTSLCK 

MTSMAX 

MTSRAN 



DEC HEX 
0030 001E 

0032 0020 

0033 0021 
0004 0004 
0024 0018 
0050 0032 



FIELD 

MTSRCT 

MTSSLT 

MTSTCP 

MTSTLM 

MTSVMP 



DEC HEX 
0038 0026 
0036 0024 
0016 0010 
0048 0030 
0034 0022 
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Assembler listing of CHANTS 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 


COMMENT 




54 00000 


CHAMTS 


DSECT 






54 00000 




MTSCPTB 

* 


DS 


A 


ADDR OF PG TBLS FOR TSS 
N349.10 


54 00004 




MTSLCK 


DS 


X 


LOCK BYTE 


54 00005 






DS 


3X 


UNUSED 


54 00008 




MTSAPN 


DS 


D 


APPLICATION NAME 


54 00010 




MTSTCP 


DS 


F 


TCT POINTER (VM> 


54 00014 




MTSBUF 


DS 


F 


BUFFER POINTER (VM) 


54 00018 




MTSMAX 


DS 


H 


MAX NUMBER OF LINES 


54 0001A 




MTSCUR 


DS 


H 


CURRENT NUMBER OF USERS 


54 0001C 




MTSBLH 


DS 


H 


BUFFER LENGTH 


54 0001E 




MTSDSH 


DS 


H 


DRUM SHARE 


54 00020 




MTSFLG1 


DS 


XL1 


FLAG BYTE 1 

NO BITS ASSIGNED YET 


54 00021 




MTSFLG2 


DS 


XL1 


FLAG BYTE 2 




00000080 


MTSPGE 

* 


EQU 


x'so 1 


OBTAIN BUFFER PAGE-1 / TCT 
PAGE-0 




00000040 


MTSRPG 

* 


EQU 


x^o 1 


RELEASE BUFFER PAGE-1 / TCT 
PAGE-0 




00000020 


MTSFRE 


EQU 


X f 20 f 


FREE ALL USERS 




00000010 


MTSFIN 


EQU 


X^O 1 


FINISH BIT 




00000008 


MTSBEL 


EQU 


X'08' 


1052-7 BELL INDICATOR 


54 00022 




MTSVMP 

* 


DS 


H 


TOTAL VM PAGES FOR BUFFER + 
TCT 


54 00024 




MTSSLT 


DS 


H 


NUMBER OF BUFFER SLOTS 


54 00026 




MTSRCT 


DS 


H 


COUNT 


54 00028 




MTSCSW 


DS 


D 


CSW FOR 1052-7 


54 00030 




MTSTLM 


DS 


H 


CURRENT CONV. TASK LIMIT 






* 




6 

H 


N38 


54 00032 




MTSRAN 


DS 


RELATIVE APPLICATION NUMBER 






♦ 




6 
3XL4 


N38 


54 00034 






DS 


RESERVED 






* 






N386 




00000040 


MTSLGH 

* 


EQU 


* -CHAMTS 


MTS LENGTH 
N349.10 



p 
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Module Usage Table (CHAMUT) 

The Module Usage Table (MUT) maintains a list of CALLS in a task. This list 
reflects the linkage between called and calling modules. Each MUT entry contains a 
linkage to the PMD of the calling module and a linkage to the called module PMD. 
The MUT is created by the Dynamic Loader. 
The MUT resides in virtual storage aligned on fullword boundaries. 

CHAMUT Storage map 



DEC 


8 

16 



HEX 



0| 

1 


MUTFPL 


| MUTBPL 


81 
i 


MUTSVC 


| MUTFBL 


0! 

I 


MUTBBL 


| MUTCDP 



Fields in CHAMUT — by displacement 



DEC HEX FIELD 
0000 0000 MUTFPL 
0004 0004 MUTBPL 



DEC HEX FIELD 
0008 0008 MUTSVC 
0012 000C MUTFBL 



DEC HEX FIELD 
0016 0010 MUTBBL 
0020 0014 MUTCDP 



Alphabetical list of fields in CHAMUT 



FIELD 

MUTBBL 

MUTBPL 



DEC HEX 
0016 0010 
0004 0004 



FIELD 

MUTCDP 

MUTFBL 



DEC HEX 
0020 0014 
0012 000C 



FIELD DEC HEX 
MUTFPL 0000 0000 
MUTSVC 0008 0008 



Assembler listing of CHAMUT 



LOCATION 
********* 

********* 
55 00000 
55 00004 
55 00008 
55 0000C 
55 00010 
55 00014 



INSTRUCTION SOURCE 
55 00000 CHAMUT 



INST OPER 



COMMENT 



DSECT MUT ENTRY STRUCTURE 

************************************************************** 

* MODULE USAGE TABLE (MUT) ENTRY DSECT 
************************************************************** 



00000018 



MUTFPL 

MUTBPL 

MUTSVC 

MUTFBL 

MUTBBL 

MUTCDP 

* 

MUTESZ 



DS 
DS 
DS 
DS 
DS 
DS 

EQU 



F 
F 
F 
F 
F 
F 

♦-CHAMUT 



FORWARD PAPA LINK 
BACKWARD PAPA LINK 
ADDRESS OF CALLING SVC 
FORWARD BABY LINK 
BACKWARD BABY LINK 
ADDRESS OF PMD CALLED BY 
SVC 
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New Task Common (CHANTC) 



The New Task Common CCHANTC), replacing CHATCM, contains system values referenced 
by more than one system module in a single task. 

CHANTC, read- protected from the user, is initialized by the operator task, LOGEX, 
or TSS2SIM. 
CHANTC resides in virtual storage (in module CZBNTC) , aligned on word boundaries- 



p 



CHANTC Storage map 



DEC 


8 

16 

24 

32 

40 



HEX 

of 

L 
8[ 

I. 

10[ 

I. 

18! 

L 

20| 

I. 

28) 



NTCTSK 



NTCBID 



NTCSWQ 



NTCNAM 



NTCDNO 



NTCTID 



| NTCCPI | RESERVED 



RESERVED 



64 


40) 

1 


I 
t 


NTCAIC |NTCVSS 

1 


| NTCMTU 

I 


| NTCSUE j 
1 1 


RESERVED 


72 


48 | 

1 


NTCTMR 






1 

1 








ORG 


NTCSWQ 














16 


101 
1 


NTCSW1 | 
1 


NTCSW2 |NTCSW3 

i 


| NTCSW4 

1 


| NTCSW5 I 
1 I 


NTCSW6 


Fields 


in CHANTC 


— bv displacement 
















DEC 
0000 


HEX FIELD 
0000 NTCTSK 




DEC 
0021 


HEX 
0015 


FIELD 
NTCSW5 




DEC HEX 
0066 0042 


FIELD 
NTCAIC 




0008 


0008 NTCBID 




0022 


0016 


NTCSW6 




0067 0043 


NTCVSS 




0016 


0010 NTCSW1 




0024 


0018 


NTCNAM 




0068 0044 


NTCMTU 




0016 


0010 NTCSWQ 




0032 


0020 


NTCDNO 




0069 0045 


NTCSUE 




0018 


0012 NTCSW2 




0036 


0024 


NTCTID 




0072 0048 


NTCTMR 




0019 


0013 NTCSW3 




0038 


0026 


NTCCPI 










0020 


0014 NTCSW4 




0040 


0028 


NTCPCT 


CEQU) 






Alphabetical list of fields in 


CHANTC 














FIELD DEC HEX 
NTCAIC 0066 0042 




FIELD 
NTCSUE 


DEC HEX 
0069 0045 




FIELD 
NTCSW6 


DEC HEX 
0022 0016 




NTCBID 0008 0008 




NTCSWQ 


0016 0010 




NTCTID 


0036 0024 




NTCCPI 0038 0026 




NTCSW1 


0016 0010 




NTCTMR 


0072 0048 




NTCDNO 0032 0020 




NTCSW2 


0018 0012 




NTCTSK 


0000 0000 




NTCMTU 0068 0044 




NTCSW3 . 


0019 0013 




NTCVSS 


0067 0043 




NTCNAM 0024 0018 




NTCSW4 


0020 0014 










NTCPCT 0040 0028 


(EQU) 


NTCSW5 


0021 0015 
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Assembler listing of CHANTC 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 


COMMENT 






56 


00000 


CHANTC 

* 


DSECT 




COMMON 


NEW TASK 


56 00000 






NTCTSK 


DS 


CL8 


TASK NAME.. .INITIALIZED 








* 






SET TO ■ 


OPERATOR' BY LOGON3 


56 00008 






NTCBID 


DS 


CL8 


BULKIO TASK ID 


56 00010 






NTCSWQ 


DS 


CL8 


SWQ KEY 










* THIS IS 


INITIALIZED IN THE 


FOLLOWING SUB 








* FIELDS BY LOGON3 








56 


00010 




|ORG| 


NTCSWQ 






56 00010 






NTCSW1 


DS 


H 


H^ 


TASK 


56 00012 






NTCSW2 


DS 


C 


C 9 Q* 


JOB CATEGORY 


56 00013 






NTCSW3 


DS 


C 


CO" 


NOT USED 


56 00014 






NTCSW4 


DS 


c 


CI 1 


CONVERSATIONAL 




00000001 


NTCCOV 


EQU 


X'l f 






56 00015 






NTCSW5 


DS 


c 


CO" 


PRIORITY 


56 00016 






NTCSW6 


DS 


H 


H'0' 


SEQUENCE NUMBER 








* SEE ALSO CHA 


k SWQ FOR 


FURTHER DESCRIPTION. 


56 00018 






NTCNAM 


DS 


CL8 


NAME OF 
PROGRAM 


CURRENT 
...SET BY CAE 








* 






. ..SET BY LOGON2 


56 00020 






NTCDNO 


DS 


F 


DEFAULT 


NUMBER... SET TO 



56 00024 
56 00026 



56 00028 

56 00042 

56 00043 
56 00044 

56 00045 

56 00048 



56 00028 
56 00042 



0000004C 



* BY LOGON 2 

* INCREMENTED FOR EACH 

* DEFAULT COMMAND 
♦THIS COUNTER CAN BE INTERROGATED TO SEE IF A 
♦DEFAULT HAS OCCURRED 

* SINCE THE LAST INQUIRY. 
NTCTID DS H TASK ID. SET BY LOGON2 FROM 

* MCB 

NTCCPI DS XL1 CSECT PACKING INDICATOR 

* THE CR OF THE FOLLOWING CODES INDICATES PACKING 

X'Ol^PRIVATE STORAGE KEY A 
X € 02 , =PRIVATE STORAGE KEY B 
X«0 4'=PRIVATE STORAGE KEY C 
X'08'=PUBLIC STORAGE KEY A 
X'lO^PUBLIC STORAGE KEY B 
X'20 f =PUBLlC STORAGE KEY C 

OF 

♦ PROFILE CHARACTER AND 

SWITCH TABLE 

NTCPCT+X , lA f N366 

CL1 ATTENTION INDICATOR 
CHARACTER 
SET TO f ' BY LOGON2. 

XL1 VSS IN OPERATION SWITCH. 
SET TO BY LOGON3. 

XL1 MULTIPLE TASK USER FLAG 
. . . SET AND USED BY 
RESOURCE CONTROL 

XL1 SHARED USER EXTENDING FLAG 
. . .SET AND USED BY 
RESOURCE CONTROL 

A TASK MONITOR REG 13 SAVE 

N369.2 

♦-CHANTC LENGTH OF CHANTC TABLE 



* 

NTCPCT 

NTCAIC 

* 
NTCVSS 

NTCMTU 

* 

* 

NTCSUE 

NTCTMR 

* 

NTCLEN 




DS 



DS 



DS 



DS 



EQU 
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Operator's Device Path Table (CHAODP) 

The Operator's Device Path Table (ODP) contains one entry for each path to the 
operator ' s device (s) . 
ODP entries are contiguous in core storage and aligned on word boundaries. 

CHAQDP Storage map 



DEC 




HEX 



0|ODPLOK | UNNAMED | 



ODPATH 



Fields in CHAQDP — by displacement 



DEC HEX FIELD 
0000 0000 ODPLOK 



DEC HEX FIELD 
0002 0002 ODPATH 



DEC HEX FIELD 



Alphabetical list of fields in CHAQDP 



FIELD 


DEC HEX 


FIELD 


DEC HEX 


ODPATH 


0002 0002 


ODPLOK 


0000 0000 



FIELD 



DEC HEX 



Assembler listing of CHAQDP 



LOCATION INSTRUCTION SOURCE 

57 00000 CHAODP 
57 00000 

57 00000 ODPLOK 
57 00001 

57 00002 ODPATH 



INST OPER 
DSECT 
DS OF 
DS C 
DS C 
DS H 



COMMENT 



LOCK BYTE 

SPARE 

PATH ADDRESS 



0000000** 



ODPSZE 



EQU 



♦-ODPLOK SIZE OF TABLE ENTRY 
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I/O Outboard Error Record (CHAOER) 

The I/O Outboard Error Record (OER) specifies a record format containing statist- 
ical data on outboard errors. In the event of a solid outboard error on a task or 
paging I/O device, or SDR bucket overflow, an I/O outboard error record is con- 
structed and stored on drum. 

Prior to the creation and storage of an OER, the required information will be tem- 
porarily stored in the I/O Statistical Data Table for task I/O devices, or it will be 
stored in the Direct Access Paging Statistical Data Record for paging I/O devices. 
The OER contains edited data. 

The OER occupies from 104 to 176 bytes of virtual and core storage, aligned on 
double word boundaries. 

Note 1 . The retry threshold depends upon the type of the error condition and device. 
Thus, each byte of the OERRTH field is assigned to a specific error condition as its 
retry threshold bytes device dependent. 

Note 2 . The SDR save areas contain 4 -bit frequency counters for each bit of the 
sense data. An SDR area is incremented by 1 each time its associated sense bit is 1 
in the summary sense data on a VMSDR or RCSDR call. 

CHAOER Storage map 



DEC 



HEX 



8 


8 


16 


10 


24 


18 


32 


20 


40 


28 


48 


30 


56 


38 



88 


58 


96 


60 


104 


68 



UNNAMED 


| OERRL 

1 


I OERDVC | OERTYP 
* 1 


| OERDVT 

I 


OLRSDA 


| OERALT 
1 


1 
1 


OERCS 


| OERCNT 

I 


OERLSA 


OERLP 


| OEREIC 
1 


1 

I 


OERRET 


| OERKEY | OERFCC 
i t 


OERADD 


OERTM2 


OERTM1 



OERSDR 



OERSNS 



OERVID 



OERCCW 



OERNCC 



Fields in CHAOER — by displacement 



DEC 


HEX 


FIELD 


DEC 


HEX 


FIELD 




DEC 


HEX 


FIELD 


0002 


0002 


OERRL 


0016 


0010 


OERLSA 




0032 


0020 


OERADD 


0004 


0004 


OERDVC 


0024 


0018 


OERLP 




0040 


0028 


OERTM2 


0005 


0005 


OERTYP 


0026 


001A 


OEREIC 




0048 


0030 


OERTM1 


0006 


0006 


OERDVT 


0028 


001C 


OERRET 




0056 


0038 


OERSDR 


0008 


0008 


OERSDA 


0030 


001E 


OERKEY 




0088 


0058 


OERSNS 


0010 


000A 


OERALT 


0031 


001F 


OERFCC 




0096 


0060 


OERVID 


0012 


oooc 


OERCS 


0032 


0020 


OERSID 


(EQU) 


0102 


0066 


OERNCC 


0014 


000E 


OERCNT 


0032 


0020 


OERHMA 


(EQU) 


0104 


0068 


OERCCW 
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Alphabetical list of fields in CHAOER 



FIELD 


DEC 


HEX 


FIELD 


DEC 


HEX 


FIELD 


DEC 


HEX 


OERADD 


0032 


0020 


OERFCC 


0031 


001F 


OERSDA 


0008 


0008 


OERALT 


0010 


O00A 


OERHMA 


0032 


0020 


(EQU) OERSDR 


0056 


0038 


OERCCW 


010*4 


0068 


OERKEY 


0030 


001E 


OERSID 


0032 


0020 


OERCNT 


0014 


000E 


OERLP 


0024 


0018 


OERSNS 


0088 


0058 


OERCS 


0012 


oooc 


OERLSA 


0016 


0010 


OERTM1 


0048 


0030 


OERDVC 


0004 


0004 


OERNCC 


0102 


0066 


OERTM2 


0040 


0028 


OERDVT 


0006 


0006 


OERRET 


0028 


001C 


OERTYP 


0005 


0005 


OEREIC 


0026 


001A 


OERRL 


0002 


0002 


OERVID 


0096 


0060 



9 



(EQU) 



Assembler listing of CHAOER 



LOCATION INSTRUCT 10 


M SOURCE 
CHAOER 


INST 


OPER 


COMMENT 


58 00000 


DSECT 






* 


I/O 


OUTBOARD 


ERROR RECORD 


58 00000 




DS 


0D 




58 00000 




DS 


H 


SPARE 


58 00002 


OERRL 


DS 


H 


RECORD LENGTH (96 TO 184 
BYTES) 


58 00004 


OERDVC 


DS 


XL1 


DEVICE CLASS CODE 


58 00005 


OERTYP 


DS 


XL1 


RECORD TYPE 


58 00006 


OERDVT 


DS 


H 


DEVIVE TYPE CODE 


58 00008 


OERSDA 


DS 


XL2 


SYMBOLIC DEVICE ADDRESS 


58 O000A 


OERALT 


DS 


XL2 


ALT PATH IF DRUM; OTHERWISE 
UNUSED 


58 0000C 


OERCS 


DS 


H 


CSW STATUS BITS 


58 OOO0E 


OERCNT 


DS 


H 


CSW BYTE COUNT 


58 00010 


OERLSA 


DS 


XL8 


LAST SEEK ADDRESS 


58 00018 


OERLP 

* 


DS 


XL2 


PATH LAST USED (ACTUAL I/O 
ADDRESS) 


58 0001A 


OEREIC 


DS 


XL2 


TOTAL ERROR COUNT 


58 0001C 


OERRET 


DS 


XL2 


TOTAL RETRY COUNT 


58 0001E 


OERKEY 


DS 


XL1 


CSW KEY 


58 0001F 


OERFCC 


DS 


XL1 


POINTER TO FAILING CCW 


58 00020 


OERADD 


DS 


2F 


HOME ADDRESS OR RJE STATION 
ID 


58 00020 


OERHMA 


EQU 


OERADD 


HOME ADDRESS 


58 00020 


OERSID 


EQU 


OERADD 


RJE STATION ID 


58 00028 


OERTM2 

* 


DS 


2F 


DATE AND TIME OF RECORDING 
(LAST ERROR) 


58 00030 


OERTM1 


DS 


2F 


DATE AND TIME OF RECORDING 
(FIRST ERROR) 


58 00038 


OERSDR 


DS 


8XL4 


SDR BUCKETS (64fi 1/2 BYTE) 


58 00058 


OERSNS 


DS 


2F 


LAST SENSE DATA 


58 00060 


OERVID 


DS 


3H 


VOLUME ID 


58 00066 


OERNCC 


DS 


H 


NO. OF CCW'S IN CCW LIST 


58 00068 




DS 


0D 


15926 


58 00068 


OERCCW 


DS 


10XL8 


CCW LIST (MAXIMUM OF 10 
CCW'S) 
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Option UFLOW Macro Table (CHAOFL) 



CHAO FL defines the entries set for the UFLOW macro, option O. 
Option O sets the user limit, which must be set to a non-negative 
value less than the maximum value imposed by the MTT administrator. 

The list in the buffer is ended with eight bytes of X'FF'. 
CHAOFL defines the same entries upon return from the UFLOW macro. 
If an invalid OFLNAME or OFLRAN field is given, OFLLMT and OFLMAX are set 
to X'FFFF* . If an invalid OFLMT is given, OFLLMT and OFLMAX are set to 
C 9 ** 9 and the limit OFLMAX is placed in OFLBLK. 

CHAOFL Storage map 

DEC HEX 

0| OFLNAME | 

1 I 

8 8 | OFLRAN | OFLLMT | OFLMAX | OFLBLK | 

I 1 I I I 

Fields in CHAOFL — by displacement 

DEC HEX FIELD DEC HEX FIELD DEC HEX FIELD 

0000 0000 OFLNAME 0010 000A OFLLMT 0014 000E OFLBLK 

0008 0008 OFLRAN 0012 000C OFLMAX 

Alphabetical list of fields in CHAOFL 

FIELD DEC HEX FIELD DEC HEX FIELD DEC HEX 
OFLBLK 0014 000E OFLMAX 0012 00OC OFLRAN 0008 0008 
OFLLMT 0010 000A OFLNAME 0000 0000 

Assembler listing of CHAOFL 

LOCATION INSTRUCTION SOURCE INST OPER COMMENT 

59 00000 CHAOFL DSECT NSRB 386 

***************************** ******************** ******** ************** 

* CHAOFL COVERS THE ENTRIES SET FOR THE UFLOW MACRO, OPTION O. * 

* THIS OPTION SETS THE USER LIMIT, WHICH MUST BE SET TO A NON-NEG * 

* VALUE LESS THAN THE MAX IMPOSED BY THE MTT ADMINISTRATOR. * 

* THE LIST IN THE BUFFER IS ENDED WITH 8 BYTES OF X'FF*. * 

* IT ALSO COVERS THE SAME ENTRIES UPON RETURN FROM UFLOW. * 

* WHEN AN INVALID OFLNAME OR OFLRAN FIELD WAS GIVEN, OFLLMT AND * 

* OFLMAX ARE SET TO X'FFFF" * 

* WHEN AN INVALID OFLLMT IS GIVEN, OFLLMT AND OFLMAX ARE SET TO * 

* C'** 1 AND THE LIMIT OFLMAX IS PLACED IN OFLBLK. * 
*********************************************************************** 

59 00000 OFLNAME DS CL8 APPLICATION NAME 

59 00008 OFLRAN DS H RELATIVE APPLICATION NUMBER 

59 00 00 A OFLLMT DS H MTT USER LIMIT 

59 0OO0C OFLMAX DS H MAXIMUM NUMBER OF MTT USERS 

59 OQOOi. OFLBLK DS H BLOCK SIZE 
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Operator Header (CHAOPH) 

The Operator Header COPH) describes the header required on all messages sent to 
the system operators. 

The OPH is preceded by the MCB header in the 3 2 -byte preface attached to system 
operator messages. 

CHAOPH Storage map 



DEC 




HEX 
01 



OPHUID 



8|OPHMFL (OPHDES |OPHCOD (OPHRCD | 

I I I I L 



OPHMNO 



OPHTID 



Fields in CHAOPH — by displacement 



DEC 

0000 

0008 

0008 

0008 

0008 



HEX 
0000 



FIELD 



OPHUID 
0008 OPHF2 
0008 OPHMO 
0008 OPHF1 
0008 OPHHP 
0008 0008 OPHVT 



CEQU) 
CEQU) 
(EQU) 
(EQU) 
(EQU) 



DEC 

0008 

0008 

0C08 

0008 

0009 

0009 



HEX FIELD 
0008 OPHRC 
0008 OPHRR 
0008 OPHTM 

0008 OPHMFL 

0009 OPHWTL 
0009 OPHDES 



DEC HEX FIELD 
(EQU) 0010 000A OPHCOD 
(EQU) 0011 O00B OPHRCD 
(EQU) 0012 0O0C OPHMNO 

0014 000E OPHTID 
(EQU) 



Alphabetical list of fields in CHAOPH 



FIELD DEC HEX FIELD 

OPHCOD 0010 000A OPHMNO 

OPHDES 0009 0009 OPHMO 

OPHF1 0008 0008 (EQU) OPHRC 

OPHF2 0008 0008 (EQU) OPHRCD 

OPHHP 0008 0008 (EQU) OPHRR 



DEC HEX FIELD 
0012 000C OPHTM 

0008 0008 (EQU) OPHUID 

0008 0008 (EQU) OPHVT 
0011 000B OPHWTL 

0008 0008 (EQU) 



DEC HEX 

0008 0008 (EQU) 

0000 0000 

0008 0008 (EQU) 

0009 0009 (EQU) 



OPHMFL 0008 0008 



OPHTID 0014 000E 



Assembler listing of CHAOPH 



LOCATION INSTRUCTION SOURCE 
5 A 00000 CHAOPH 
5A 00000 
5A 00000 



5A 00008 



5A 00008 



5A 00009 



(Listing 



00000080 
5A 00008 
00000040 
5A 00008 
00000020 
5A 00008 
00000010 
5A 00008 
00000008 
5A 00008 
00000004 
5A 00008 

00000002 
5A 00008 
00000001 

5A 00009 
00000080 
00000000 
00000001 
00000002 
00000004 
of CHAOPH 



OPHUID 

OPHMFL 
OPHTM 
* 
* 

OPHTMM 
OPHRR 
OPHRRM 
OPHRC 
OPHRCM 
OPHVT 
OPHVTM 
OPHHP 
OPHHPM 
OPHF1 
OPHF1M 
OPHMO 
* 

OPHMOM 
OPHF2 
OPHF2M 
OPHDES 
OPHWTL 
OPHWTLM 
OPHDEM 
OPHDE1 
OPHDE2 
OPHDE3 
continued 



INST OPER 
DSECT 

DS 0D 

DS CL8 



DS 
EQU 



EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 

EQU 

EQU 

EQU 

DS 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 



XL1 
OPHMFL 



X f 80' 

OPHMFL 

X^O' 

OPHMFL 

X'20' 

OPHMFL 

X'10" 

OPHMFL 

X'08' 

OPHMFL 

X'04' 

OPHMFL 

X f 02 f 

OPHMFL 

X'01' 

XL1 

OPHDES 

X'80 f 

X^O 1 

X'01 f 

X , 02 < 

X'04* 



COMMENT 
OPERATOR HEADER 

USERID OF MESSAGE 

ORIGINATOR 

MESSAGE FLAGS 

MUST BE ON, I DI GATES TEXT 

MES 

SAGE 

REPLY REQUIRED 

REPLY CHECKING REQUIRED 

VARIABLE TEXT IN REPLY 

HIGH PRIORITY MESSAGE 

MUST BE OFF 

REPLY TO BE PROCESSED IN 
MAIN 

OPERATOR TASK 
MUST BE OFF 

DESTINATION CODE 
MESSAGE TO LOG ONLY FLAG 
MESSAGE TO LOG ONLY MASK 



on page 287) 
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(Listing of CHAOPH continued from page 286) 



LOCATION INSTRUCTION SOURCE INST QPER 
5 A 0000A OPHCOD DS XL1 

* 

* 

* 
* 

* 
* 
* 
* 

* 
* 
* 
* 
5 A 0000B OPHRCD DS XL1 

* 
* 

* 

5 A 0000C OPHMNO DS XL2 

* 

* 

* 

* 
* 
5A 0000E OPHTID DS XL2 

* 

* 

* 
* 



COMMENT 

IF OPHMC IS OFF, THIS BYTE 

CONT 

AINS A RETURN IDENTIFIER 

AS S 

PECIFIED BY THE SENDER. 

THE R 

EPLY TO HIS MESSAGE WILL 

BE R 

ETURNED TO HIM WITH THIS 

CODE 

. IF OPHMC IS ON, THIS 

BYTE C 

ONTAINS A CODE. IT 

IDENTIFIES 

THE ROUTINE IN THE MAIN 

OPERA 

TOR TASK THAT IS TO 

PROCESS T 

HE REPLY. 

= MAIN OPERATOR 

HOUSEKEEPIN 

G ROUTINE (REMAINING CODES 

UN 

SPECIFIED) 

REPLY CODE - 

= DO NOT CHECK REPLY 

1-255 = COMPARE THE ACTUAL 

RE 

PLY TO THE 7 BYTE REPLIES 

ASS 

OCIATED WITH THIS NUMBER 

IN T 

HE REPLY CHECKING TABLE 

(2.**. 

138) 

IF THE MCB IS FROM THE 

REPLY CO 

MMAND ROUTINE THIS FIELD 

CONT 

AINS THE NUMBER OF THE 

MESSAG 

E BEING REPLIED TO. 

OTHERWISE 

THE FIELD IS UNUSED. 

IF THE MCB IS FROM THE 

REPLY CO 

MMAND ROUTINE THIS FIELD 

CONT 

AINS THE TASKID OF THE 

TASK R 

ECEIVING A REPLY. 

OTHERWISE T 

HE FIELD IS UNUSED. 
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Page Allocation Table (CHAPAT) 

The Page Allocation Table (CHAPAT) contains entries for each page on a volume; it 
occupies one page for a 2311 f and two pages for a 2314. Each PAT entry is one byte 
long, and contains information indicating page type (DSCB, data, error) and availabi- 
lity. The last 384 bytes on the PAT page contain 96 relocation entries and one relo- 
cation control entry. The relocation entries, each one word in length, are in 
reverse order (from byte 4094 to byte 3708) on the page; they are structured such 
that the first ha If word of each entry contains the error page number, and the second 
half word contains the new page number. The fullword relocation control entry con- 
tains a half word count of relocation entries, and a half word of X'FFFF* if any relo- 
cation entries exist. 
The one-byte PAT entries may have the following bit settings: 

X'OO* Page available 

X^O' DSCB page with less than 12 slots used 

X , 82' DSCB page with 12 to 15 slots used 

X^S" DSCB page with all slots used 

X'Ol 1 Data page 

X , 41 i Data page not yet in a DSCB 

X'CO' Error page 

X 9 1F* Page Allocation Table page 

CHAPAT Storage map 



DEC 




HEX 
01 



PATLPP 



ORG PATLPP+4 088 



4088 



FF81 



PATFRE 



PATNRE 



PATRLF 



Fields in CHAPAT — by displacement 



DEC HEX FIELD 
0000 0000 PATLPP 



DEC HEX FIELD 
4 088 0FF8 PATFRE 



DEC HEX FIELD 
409 2 0FFC PATNRE 
4094 0FFE PATRLF 



Alphabetical list of fields in CHAPAT 



FIELD 


DEC HEX 


FIELD 


DEC HEX 


PATFRE 


4088 0FF8 


PATLPP 


0000 0000 



FIELD DEC HEX 
PATNRE 4092 0FFC 
PATRLF 4094 0FFE 



Assembler listing of CHAPAT 



LOCATION INSTRUCTION SOURCE INST OPER COMMENT 

5B 00000 CHAPAT DSECT DSECT FOR PAGE ALLOCATION 

* TABLE 

********************************************************************** 

* THE FIRST SECTION OF THE PAT DESCRIBES THE STATUS OF EACH PAGE ON 

* THE DEVICE AND CONSISTS OF ONE-BYTE ENTRIES DEFINED AS FOLLOWS: 

* DUE TO OVERLAPPING BIT DEFINITIONS IN THE PATLPP FIELD THE USER MUST 

* EXERCISE CAUTION WHEN USING THE EQU LABELS IN THIS FIELD FOR 

* IMMEDIATE OPERATIONS 

PAGE STATUS ENTRY 

* 

PAGE AVAILABLE 

* 

DATA PAGE (LAST FOUR BITS= 

* 

3ERS> * 

DATA PAGE (NOT YET INCLUDED 



5B 00000 


PATLPP 


DS 


4096X 


00000000 


PATPA 
PATD4 


EQU 


X'00 f 


O0O00OOF 


EQU 


X'OF 1 


* 






NUMBER 


0000004F 


PATD5 


EQU 


X'4F' 



(Listing of CHAPAT continued on page 289) 
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C Listing of CHAP AT continued from page 288) 






LOCATION 


INSTRUCTION 
0000007F 


SOURCE 

* 

PATPT 


INST 


♦ 


EQU 




00000080 


PATD1 


EQU 




00000082 


PATD2 


EQU 




00000083 


PATD3 


EQU 




OOOOOOCO 


PATER 


EQU 



OPER COMMENT 

IN DSCB)* 
LAST FOUR BITS=NUMBER OF USERS * 

X*7F* PAT TABLE ENTRY 

♦ 

X'SO* DSCB PAGE (LESS THAN 12 

SLOTS USED) * 
X'82 f DSCB PAGE (12 TO 15 SLOTS 

USED) * 
X^ 1 DSCB PAGE (ALL SLOTS USED) 

* 
X f C0' ERROR PAGE 



* THE NUMBER OF PAGE STATUS ENTRIES IS DEVICE DEPENDENT 

* AS FOLLOWS: 

* 

* THE 

* PAT. 



2311 = 1624 

2314 = 6496 

2311 USES ONLY 1 PAGE TO CONTAIN THE COMPLETE 

THE 2314 USES 2 PAGES 
************************************************* ********************* 

* THE PAGE RELOCATION ENTRIES RESIDE AT THE END OF THE LAST PAT PAGE. 

* RELOCATION ENTRIES IN THE FOLLOWING FORMAT WILL BEGIN AT PATFRE AND 

* PROCEED TOWARD THE LAST ALLOWABLE ENTRY AT PATREL. 

* BITS 0-15 PAGE NO. OF ERROR PAGE 

* 16-31 NEW PAGE NUMBER 

* TO ADDRESS RELOCATION ENTRIES - SET USING TO 

* ADDRESS=PAT ORIGIN + 4096* ( NUM PAT PAGES-1) 

PATLPP+3708 * 
OF LAST ALLOWABLE RELOCATION 

ENTRY IN LAST PAT PAGE * 
PATLPP+4088 * 
F FIRST RELOCATION ENTRY 

H NO. OF RELOCATION ENTRIES 

H FFFF = RELOCATION ENTRIES 

EXIST * 
*******************%*************************************************** 



5B 


00E7C 


5B 


00E7C 


PATREL 


|ORG| 

DS 


5B 


0OFF8 


5B 


00FF8 


PATFRE 


|ORG| 
DS 


5B 


00FFC 






PATNRE 


DS 


5B 


00FFE 






PATRLF 

* 


DS 
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Page Control Block (CHAPCB) 



The Page Control Block (PCB) controls the movement of virtual storage pages 
between core, auxiliary, and external storage. This movement of virtual storage 
pages consists of: reading pages into core storage from auxiliary or external 
storage; writing pages out of core storage to auxiliary or external storage; and 
posting to the program's page tables. 

A complete PCB table consists of one or more 64-byte data blocks. The first PCB 
table block is located by the GQE; subsequent PCB table blocks are located by the 
previous table block, through the chain address (last 4 bytes in each block). 

Sixty-four bytes of core storage, aligned on word boundaries, are allocated to 
each PCB. 



I 



CHAPCB Storage map 



EC 



HEX 



8 


8 


16 


10 



40 



56 



28 



38 



PCBIA 


PCBDEV 


| PCBHN 

i 


I PCBSN 

I 


PCBVA 


PCBF1 | PCBF2 

I 


| PCBF3 
1 


|PCBF4 
1 


PCBER 









PCBE2 




Fields in CHAPCB — by displacement 



DEC 

0000 

0000 

0000 

0004 

0004 

0006 

0007 

0008 

0012 

0012 

0012 

0012 

0012 

0012 

0013 



HEX 

0000 

0000 

0000 

0004 

0004 

0006 

0007 

0008 

000C 

000C 

0O0C 

oooc 
00 oc 
oooc 

000D 



FIELD 

PCBIA 

PCBE1 

PCBBEG 

PCBDEV 

PCBXA 

PCBHN 

PCBSN 

PCBVA 

PCBPC 

PCBNS 

PCBVX 

PCBBY 

PCBVS 

PCBF1 

PCBXT 



CEQU) 
(EQU) 
(EQU) 
CEQU) 

(EQU) 

(EQU) 



DEC 

0013 

0013 

0013 

0013 

0013 

0013 

0013 

0013 

0014 

0014 

0014 

0014 

0014 

0014 

0014 



HEX 

0O0D 

000D 

0O0D 

0O0D 

OO0D 

000D 

000D 

000D 

OO0E 

000E 

000E 

0O0E 

000E 

000E 

000E 



FIELD 
PCBVM 
PCBAD 
PCBXP 
PCBCR 
PCBDP 
PCBRW 
PCBWC 
PCBF2 
PCBMS 
PCBDS 
PCBRI 
PCBIC 
PCBTW 
PCBX4 
PCBX3 



(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 

(EQU) 
(EQU) 
(EQU) 
(EQU) 

(EQU) 
(EQU) 
(EQU) 



DEC 

0014 

0014 

0014 

0015 

0015 

0015 

0015 

0015 

0015 

0015 

0016 

0020 

0040 

0060 



HEX 

000E 

000E 

000E 

000F 

000F 

000F 

000F 

000F 

OOOF 

000F 

0010 

0014 

0028 

003C 



FIELD 
PCBX2 
PCBX1 
PCBF3 
PCBRC 
PCBSA 
PCBPP 
PCBW 
PCBSP 
PCBTS 
PCBF4 
PCBER 
PCBE2 
PCBE3 
PCBCA 



(EQU) 
(EQU) 

(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 



Alphabetical list of fields in CHAPCB 



FIELD 

PCBAD 

PCBBEG 

PCBBY 

PCBCA 

PCBCR 

PCBDEV 

PCBDP 

PCBDS 

PCBER 

PCBE1 

PCBE2 

PCBE3 

PCBF1 

PCBF2 

PCBF3 



DEC 

0013 

0000 

0012 

0060 

0013 

0004 

0013 

0014 

0016 

0000 

0020 

0040 

0012 

0013 

0014 



HEX 

000D (EQU) 

0000 

OOOC (EQU) 

003C 

000D (EQU) 

0004 

000D (EQU) 

00 0E (EQU) 

0010 

0000 

0014 

0028 

OOOC 

000D 

000E 



FIELD 
PCBF4 
PCBHN 
PCBIA 
PCBIC 
PCBMS 
PCBNS 
PCBPC 
PCBPP 
PCBRC 
PCBRI 
PCBRW 
PCBSA 
PCBSN 
PCBSP 
PCBTS 



DEC 

0015 

0006 

0000 

0014 

0014 

0012 

0012 

0015 

0015 

0014 

0013 

0015 

0007 

0015 

0015 



HEX 

OOOF 
0006 
0000 
000E 
000E 
OOOC 
OOOC 
OOOF 
OOOF 
000E 
000D 
OOOF 
0007 
OOOF 
OOOF 



(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 

(EQU) 
(EQU) 



FIELD 
PCBTW 
PCBVA 
PCBVM 
PCBVS 
PCBW 
PCBVX 
PCBWC 
PCBXA 
PCBXP 
PCBXT 
PCBX1 
PCBX2 
PCBX3 
PCBX4 



DEC 

0014 

0008 

0013 

0012 

0015 

0012 

0013 

0004 

0013 

0013 

0014 

0014 

0014 

0014 



HEX 

000E 

0008 

000D 

OOOC 

OOOF 

OOOC 

000D 

0004 

000D 

000D 

000E 

000E 

O0OE 

O00E 



(EQU) 

(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 

(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
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Assembler listing of CHAPCB 



LOCATION INSTRUCTION SOURCE INST OPER 



COMMENT 



i. 



5C 00000 



5C 00000 
5C 00000 
5C 00000 
5C 0000** 
5C 00004 
5C 00006 
5C 00007 
5C 00008 



5C O0O0C 



5C 0000D 



5C 0000E 



(Listing 



5C 0000C 
000000E0 
5C 00 00C 
00000010 
5C OOOOC 

O0O0O0OC 
5C OOOOC 
00000002 
5C OOOOC 

00000001 

5C 0000D 
00000080 
5C 0000D 
00000040 
5C 0000D 
00000020 
5C 0000D 
00000010 
5C 0000D 
00000008 
5C OOOOD 

00000004 
5C OOOOD 
00000002 
5C OOOOD 
00000001 

5C OOOOE 
00000000 
5C OOOOE 

00000040 
5C OOOOE 

00000080 
5C OOOOE 

OOOOOOCO 
5C OOOOE 
00000020 
5C OOOOE 
00000010 
5C OOOOE 
00000008 
Of CHAPCB 



CHAPCB DSECT PAGE CONTROL BLOCK TABLE 

* AND ENTRY 

PCBBEG DS OF ALIGN ON A WORD BOUNDARY 

PCBE1 DS 0CL20 PCB ENTRY (1) 

PCBIA DS F INTERNAL ADDRESS OF PAGE 

PCBXA DS OF EXTERNAL ADDRESS OF PAGE 

PCBDEV DS H DEVICE 

PCBHN DS C HEAD NUMBER 

PCBSN DS C SLOT NUMBER 

PCBVA DS F STET 

* WHEN PCBX1 FLAG INDICATES VIRTUAL MEMORY PAGE, 

* PCBVA WILL CONTAIN VIRTUAL MEMORY ADDRESS. 

* THE LOW ORDER 12 BITS WILL CONTAIN IDENTIFICATION 

* WITHIN TYPE FOR AN XTSI PAGE (PTP, AST, ETC) AND 

* HIGH 

* ORDER 20 BITS WILL BE ZERO, WHEN PCBF3 

* FLAG INDICATES XTSI TYPE OF PAGE (PCBX2, PCBX3 ON 
SINGLY 

OR IN COMBINATION) 

PCB FLAGS 

VAM PAGEOUT SEQUENCE NUMBER 



* 

PCBF1 

PCBVS 

PCBVSM 

PCBBY 

PCBBYM 

PCBVX 

PCBVXM 
PCBNS 
PCBNSM 
PCBPC 

PCBPCM 

PCBF2 

PCBWC 

PCBWCM 

PCBRW 

PCBRWM 

PCBDP 

PCBDPM 

PCBCR 

PCBCRM 

PCBXP 

PCBXPM 

PCBAD 

* 

PCBADM 

PCBVM 

PCBVMM 

PCBXT 

PCBXTM 

PCBF3 

PCBX1 

PCBX1M 

PCBX2 

* 

PCBX2M 

PCBX3 

PCBX3M 
PCBX4 

PCBX4M 

PCBTW 

PCBTWM 

PCBIC 

PCBICM 

PCBRI 

PCBRIM 



DS 

ECU 
EQU 
EQU 
EQU 
EQU 

EQU 
EQU 
EQU 
EQU 

EQU 

DS 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

DS 

EQU 

EQU 

EQU 

EQU 
EQU 

EQU 
EQU 

EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 



XL1 

PCBF1 

X'EO* 

PCBF1 

X , 10 i 

PCBF1 

X^C 1 
PCBF1 
X , 02 - 
PCBF1 

X'Ol' 

XL1 

PCBF2 

X^O" 

PCBF2 

X^O" 

PCBF2 

X^O 1 

PCBF2 

X'lO' 

PCBF2 

X'08 1 

PCBF2 

X'04 i 

PCBF2 

X , 02 i 

PCBF2 

X'Ol 1 

XL1 

PCBF3 

X'OO 1 

PCBF3 

X^O 1 
PCBF3 

x-so 1 

PCBF3 

X'CO' 
PCBF3 
X f 20' 
PCBF3 
X^O* 
PCBF3 
X'OS 1 



BYPASS FLAG 

VIRT MEMORY OR XTSI PAGE 
FLAGS 

NULL STATE FLAG 

PCB PROCESSED-CHANNEL 
PROGRAM BUILT 

PCB FLAGS 

WRITE CHECK OPERATION FLAG 

READ/WRITE FLAG 

DEVICE PREFERENCE FLAG 

USER CORE RELEASE FLAG 

XTSI OR PSW PAGE FLAG 

PREFERENCE FOR AUXILIARY 
DISK FLAG 

VIRTUAL MEMORY PAGE 

XTSI PAGE 



PCB FLAGS 
TYPE 1-V.M. 



PAGE 



TYPE 2 - 
(PTP) 



PAGE TABLE PAGE 



TYPE 3 - AUXSEGMENT 
PAGE (AST) 

TYPE 4-SEGMENT TABLE PG 
(ST) OR 1ST XTSI PAGE 

TWAIT PAGING OPERATION 

IOCAL PAGING OPERATION 

RELOCATION PAGING OPERATION 



continued on page 292) 
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(Listing of CHAPCB continued from page 291) 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 


COMMENT 






5C 0000E 


PCBDS 


EQU 


PCBF3 


DISPATCHER PAGING OPERATION 






00000002 


PCBDSM 


EQU 


X , 02* 








5C 0000E 


PCBMS 


EQU 


PCBF3 


MONITOR SHARING PAGING 
OPERATION 






00000001 


PCBMSM 


EQU 


X f 01 f 




5C 


0000F 




PCBF4 


DS 


XL1 


PCB FLAGS 






5C OOOOF 


PCBTS 


EQU 


PCBF4 


TSEND PAGING OPERATION 






00000080 


PCBTSM 


EQU 


X^O* 








5C OOOOF 


PCBSP 


EQU 


PCBF4 


SUPPRESS POSTING FOR THIS 
PAGING OPERATION 






00000040 


PCBSPM 


EQU 


X^O' 








5C OOOOF 


PCBW 


EQU 


PCBF4 


PAGING REQUESTED BY VAM 






00000020 


PCBWM 


EQU 


X^O - 








5C OOOOF 


PCBPP 


EQU 


PCBF4 


PAGE POSTING READ 






00000010 


PCBPPM 


EQU 


X'10 1 








5C OOOOF 


PCBSA 


EQU 


PCBF4 


SUPPRESS ALLOCATION 






00000008 


PCBSAM 


EQU 


x'os 1 








5C OOOOF 


PCBRC 

* 


EQU 


PCBF4 


STOLEN PAGE RECLAIMED FLAG 
(MT/T) 






00000004 


PCBRCM 


EQU 


X'04 f 


STOLEN PAGE RECLAIMED MASK 
(MT/T) 


5C 


00010 




PCBER 


DS 


F 


TWAIT MIGRATION XPT POINTER 
SAVE AREA 


5C 


00014 




PCBE2 


DS 


CL20 


PCB ENTRY (2) 


5C 


00028 




PCBE3 


DS 


CL20 


PCB ENTRY (3) 


5C 


0003C 




PCBCA 


DS 


F 


PCB CHAIN ADDRESS 






00000040 


PCBTSZ 


EQU 


64 


TABLE SIZE 






00000014 


PCBESZ 


EQU 


20 


ENTRY SIZE 






00000003 


PCBENM 


EQU 


PCBTSZ/PCBESZ NUMBER OF ENTRIES 



p 
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Task Monitor Push Down Save Area (CHAPDS) 

The Task Monitor Push Down Save Area (PDS) maintains program and machine status 
from the last task interruption, and a save area used by the interruption handling 
routine. 

The 256-byte PDS resides in privileged or nonprivileged virtual storage depending 
on the privilege level of the dispatched routine. 

CHAPDS Storage map 



DEC 



HEX 



8 


8 


16 


10 


24 


18 


32 


20 


40 


28 



88 
96 
104 
112 
120 
128 
136 
144 



58 
60 
68 
70 
78 
80 
88 
90 



| PDSID 


( UNNAMED 

1 




PDSFPR 






PDSPFP 




PDSPIC 






PDSSIZ 




PDSR13 






UNNAMED 




PDSR14 






PDSR15 




PDSR0 






PDSR1 












PDSR2 




(PDSPSF ( 
I 1 


UNNAMED 


1 
I 


UNNAMED 




| PDSOP | 


| PDSF0 | 


1 PDSF2 I 


| PDSF4 | 


I PDSF6 | 




PDSFLG 


i 

i 


PDSPP3 




PDSSAV 



Fields in CHAPDS — by displacement 



DEC 


HEX 


FIELD 


DEC 


HEX 


FIELD 




0000 


0000 


PDSID 


0036 


0024 


PDSR0 




0004 


0004 


PDSFPR 


0040 


0028 


PDSR1 




0008 


0008 


PDSPFP 


0044 


002C 


PDSR2 




0012 


00 OC 


PDSPIC 


0056 


0038 


PDSR5 


(EQU) 


0016 


0010 


PDSSIZ 


0088 


0058 


PDSNPIR 


(EQU> 


0020 


0014 


PDSR13 


0088 


0058 


PDSPSF 




0028 


001C 


PDSR14 


0096 


0060 


PDSOP 




0032 


0020 


PDSR15 


0104 


0068 


PDSF0 





DEC HEX FIELD 
0112 0070 PDSF2 
0120 0078 PDSF4 
0128 0080 PDSF6 
0136 0088 PDSFLG 
0140 008C PDSPP3 
0144 0090 PDSSAV 
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Alphabetical list of fields in CHAPDS 



FIELD 
PDSFLG 


DEC 
0136 


HEX 
0088 


FIELD 
PDSOP 


DEC 
0096 


HEX 

0060 


FIELD 
PDSR14 


DEC 

0028 


HEX 

001C 


PDSFPR 


0004 


0004 


PDSPFP 


0008 


0008 


PDSR15 


0032 


0020 


PDSFO 


0104 


0068 


PDSPIC 


0012 


OOOC 


PDSR2 


0044 


002C 


PDSF2 


0112 


0070 


PDSPP3 


0140 


008C 


PDSR5 


0056 


0038 


PDSF4 


0120 


0078 


PDSPSF 


0088 


0058 


PDSSAV 


0144 


0090 


PDSF6 


0128 


0080 


PDSRO 


0036 


0024 


PDSSIZ 


0016 


0010 


PDSID 


0000 


0000 


PDSR1 


0040 


0028 








PDSNPIR 


0088 


0058 


(EQU) PDSR13 


0020 


0014 









(EQU) 



Assembler listing of CHAPDS 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 


COMMENT 






5E 


00000 


CHAPDS 


DSECT 














* TASK MONITOR 


PUSH DOWN 


SAVE AREA 




5E 00000 








DS 


OD 






5E 00000 






PDSID 


DS 


CL2 


ID FIELD 




5E 00002 








DS 


CL2 


UNUSED 




5E 00004 






PDSFPR 


DS 


F 


FOWARD PTR TO NEXT 


ENTRY 


5E 00008 






PDSPFP 


DS 


F 


FORWARD PAGE PTR - 
ENTRY ONLY 


1ST 


5E 0000C 






PDSPIC 


DS 


F 


PTR TO PDSSIZ 




5E 00010 






PDSSIZ 


DS 


F 


SIZE OF SAVE AREA 




5E 00014 






PDSR13 


DS 


F 


SAVE FOR REG 13 




5E 00018 








DS 


F 


UNUSED 




5E 0001C 






PDSR14 


DS 


F 


SAVE FOR REG 14 




5E 00020 






PDSR15 


DS 


F 


SAVE FOR REG 15 




5E 00024 






PDSRO 


DS 


F 


SAVE FOR REG 




5E 00028 






PDSR1 


DS 


F 


SAVE FOR REG 1 




5E 0002C 






PDSR2 


DS 


11F 


SAVE FOR REGS 2 TO 


12 




5E 


00038 


PDSR5 


EQU 


PDSR2+12 






5E 00058 






PDSPSF 


DS 


XL1 


FLAGS SAVED IN LONG SAVE 








* 






AREA 






5E 


00058 


PDSNPIR 


EQU 


PDSPSF 


NON-PRIV INTR FLAG 






00000080 


PDSNPIRM 


EQU 


X* 80' 


RECOVERY=l NO RECOVERY=0 


5E 00059 








DS 


XL3 


UNUSED 




5E 0005C 








DS 


IF 


UNUSED 




5E 00060 






PDSOP 


DS 


D 


OLD VPSW 




5E 00068 






PDSFO 


DS 


D 


FP REG 




5E 00070 






PDSF2 


DS 


D 


FP REG 2 




5E 00078 






PDSF4 


DS 


D 


FP REG 4 




5E 00080 






PDSF6 


DS 


D 


FP REG 6 




5E 00088 






PDSFLG 


DS 


F 


PUSHDOWN FLAG 




5£ 0008C 






PDSPP3 


DS 


F 


PUSHDOWN PTR FROM ISA 


5E 00090 






PDSSAV 


DS 


28F 


SAVE AREA FOR USER 
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Paqinq-Error Control Block (CHAPEC) 

The Paging-Error Control Block (PECB) is the common information storage area for 
the paging error recovery subroutines. 

The Paging I/O Error Recovery Control subroutine (CEAAM) creates a PECB upon the 
first entry to CEAAM for a paging operation error. The PECB is chained to either the 
Drum Interface Control Block (SYSDIO f (for drum paging errors) by a pointer in SYS- 
PEB, or to the Direct Access Interface Block (DAIB) , (for disk paging errors) by a 
pointer in DIAPEB. 
The PECB occupies 192 bytes of core storage* aligned on doubleword boundaries. 

CHAPEC Storage map 



DEC 




64 
72 
80 
88 
96 



168 
176 

184 



HEX 



0| 

I 

1 
1 

1 


PECSAV 


= 


<40| 

1 


PECSDC 




U8|PECSPM |PECAPM | PECMCDC 
1 1 1 


| PECMATN | PECMCC 
1 1 


|PECMNSTD|PECMEC I UNNAMED | 
till 


50 | UNNAMED (CONT) 

1 


|PECMIR IPECMBOC 
1 1 


IPECMDC | UNNAMED |PECMOVRN| 
1 1 1 1 


58 | UNNAMED | PECMNSND | PECFL2 
1 1 1 


| UNNAMED |PECFL0 
1 1 


|PECFL1 | PECPSD | 
1 1 1 


60| 
\_ 

\ 

1 

1 


PECCCW 




A8| 

1 


PECRHA 




B0| 

1 


PECSAR 




B8 | PECNCW | 

I | ORG OVERLAP 


| PECRCW 
1 


1 1 
1 ORG OVERLAP 1 



ORG PECAPM+1 



74 
80 
88 



4 A |PECKCDC |PECKATN | PECKCC | PECKNSTDIPECKEC [pISkNRFII 

I I I 1 I I i 

50|PECKNRF2|PECKNRF3|PECKSC (PECKIR | PECKBOC | PECKDC1 | PECKDC2 |PECKOVRN| 

I I I I I I I I I 

58JPECKMAM |PECKNSND| 

i I I 



ORG PECNCW 



184 



B8| 



PECCPS 



ORG PECRCW 



188 



BC 



PECEPT 
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Fields in CHAPEC — by displacement 





DEC HEX 
0000 0000 


FIELD 
PECSAV 




DEC 
0084 


HEX 
0054 


FIELD 
PECMBOC 




DEC HEX 
0092 005C 


FIELD 
PECFLO 






0064 0040 


PECSDC 




0085 


0055 


PECKDC1 




0093 005D 


PECDS 


(EQU) 




0072 0048 


PECSPM 




0085 


0055 


PECMDC 




0093 005D 


PECRHA5 


(EQU) 




0073 0049 


PECAPM 




0086 


0056 


PECKDC2 




0093 005D 


PECRHA4 


(EQU) 




0074 004A 


. PECKCDC 




0087 


0057 


PECKOVRN 




0093 005D 


PECRHA3 


(EQU) 




0074 004£ 


k PECMCDC 




0087 


0057 


PECMOVRN 




0093 005D 


PECRHA2 


(EQU) 




0075 004B 


\ PECKATN 




0088 


0058 


PECKMAM 




0093 005D 


PECRHAl 


(EQU) 




0075 004E 


\ PECMATN 




0089 


0059 


PECKNSND 




0093 005D 


PECRH 


(EQU) 




0076 004C 


: PECKCC 




0089 


0059 


PECMNSND 




0093 005D 


PECAB 


(EQU) 




0076 004C 


: PECMCC 




0090 


005A 


PECSNS 


(EQU) 


0093 005D 


PECRR 


(EQU) 




0077 004D 


> PECKNSTD 




0090 


005A 


PECREM 


(EQU) 


0093 005D 


PECFL1 






0077 004E 


> PECMNSTD 




0090 


005A 


PECIR 


(EQU) 


0094 005E 


PECPSD 






0078 004E 


; PECKEC 




0090 


005A 


PECFL2 




0096 0060 


PECCCW 






0078 004E 


: PECMEC 




0092 


005C 


PECDV 


(EQU) 


0168 00A8 


PECRHA 






0079 004F 


' PECKNRF1 




0092 


005C 


PECCU 


(EQU) 


0176 00B0 


PECSAR 






0080 0050 


PECKNRF2 




0092 


005C 


PECCH 


(EQU) 


0184 00B8 


PECCPS 






0081 0051 


PECKNRF3 




0092 


005C 


PECSA 


(EQU) 


0184 00B8 


PECNCW 






0082 0052 


PECKSC 




0092 


005C 


PECAR 


(EQU) 


0188 OOBC 


PECEPT 






0083 0053 


. PECKIR 




0092 


005C 


PECSR 


(EQU) 


0188 OOBC 


PECRCW 






0083 0053 


. PECMIR 




0092 


005C 


PECOE 


(EQU) 










0084 0054 


PECKBOC 




0092 


005C 


PECRW 


(EQU) 








Alphabetical list of 


fields in 


CHAPEC 


















FIELD 
PECAB 


DEC 
0093 


HEX 
005D 


CEQU) 


FIELD 
PECKIR 


DEC 
0083 


HEX 
0053 




FIELD 
PECPSD 


DEC HEX 
0094 005E 






PECAPM 


0073 


0049 




PECKMAM 


0088 


0058 




PECRCW 


0188 OOBC 






PECAR 


0092 


005C 


CEQU) 


PECKNRF1 


0079 


004F 




PECREM 


0090 005A 


(EQU) 




PECCCW 


0096 


0060 




PECKNRF2 


0080 


0050 




PECRH 


0093 005D 


(EQU) 




PECCH 


0092 


005C 


CEQU) 


PECKNRF3 


0081 


0051 




PECRHA 


0168 00A8 






PECCPS 


0184 


00B8 




PECKNSND 


0089 


0059 




PECRHA1 


0093 005D 


(EQU) 




PECCU 


0092 


005C 


(EQU) 


PECKNSTD 


0077 


004D 




PECRHA2 


0093 005D 


(EQU) 




PECDS 


0093 


005D 


CEQU) 


PECKOVRN 


0087 


0057 




PECRHA3 


0093 005D 


(EQU) 




PECDV 


0092 


005C 


(EQU) 


PECKSC 


0082 


0052 




PECRHA4 


0093 005D 


(EQU) 




PECEPT 


0188 


OOBC 




PECMATN 


0075 


004B 




PECRHA5 


0093 005D 


(EQU) 




PECFLO 


0092 


005C 




PECMBOC 


0084 


0054 




PECRR 


0093 005D 


(EQU) 




PECFL1 


0093 


005D 




PECMCC 


0076 


004C 




PECRW 


0092 005C 


(EQU) 




PECFL2 


0090 


005A 




PECMCDC 


0074 


004A 




PECSA 


0092 005C 


(EQU) 




PECIR 


0090 


005A 


(EQU) 


PECMDC 


0085 


0055 




PECSAR 


0176 00B0 






PECKATN 


0075 


004B 




PECMEC 


0078 


004E 




PECSAV 


0000 0000 






PECKBOC 


0084 


0054 




PECMIR 


0083 


0053 




PECSDC 


0064 0040 






PECKCC 


0076 


004C 




PECMNSND 


0089 


0059 




PECSNS 


0090 005A 


(EQU) 




PECKCDC 


0074 


004A 




PECMNSTD 


0077 


004D 




PECSPM 


0072 0048 






PECKDC1 


0085 


0055 




PECMOVRN 


0087 


0057 




PECSR 


0092 005C 


(EQU) 




PECKDC2 


0086 


0056 




PECNCW 


0184 


00B8 












PECK EC 


0078 


004E 




PECOE 


0092 


00 5C 


(EQU) 








Assembler 


listing of 


CHAPEC 






















LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 


COMMENT 










5F 00000 


CHAPEC 


DSECT 




PAGING ERROR 


CONTROL BLOCK 




5F 00000 






PECSAV 


DS 


8D 




CEAAM GENERAL 


, REGISTER 


0-15 










* 










SAVE AREA 








5F 00040 






PECSDC 


DS 


XL8 


SENSE DATA CELL 






5F 00048 






PECSPM 


DS 


X 




•SAME PATH RETRY' MASTER 










* 










ERROR COUNTER 








5F 00049 






PECAPM 


DS 


X 




•ALTERNATE PATH RETRY 1 












* 










MASTER ERROR 


COUNTER 












* 




2301/2820 DRUM RETRY COUNTERS 








5F 0004A 






PECMCDC 


DS 


X 




CHANNEL CONTROL CHECK, 












* 












N429 














♦ 










INTERFACE CONTROL CHECK OR 










* 












N429 














♦ 










CHANNEL DATA 


CHECK 












* 












N429 








5F 0004B 






PECMATN 


DS 


X 




ATTENTION 








(I*i sting 


Of CHAPEC 


continued < 


on page 297) 










296 CHAPEC 



























(Listing of CHAP EC continued from page 296) 



LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 


5F 0004C 






PECMCC 


DS 


X 


5F 0004D 






PECMNSTD 


DS 


X 


5F 0004E 






PECMEC 


DS 


X 


5F 0004F 








DS 


XL4 


5F 00053 






PECMIR 


DS 


X 


5F 00054 






PECMBOC 


DS 


X 


5F 00055 






PECMDC 


DS 


X 


5F 00056 








DS 


X 


5F 00057 






PECMOVRN 


DS 


X 


5F 00058 




_ 


^ 


DS 


X 


5F 00059 






PECMNSND 

* 


DS 


X 








2311/2841 AND 




5F 


0004A 




|ORG| 


PECAPM+: 


5F 0004A 






PECKCDC 

* 
* 
* 
* 
* 
PECKATN 


DS 


X 


5F 0004B 






DS 


X 


5F 0004C 






PECKCC 


DS 


X 


5F 0004D 






PECKNSTD 


DS 


X 


5F 0004E 






PECKEC 


DS 


X 


5F 0004F 






PECKNRF1 


DS 


X 


5F 00050 






PECKNRF2 


DS 


X 


5F 00051 






PECKNRF3 


DS 


X 


5F 00052 






PECKSC 


DS 


X 


5F 00053 






PECKIR 

* 

PECKBOC 


DS 


X 


5F 00054 






DS 


X 


5F 00055 






PECKDC1 


DS 


X 


5F 00056 






PECK DC 2 


DS 


X 


5F 00057 






PECKOVRN 


DS 


X 


5F 00058 






PECKMAM 


DS 


X 


5F 00059 






PECKNSND 

* 


DS 


X 




5F 


0005A 


♦ 


|ORG| 


PECAPM+ 


5F 0005A 






PECFL2 


DS 


X 




5F 


0005A 


PECIR 

* 


EQU 


PECFL2 




00000080 


* 
PECIRM 


EQU 


X f 80 1 




5F 


0005A 


PECREM 

* 


EQU 


PECFL2 




00000040 


PECREMM 

* 

PECSNS 

* 

PECSNSM 

* 


EQU 


X'40' 




5F 


0005A 


EQU 


PECFL2 




00000020 


EQU 


X'20" 


5F 0005B 






♦ 


DS 


X 


5F 0005C 






PECFL0 


DS 


X 




5F 


0005C 


PECRW 


EQU 


PECFL0 


(Listing 


of 


CHAP EC 


continued 


on page 298) 



COMMENT 

CHAINING CHECK 
NO STATUS DATA PRESENT 
UNIT CHECK- EQUIPMENT CHECK 
NOT USED 

UNIT CHECK-INTERVENTION 
REQUIRED 

UNIT CHECK-BUS OUT CHECK 
UNIT CHECK-DATA CHECK 
NOT USED 

UNIT CHECK-OVERRUN 
RESERVED 
N429 
NO SENSE DATA AFTER UNIT 
CHECK 
2314 DISK RETRY COUNTERS 
1 

CHANNEL CONTROL CHECK, 

N429 
INTERFACE CONTROL CHECK OR 

N429 
CHANNEL DATA CHECK 

N429 
ATTENTION 
CHAINING CHECK 
NO STATUS DATA PRESENT 
UNIT CHECK- EQUIPMENT CHECK 
UNIT CHECK-NO RECORD FOUND 
(INCT TK) 

UNIT CHECK-NO RECORD FOUND 
(MAM) 

UNIT CHECK-NO RECORD FOUND 
(DIFF TK) 

UNIT CHECK-SEEK CHECK 
UNIT CHECK- INTERVENTION 
REQUIRED 

UNIT CHECK-BUS OUT CHECK 
UNIT CHECK-DATA CHECK 
UNIT CHECK-DATA CHECK * 16 
UNIT CHECK-OVERRUN 
UNIT CHECK-MISSING ADDRESS 
MARKER 

NO SENSE DATA AFTER UNIT 
CHECK 
FLAGS 
17 N429 

FLAG FIELD 2 

N429 
INTERVENTION REQUIRED 
WAITING N429 
FOR DEVICE END 

N429 
INTERVENTION REQUIRED MASK 

N429 
REMOUNT OF 2314 TO SAME 

N429 
ADDRESS REQUESTED 

N429 
REMOUNT REQUESTED MASK 

N429 
ERROR RECOVERY SENSE FLAG 

N429 
ERROR RECOVERY SENSE MASK 

N429 
RESERVED 

N429 
FLAG FIELD 

RE-WRITE OPERATION AFTER 
SUCCESSFUL READ 
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(Listing of CHAPEC continued from page 297) 



LOCATION 


INSTRUCT IO 


N SOURCE 


INST 


OPER 


COMMENT 






00000080 


PECRWM 


EQU 


x'80' 


PECRW MASK 






5F 0005C 


PECOE 


EQU 


PECFLO 


OUTBOARD ERROR INDICATOR 






00000040 


PECO EM 


EQU 


X'40' 


PECOE MASK 






5F 0005C 


PECSR 

* 


EQU 


PECFLO 


CONTROL UNDER 'SAME PATH 
RETRY 1 






00000020 


PECSRM 


EQU 


X'20' 


PECSR MASK 






5F 0005C 


PECAR 

* 


EQU 


PECFLO 


CONTROL UNDER 'ALTERNATE 
PATH RETRY' 






00000010 


PECARM 


EQU 


X'10' 


PECAR MASK 






5F 00 05C 


PECSA 


EQU 


PECFLO 


CONTROL UNDER 'STANDARD 
AREA RETRY' 






00000008 


PECSAM 


EQU 


x'08' 


PECSA MASK 






5F 0005C 


PECCH 


EQU 


PECFLO 


MALFUNCTIONING CHANNEL 
DETECTED 






00000004 


PECCHM 


EQU 


X f 04 f 


PECCH MASK 






5F 0005C 


PECCU 


EQU 


PECFLO 


MALFUNCTIONING DCU DETECTED 






00000002 


PECCUM 


EQU 


X'02' 


PECCU MASK 






5F 0005C 


PECDV 

* 


EQU 


PECFLO 


MALFUNCTIONING DEVICE 
DETECTED 






00000001 


PECDVM 


EQU 


X'01' 


PECDV MASK 


5F 


0005D 




PECFL1 


DS 


X 


FLAG FIELD 1 






5F 0005D 


PECRR 


EQU 


PECFL1 


RE-READ OPERATION AFTER 
SUCCESSFUL READ 






00000040 


PECRRM 


EQU 


X'40' 


PECRR MASK 






5F 0005D 


PECAB 


EQU 


PECFL1 


ALTERNATE PATH BUSY 






00000020 


PECABM 


EQU 


X'20' 


PECAB MASK 






5F 0005D 


PECRH 

* 


EQU 


PECFL1 


'READ HOME ADDRESS' 
OPERATION 






00000004 


PECRHM 


EQU 


X f 04 f 


PECRH MASK 






5F 0005D 


PECRH Al 

* 


EQU 


PECFL1 


READ HOME ADDRESS FOR NO 
RECORD FOUND-CORRECT TK 






00000005 


PECRH AIM 


EQU 


X'05' 


PECRHA1 MASK 






5F 0005D 


PECRHA2 

* 


EQU 


PECFL1 


READ HOME ADDRESS FOR 
NRF-MISSING ADDRESS MARKERl 






00000006 


PECRHA2M 


EQU 


X'06' 


PECRHA2 MASK 






5F 0005D 


PECRHA3 


EQU 


PECFL1 


READ HOME ADDRESS FOR 
NRF-MISSING ADDRESS MARKER2 






00000007 


PECRH A3 M 


EQU 


X'07' 


PECRHA3 MASK 






5F 0005D 


PECRHA4 


EQU 


PECFL1 


READ HOME ADDRESS FOR DATA 
CHECK 






0O000OOC 


PECRHA4M 


EQU 


X'OC 


PECRHA4 MASK 






5F 0005D 


PECRHA5 

* 


EQU 


PECFL1 


READ HOME ADDRESS FOR 
MISSING ADDRESS MARKER 






OO0O0O0D 


PECRHA5M 


EQU 


X'OD' 


PECRHA5 MASK 






5F 0005D 


PECDS 

* 


EQU 


PECFL1 


CURRENT AUXILIARY DEVICE 
HAS BEEN SUPPRESSED 






00000080 


PECDSM 


EQU 


X'80' 


PECDS MASK 


5F 


0005E 




PECPSD 

* 


DS 


H 


DISPLACEMEND TO PAGING 
DEVICE ENTRY IN CHBPSD 


5F 


00060 




PECCCW 


DS 


9D 


CHANNEL PROGRAM AREA FOR 
ERROR RETRY 


5F 


000A8 




PECRHA 

* 


DS 


D 


'READ HOME ADDRESS' INPUT 
AREA/WORK AREA 


5F 


000B0 




PECSAR 

* 


DS 


D 


SEEK ARGUEMENT AREA FOR 
ERROR RETRY/WORK AREA 


5F 


000B8 


5F 000B8 


PECNCW 

* 


DS 
|ORG| 


X 

PECNCW 


NUMBER OF CCW'S IN FAILING 
CHANNEL PROGRAM SGMNT 


5F 


000B8 




PECCPS 

* 


DS 


F 


POINTER TO FAILING CHANNEL 
PROGRAM SEGMENT 


5F 


O00BC 


5F 000BC 


PECRCW 

* 


DS 
|ORG| 


X 

PECRCW 


RELATIVE NUMBER OF FAILING 
CCW WITHIN CHAN. PROG, 


5F 


000BC 




PECEPT 

* 


DS 


F 


POINTER TO: DIBE(DRUM) / 
PCBE( NON-DRUM DEV. ) 



I 
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User Profile (CHAPFL), Character Translation Table (CHACTT) and Profile Character and 
Switch Table (CHAPCT) 

The User Profile (CHAPFL) , providing means for storing user profile information on 
SYSLIB or USERLIB, consists of three contiguous tables: 

1. Profile Character and Switch Table (CHAPCT) 

2. Character Translation Table (CHACTT) 

3. Primary Dictionary (see section CHADHO 

CHAPFL describes the profile as it exists in external storage as the System Proto- 
type Profile in SYSLIB, or as a User Profile (saved by the PROFILE command) in 
USERLIB. 
CHAPCT resides in New Task Common, aligned on word boundaries. 

CHACTT is used by GATE to translate characters and to determine functions during 
input. CHACTT resides in the GATE psect, and consists of 256 contiguous entries in 
the following form; 

CTTTR (1 byte) Translated value 
CTTFN (1 byte) Function code 
The complete list of available function codes are shown below with their meanings: 



Fu nction Code 

4 
8 
C 
10 
14 



Meaning 
Translate 
Backspace 

End-of- block or new line 
Cancel 

Terminal null 
Null 



CHAPFL Storage map 



DEC 




24 



HEX 



1048 



0| 


PFLPCT } 


18 | 






PFLCTT "T 


218 | 






PFLOCT 7 


418 1 


1 UNNAMED | | 
1 t f 




PFLPDC | 
(Variable length) j 



Fields in CHAPFL — by displacement 



DEC HEX FIELD 
0000 0000 PFLPCT 



DEC HEX FIELD 
(EQU) 0026 001A PFLCTT 



DEC HEX FIELD 
(EQU) 0538 021A PFLOCT (EQU) 
1052 041C PFLPDC (EQU) 
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Alphabetical list of fields in CHAPFL 

FIELD DEC HEX FIELD DEC HEX FIELD DEC HEX 
PFLCTT 0026 001A (EQU) PFLOCT 0538 021A (EQU) PFLPCT 0000 0000 (EQU) 

PFLPDC 1052 011C (EQU) 

Assembler listing of CHAPFL 

LOCATION INSTRUCTION SOURCE INST OPER COMMENT 
60 00000 CHAPFL DSECT 

* USER PROFILE IS MAINTAINED EXTERNALLY AS ONE 

* CONTIGUOUS TABLE 

* COMPOSED OF 3 SUB TABLES IN THE ORDER LISTED 

* BELOW 

* PROFILE CHARACTER AND SWITCH TABLE, LENGTH 

* = PCTLEN 

* CHARACTER TRANSLATION TABLE, LENGTH = 512 

* BYTES 

* PRIMARY DICTIONARY, LENGTH VARIABLE. 
60 00000 PFLPCT EQU * ORIGIN OF CHAPCT TABLE 
60 0001A 1 QRG 1 PFLPCT4■X f lA , N366 

60 0001A PFLCTT EQU * ORIGIN OF CHACTT TABLE 

60 0021A |ORG| PFLCTT +X • 2 • 

60 0021A PFLOCT EQU * OUTPUT CHAR TRANSLATION TBL 

* N366 

60 0041A J ORG I PFLOCT+X' 200 f N366 

60 0041C DS OF 

60 0041C PFLPDC EQU * ORIGIN OF PRIMARY 

* DICTIONARY 



3 00 CHAPFL 



CHACTT Storage map 



DEC 




HEX 



0| CTTTR |CTTFN | 



ORG CHACTT 



01 



ORG OVERLAP 



UNNAMED 



Fields in CHACTT — by displacement 








DEC HEX FIELD 
0000 0000 CTTTR 


DEC 
0001 


HEX 

0001 


FIELD 

CTTFN 


DEC HEX FIELD 


Alphabetical list of 


fields in 


CHACTT 








FIELD 
CTTFN 


DEC HEX 
0001 0001 


FIELD 
CTTTR 


DEC HEX 
0000 0000 


FIELD DEC HEX 


Assembler listinq of 


CHACTT 










LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 


COMMENT 




IE 00000 


CHACTT 


DSECT 


, CHARACTER 






♦ 






TRANSLATION TABLE 


IE 00000 




CTTTR 


DS 


CL1 


TRANSLATED VALUE 


IE 00001 




CTTFN 


DS 


XL1 


FUNCTION CODE 
FUNCTION CODE VALUES 




00000000 


CTTTRN 


EQU 


X'O' 


TRANSLATE FUNCTION 




00000004 


CTTBSP 


EQU 


X'4' 


BACKSPACE FUNCTION 




00000008 


CTTEOB 

* 


EQU 


X'S' 


END OF BLOCK OR NEW LINE 
FUNCTION 




oooooooc 


CTTCAN 


EQU 


X'C' 


CANCEL FUNCTION 




00000010 


CTTTNL 


EQU 


X'lO 1 


TERMINAL NULL FUNCTION 




00000014 


CTTNUL 


EQU 


x'la 1 


NULL FUNCTION 




IE 00000 




JORGI 


CHACTT 




IE 00000 






DS 


256CL2 






00000200 


CTTLEN 


EQU 


♦-CHACTT 


LENGTH OF CHACTT TABLE 


CHAPCT Storaqe map 












DEC HEX 












0| 


PCTCTT 




1 

i 


PCTOCT 


8 8 J PCTEB 

1 


|PCTCN 
1 


; PCTCL | PCTTR 


| PCTRCC 
i 


( PCTSSM | PCTUSM | PCTPL 
1 1 1 


16 101 

1 






PCTPS 




2«* 18JPCTKC 

» 


| PCTRS 

\ 


1 
1 
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Fields in CHAPCT — by displacement 



DEC 


HEX 
0000 


FIELD 
PCTCTT 


DEC 
0011 


HEX 
OOOB 


FIELD 


0000 


PCTTR 


0004 


0004 


PCTOCT 


0012 


000C 


PCTRCC 


0008 


0008 


PCTEB 


0013 


O00D 


PCTSSM 


0009 


0009 


PCTCN 


0014 


000E 


PCTUSM 



0010 000A PCTCL 



0015 000F PCTPL 



DEC HEX FIELD 

0016 0010 PCTPS 

0024 0018 PCTKC 

0025 0019 PCTRS 



f 



Alphabetical list of fields in CHAPCT 



FIELD 
PCTCL 


DEC HEX 
0010 000A 


FIELD 
PCTOCT 


DEC HEX 
0004 0004 


PCTCN 


0009 0009 


PCTPL 


0015 000F 


PCTCTT 


0000 0000 


PCTPS 


0016 0010 


PCTEB 


0008 0008 


PCTRCC 


0012 000C 


PCTKC 


0024 0018 


PCTRS 


0025 0019 


.stinq of 


CHAPCT 


SOURCE 


INST 




LOCATION 


INSTRUCTION 


P OPER 




5D 00000 


CHAPCT 

* 
PCTCTT 


DSECT 


5D 00000 




DS 


A 


5D 00004 




PCTOCT 


DS 


A 


5D 00008 




PCTEB 


DS 


CL1 




00000026 


PCTEBM 


EQU 


X'26 f 


5D 00009 




PCTCN 


DS 


CL1 




00000060 


PCTCNM 


EQU 


C f -' 


5D 0000A 




PCTCL 


DS 


CL1 




0000006D 


PCTCLM 
PCTTR 


EQU 


c . . 


5D O0O0B 




DS 


CL1 




0000004F 


PCTTRM 


EQU 


c f | • 


5D 0000C 




PCTRCC 

* 

PCTRCCM 

* 


DS 


CL1 




0000007A 


EQU 


c t .. 


5D 0000D 




PCTSSM 


DS 


XL1 


5D 0000E 




PCTUSM 


DS 


XL1 


5D 0000F 




PCTPL 


DS 


HL1 




00000002 


PCTPLM 


EQU 


2 


5D 00010 




PCTPS 


DS 


CL8 




00006D16 


PCTPSM 


EQU 


X , 6D16' 


5D 00018 




PCTKC 


DS 


CL1 




000000D2 


PCTKCK 


EQU 


C'K' 




O00OO0C5 


PCTKCE 

* 


EQU 


C'E* 


5D 00019 




PCTRS 


DS 


CL1 




0000007A 


PCTRSM 

* 

PCTLEN 


EQU 


C - :• 




0000001A 


EQU 


♦-CHAPCT 



FIELD DEC HEX 

PCTSSM 0013 000D 

PCTTR 0011 OOOB 

PCTUSM 0014 000E 



COMMENT 

, PROFILE CHAR 

AND SWITCH TABLE 

POINTER TO CHAR TRANSLATION 

TABLE 

OUTPUT CHAR TRANSLATION TBL 

ADDRN366 

SOURCE LIST EOB CHARACTER 

HEX 26 

CONTROL LANGUAGE 

CONTINUATION CHAR 

HEX 60 

CONTROL LANGUAGE PREFIX 

CHARACTER 

UNDERSCORE CHARACTER 

N448 
TRANSIENT PREFIX CHARACTER 
LOGICAL OR 

CHARACTER (VERTICAL) N448 
RECORD CONCATENATION 
CHARACTER N448 
COLON 

N448 
SYSTEM SCOPE MASK 
USER SCOPE MASK 
LENGTH OF COMMAND PROMPT 
TWO BYTES 

COMMAND PROMPT STRING 
BACKSPACE 

SYSIN KEYBD/CARD RDR SWITCH 
KEYBOARD ONLY 
EITHER KEYBOARD OR CARD 
READER 

CARRIAGE RETURN SUPPRESSION 
CHAR 

SUPPRESSION CHARACTER IS 
COLON N448 
LENGTH OF CHAPCT TABLE 
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Page Table (CHAPGT, and External Page Table (CHAXPT) 

The Page Table (PGT) is a contiguous list of 2 byte entries containing the address 
and availability indicator of a core block assigned to a task's virtual storage. One 
page table exists for each segment assigned to virtual storage. The PGT (2 - 512 
bytes } resides in core storage aligned on fullword boundaries. 

The External Page Table CXPT) contains information concerning page table entries 
assigned to a task's virtual storage. The XPT (8 - 20<*8 bytes) resides in core 
storage, preceded by the Page Table, aligned on fullword boundaries. 



J CHAPGT Storage map 
* DEC HEX 



0| PGTCBA | 
I I 

Fields in CHAPGT — by displacement 

DEC HEX FIELD DEC HEX FIELD DEC HEX FIELD 

0000 0000 PGTCBA 0001 0001 PGTPA (EQU> 

Alphabetical list of fields in CHAPGT 

FIELD DEC HEX FIELD DEC HEX FIELD DEC HEX 
PGTCBA 0000 0000 PGTPA 0001 0001 (EQU) 

9 Assembler listing of CHAPGT 

' LOCATION INSTRUCTION SOURCE INST OPER COMMENT 

62 00000 CHAPGT DSECT PAGE TABLE ENTRY 

I 62 00000 DS OH 

62 00000 PGTCBA DS H CORE BLOCK ADDRESS 

62 00001 PGTPA EQU PGTCBA+1 PAGE AVAILABILITY FLAG 

^ f' . 00000008 PGTPAM EQU 8 PAGE AVAILABILITY MASK 
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CHAXPT Storage map 



DEC HEX 














01 


XPTXL 




|XPTF1 
1 


|XPTF2 (XPTPMC (XPTFLG | 
till 


Fields in CHAXPT — by displacement 










DEC HEX 


FIELD 


DEC 


HEX 


FIELD 


DEC HEX FIELD 




0000 0000 XPTXL 


0004 


0004 


XPTUP 


(EQU) 0005 0005 XPTF2 




0004 0004 XPTPU 


(EQU) 0004 


0004 


XPTF1 


0006 0006 XPTPMC 




0004 0004 XPTSP 


(EQU) 0005 


0005 


XPTPC 


(EQU) 0007 0007 XPTPP 


(EQU) 


0004 0004 XPTPA 


(EQU) 0005 


0005 


XPTAX 


(EQU) 0007 0007 XPTPRO 


(EQU) 


0004 0004 XPTCP 


(EQU) 0005 


0005 


XPTBV 


(EQU) 0007 0007 XPTPH 


(EQU) 


0004 0004 XPTTP 


CEQU) 0005 


0005 


XPTIV 


(EQU) 0007 0007 XPTFLG 




0004 0004 XPTPD 


(EQU) 0005 


0005 


XPTTA 


(EQU) 




Alphabetical list of 


fields in 


CHAXPT 










FIELD 


DEC HEX 


FIELD 


DEC HEX 


FIELD DEC HEX 




XPTAX 


0005 0005 


(EQU) XPTPA 


0004 0004 


(EQU) XPTPU 0004 0004 


(EQU) 


XPTBV 


0005 0005 


(EQU) XPTPC 


0005 0005 


(EQU) XPTSP 0004 0004 


(EQU) 


XPTCP 


0004 0004 


(EQU) XPTPD 


0004 0004 


(EQU) XPTTA 0005 0005 


(EQU) 


XPTFLG 


0007 0007 


XPTPH 


0007 0007 


(EQU) XPTTP 0004 0004 


(EQU) 


XPTF1 


0004 0004 


XPTPMC 


0006 0006 


XPTUP 0004 0004 


(EQU) 


XPTF2 


0005 0005 


XPTPP 


0007 0007 


(EQU) XPTXL 0000 0000 




XPTIV 


0005 0005 


(EQU) XPTPRO 


0007 0007 


(EQU) 




Assembler listinq of 


CHAXPT 












LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 


COMMENT 






BA 00000 


CHAXPT 


DSECT 


EXTERNAL PAGE TABLE 






♦ 






ENTRY 




BA 00000 






DS 


OF 






BA 00000 




XPTXL 


DS 


F 


EXTERNAL LOCATION OF PAGE 


BA 00004 




XPTF1 


DS 


X 


FLAG BYTE 1 






BA 00004 


XPTUP 


EQU 


XPTF1 


UPDATE IN PLACE FLAG 






00000080 


XPTUPM 


EQU 


X f 80' 








BA 00004 


XPTPD 

* 


EQU 


XPTF1 


PREFERED PAGING DEVICE 
1=DRUM 






00000040 


XPTPDM 


EQU 


X'40' 








BA 00004 


XPTTP 


EQU 


XPTF1 


TYPE PROGRAM OR DATA 






00000020 


XPTTPM 


EQU 


X f 20 f 








BA 00004 


XPTCP 


EQU 


XPTF1 


CHANGED PAGE BIT FLAG 






00000010 


XPTCPM 


EQU 


X'10' 


CHANGED PAGE BIT MASK 






BA 00004 


XPTPA 

* 


EQU 


XPTF1 


PAGE ASSIGNED 
1= ASSIGN 






00000004 


XPTPAM 


EQU 


X , 04 f 








BA 00004 


XPTSP 


EQU 


XPTF1 


SHARED PAGE FLAG 






00000002 


XPTSPM 


EQU 


X'02' 








BA 00004 


XPTPU 


EQU 


XPTF1 


PAGE UNPROCESSED BY LOADER 






* 






l=UNPROCESSED 






00000001 


XPTPUM 


EQU 


X'Ol' 






BA 00005 




XPTF2 


DS 


X 


FLAG BYTE 2 






BA 00005 


XPTTA 


EQU 


XPTF2 


TEMPORARY EXTERNAL ADDRESS 




00000080 


XPTTAM 


EQU' 


X'80' 








BA 00005 


XPTIV 


EQU 


XPTF2 


IVM PAGE NON DELETEABLE 






* 






FLAG 






00000040 


XPTIVM 


EQU 


X'40" 


IVM PAGE NON DELETEABLE 






♦ 






MASK 






BA 00005 


XPTBV 


EQU 


XPTF2 


SETXP ALLOWED AGAINST IVM 






* 






PAGE 






00000020 


XPTBVM 


EQU 


X'20 1 


SETXP ALLOWED AGAINST IVM 






* 






PAGE MASK 






BA 00005 


XPTAX 


EQU 


XPTF2 


AUXILIARY STORAGE FLAG 






00000010 


XPTAXM 


EQU 


X'lO' 






(Listing 


of CHAXPT 


continued 


on page 305) 
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C Listing of CHAXPT continued from page 304) 



V 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 


COMMENT 




BA 00005 


XPTPC 

* 


EQU 


XPTF2 


PROTECT CLASS 
4 BITS 


BA 00006 






DS 


OH 




BA 00006 




XPTPMC 


DS 


XL1 


2 BIT PAGE REFERENCE 
COUNTER 




00000002 


XPTPMC1 


EQU 


X t 02 t 


RESERVED FOR PARTIAL 




00000001 


XPTPMC2 


EQU 


x-oi- 


MIGRATION FROM DRUM 


BA 00007 




XPTFLG 


DS 


X 


FLAG BYTE 




BA 00007 


XPTPH 


ECU 


XPTFLG 


PAGE HOLD COUNT FIELD 




000000F0 


XPTPHM 


EQU 


X'FO' 


PAGE HOLD COUNT 




00000008 


XPTPH1 


EQU 


X , 08 i 


SVC PAGE HOLD FLAG 




BA 00007 


XPTPRO 


EQU 


XPTFLG 


ENTRY PROCESSED FLAG 
(MT/T> 




00000004 


XPTPROM 

* 


EQU 


X'QH* 


ENTRY PROCESSED MASK 

(MT/T) 




BA 00007 


XPTPP 


EQU 


XPTFLG 


PREPAGE FLAG 




00000002 


XPTPPM 


EQU 


X , 02* 


PREPAGE MASK 
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Communications Bucket (CHAPLI) 



The PL/I communications bucket maintains all user-supplied options for the PL/I 
Program Language Controller (PLC) . 
The 40- byte communications bucket is aligned on a fullword boundary. 



» 



CHAPLI Storage map 



DEC 


8 

16 
24 
32 

40 



HEX 

I 

8| 

I 

10| 

I 
181 

I 

20| 

I 
28) 

1 



PLIFTM 


|PLISOD 

1 


[PLILMN (PLIBRV 
\ i 


IPLIERR | 

1 i 


PLIDDN 


i 

1 


PLILDN 




PLIMAC 


1 

« 


PLIMRG 




PLIPDS 


| PLIPRT 

1 


| PLILDS | PLICON 
1 I 


IPLILOD | 
1 i 


PLINAM I 


PLIEXP 


i 
I 


PLIXDS 





Fields in CHAPLI — by displacement 



DEC HEX FIELD 
0000 0000 PLIFTM 


DEC 
0008 


HEX 
0008 


FIELD 
PLIDDN 


DEC HEX FIELD 
0029 001D PLILDS 


000 3 0003 PLIFTP 


(EQU) 0012 


oooc 


PLILDN 


0030 001E PLICON 


0004 0004 


\ PLISOD 


0016 


0010 


PLIMAC 


0031 001F PLILOD 


0005 0005 PLILMN 


0020 


0014 


PLIMRG 


0032 0020 PLINAM 


0006 oooe 


> PLIBRV 


0024 


0018 


PLIPDS 


0040 0028 PLIEXP 


0007 0007 PLIERR 


0028 


001C 


PLIPRT 


0044 002C PLIXDS 


Alphabetical list of 


fields in 


CHAPLI 








FIELD 
PLIBRV 


DEC HEX 
0006 0006 


FIELD 
PLIFTP 


DEC HEX 
0003 0003 


FIELD DEC HEX 
(EQU) PLIMRG 0020 0014 


PLICON 


0030 001E 


PLILDN 


0012 OOOC 


PLINAM 00 32 0020 


PLIDDN 


0008 0008 


PLILDS 


0029 001D 


PLIPDS 0024 0018 


PLIERR 


0007 0007 


PLILMN 


0005 0005 


PLIPRT 0028 001C 


PLIEXP 


0040 0028 


PLILOD 


0031 001F 


PLISOD 0004 0004 


PLIFTM 


0000 0000 


PLIMAC 


0016 0010 


PLIXDS 0044 002C 


Assembler listinq of 


CHAPLI 










LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 


COMMENT 




63 00000 


CHAPLI 


DSECT 


DSECT FOR COMMUNICATION 






♦ 






BUCKET 


63 00000 




PLIFTM 


DS 


F 






63 00003 


PLIFTP 


EQU 


PLIFTM+3 


FOOTPRINT OF PATH THROUGH 
PLC 




00000000 


PLIFTO 

* 


EQU 


x'oo f 


PLC NOT PREVIOUSLY 
INTERRUPTED 




00000004 


PLIFT1 


EQU 


X , 04 l 


EDITOR END REQUIRED 




00000008 


PLIFT2 


EQU 


X'08' 


DATA SET CLEANUP REQUIRED 




oooooooc 


PLIFT3 


EQU 


X'OC 


PL/1 COMPILER INVOKED 




00000010 


PLIFT4 


EQU 


X'lO' 


DATA SET CLEANUP REQUIRED 




00000014 


PLIFT5 


EQU 


X f 14' 


ODC END REQUIRED 




00000018 


PLIFT6 


EQU 


x-is* 


DATA SET CLEANUP REQUIRED 




0000001C 


PLIFT7 

* 


EQU 


X'lC f 


CFBAK END RTN REQUIRED 
N480 




00000020 


PLIFT8 


EQU 


X f 20 f 


DATA SET CLEANUP REQUIRED 
N480 




00000024 


PLIFT9 

* 


EQU 


X f 24' 


PLC CALL COMPLETE 
N480 


63 00004 




PLISOD 


DS 


XL1 


DIAGNOSTICS ON SYSOUT 
OPTION 




00000000 


PLISD1 


EQU 


X f 00 f 


DIAGNOSTICS ON SYSOUT 




00000001 


PLISD2 


EQU 


X'01 f 


NO DIAGNOSTICS 


63 00005 




PLILMN 


DS 


CL1 


VALUE OF "LIMEN" 


C Listing 


of CHAPLI 


continued 


on page 307) 
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(Listing of CHAPLI continued from page 306) 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 






000000C9 


PLILM1 


EQU 


CI' 






O000OOE6 


PLILM2 


EQU 


C f W f 






OO0000D5 


PLILM3 


EQU 


C f N f 






000000E7 


PLILM4 


EQU 


C'X' 






000000E3 


PLILM5 


EQU 


C . T , 


63 


00006 




PLIBRV 


DS 


CL1 






000000D4 


PLIBR1 


EQU 


C f M f 






OO00O0E2 


PLIBR2 


EQU 


C'S 1 






000000C5 


PLIBR3 


EQU 


C 1 E 1 






000000E3 


PLIBR4 


EQU 


c t T t 






000000E7 


PLIBR5 


EQU 


C'X 1 


63 


00007 




PLIERR 


DS 


XL1 






00000000 


PLIERO 


EQU 


X'OO* 






00000004 


PLIER1 


EQU 


X'QH* 






00000008 


PLIER2 


EQU 


X'OS' 






OOOOOOOC 


PLIER3 


EQU 


X'OC 1 






00000010 


PLIER4 


EQU 


X'10' 


63 


00008 




PLIDDN 


DS 


F 


63 


OOOOC 




PLILDN 


DS 


F 


63 


00010 




PLIMAC 


DS 


F 


63 


00014 




PLIMRG 

♦ 


DS 


F 


63 


00018 




PLIPDS 

* 


DS 


F 


63 


0001C 




PLIPRT 


DS 


XL1 






00000000 


PLIPRO 


EQU 


X'OO' 






00000041 


PLIPR1 


EQU 


X'**!' 






00000061 


PLIPR2 


EQU 


X f 61' 


63 


0001D 




PLILDS 


DS 


XL1 






00000000 


PLILSO 


EQU 


X'OO 1 






00000001 


PLILS1 


EQU 


X^l' 


63 


0001E 




PLICON 


DS 


XL1 






00000000 


PLICN1 


EQU 


X'OO 1 






00OOOOC3 


PLICN2 


EQU 


X'C3 f 


63 


0001F 




PLILOD 


DS 


XL1 






00000000 


PLILD1 


EQU 


X , 00 i 






00000001 


PLILD2 


EQU 


X , 01 i 


63 


00020 




PLINAM 


DS 


CL8 


63 


00028 




PLIEXP 


DS 


A 


63 


0002C 




PLIXDS 

* 


DS 


A 



COMMENT 

INFORMATION MESSAGES 
WARNING MESSAGES 
ERROR MESSAGES 
SERIOUS ERROR MESSAGES 
TERMINAL ERROR MESSAGES 
VALUE OF "BREVITY" 
MESSAGE ID ONLY 
NORMAL MESSAGE TEXT 
EXTENDED MESSAGE TEXT 
STANDARD TEXT-NO MSG ID 
EXTENDED TEXT-NO MSG ID 
ERROR LEVEL CODE 
NO ERRORS DETECTED 
TYPE 1 ERRORS 
TYPE 1 ERRORS - ERRORS 
TYPE 2 ERRORS - SEVERE 
TYPE 3 ERRORS - TERMINAL 
POINTER TO SOURCE DCB 
POINTER TO LISTING DCB 
POINTER TO MACRO DATA SET 
NAME 

POINTER TO FIRST BLOCK OF 
MERGE LIST 

POINTER TO MERGE DATA SET 
NAME 

PRINT OPTION 
NO PRINT 

PRINT - NO ERASE 
PRINT WITH ERASE 
LISTING DATA SET OPTION 
LISTING DATA SET 
LISTING ON SYSOUT 
CONTINUATION OPTION 
NO CONTINUATION 
CONTINUE COMPILATIONS 
LOAD OPTION 

LOAD - CONVERSION REQUIRED 
NO LOAD - COMPILE ONLY 
NAME OF CURRENT OBJECT 
MODULE 

POINTER TO EXPLICIT PARAM 
LIST N480 

POINTER TO XFERDS NAME 
N480 
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Partitioned Organization Directory (CHAPOD) , Member Descriptor (CHAPOM) t and Alias 
Descriptor (CHAPQE ) 

The Partitioned Organization Directory (POD) of a partitioned data set correlates 
the names of data set members to their positions within the data set. The POD Member 
Descriptor (POM) describes the characteristics of each member of the partitioned data 
set. The POD Alias Descriptor CPOE) chains alias names and links these names to data 
set member entries. 

The POD f including the POM and POE f remains in the user's virtual storage from 
open time to close time. At data set close time the POD is updated on the resident 
device. The POD is maintained by the virtual access method (VAM) section of data 
management. 

In virtual storage, aligned on doubleword boundaries, the POD occupies 268 bytes, 
the POM from 27 to 1308 bytes, and the POE 16 bytes. 

CHAPOD Storage map 



DEC 




HEX 

| PODW 
I 



8| 



|PODR |PODRC |PODIC 
J I I 



PODPG 



PODNDP 



PODLBP 



PODHT 



264 



1081 



I. 



Fields in CHAPOD — by displacement 

DEC HEX FIELD 
0000 0000 PODW 

0000 0000 PODINT 

0001 0001 PODR 

0002 0002 PODRC 



DEC HEX FIELD 

0003 0003 PODIC 

0004 0004 PODPG 
0004 0004 PODSPA 
0006 0006 PODNDP 



DEC HEX FIELD 
0008 0008 PODLBP 
0012 000C PODHT 



Alphabetical list of fields in CHAPOD 



FIELD 


DEC 


HEX 


FIELD 


DEC 


HEX 


FIELD 


DEC HEX 


PODHT 


0012 


oooc 


PODNDP 


0006 


0006 


PODSPA 


0004 0004 


PODIC 


0003 


0003 


PODPG 


0004 


0004 


PODW 


0000 0000 


PODINT 


0000 


0000 


PODR 


0001 


0001 






PODLBP 


0008 


0008 


PODRC 


0002 


0002 







Assembler listing of CHAPOD 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 




64 


00000 


CHAPOD 

* 


DSECT 




64 00000 






DS 


0D 


64 00000 






PODINT 


DS 


0XL4 


64 00000 






PODW 


DS 


XL1 


64 00001 






PODR 


DS 


XL1 


64 00002 






PODRC 


DS 


XL1 


64 00003 






PODIC 
PODSPA 


DS 


XL1 


64 00004 






DS 


0XL8 


64 00004 






PODPG 


DS 


XL2 


64 00006 






PODNDP 
PODLBP 


DS 


XL2 


64 00008 






DS 


XL4 


64 O0O0C 






PODHT 


DS 


64XL4 



COMMENT 

PARTITIONED ORGANIZATION 

DIRECTORY 

INTERLOCK CONTROL WORD 

WRITE INTERLOCK 

READ INTERLOCK 

READ INTERLOCK COUNTER 

CONTROL BYTE FOR PODR AND 

PODRC 

SPACE CONTROL FIELD 

NUMBER OF PAGES IN POD 

NUMBER OF PAGES IN THE 

DATASET 

LINKED BLOCK POINTER 

HASHING VALUE TABLE 
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CHAPOM Storage map 






DEC 


HEX 





















0| 
1 










POMNAM 






8 


8 | POMFLG 


I 
i 




POMHAS 




I POMFP | 

i 1 


POMPG | 


16 


10 (POMKL 
i 


i 
1 




POMIX 




(POMOVP 


| POMPAD | 
I 1 


POMDP | 

1 


24 


18 1 
\ 


POMBU 


1 
I 


POMUSE | 

1 










Fields 


in CHAPOM — bv displacement 






DEC HEX 

0000 oooo 


FIELD 
POMNAM 


DEC 
0016 


HEX 
0010 


FIELD 
POMSEQ 


DEC HEX 
(EQU) 0022 0016 


FIELD 

POMBLP (EQU) 




0008 0008 


POMFLG 


0016 


0010 


POMKL 


0022 0016 


POMDP 




0009 000S 


> POMHAS 


0017 


0011 


POMIX 


0024 0018 


POMBU 




0012 000C POMFP 


0020 


0014 


POMOVP 


0026 001A 


POMUSE 




0014 000E POMPG 


0021 


0015 


POMPAD 






Alphabetical list of 


fields in 


CHAPOM 












FIELD 
POMBLP 


DEC 
0022 


HEX 
0016 


FIELD 
CEQU) POMHAS 


DEC HEX 
0009 0009 


FIELD 
POMPAD 


DEC HEX 
0021 0015 




POMBU 


0024 


0018 


POMIX 


0017 0011 


POMPG 


0014 000E 




POMDP 


0022 


0016 


POMKL 


0016 0010 


POMSEQ 


0016 0010 (EQU) 




POMFLG 


0008 


0008 


POMNAM 


0000 0000 


POMUSE 


0026 001A 




POMFP 


0012 


oooc 


POMOVP 


0020 0014 






Assembler listi 


.nq of 


CHAPOM 














LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 


COMMENT 










66 00000 


CHAPOM 


DSECT 


LINKED BLOCK 


MEMBER 












♦ 






DESCRIPTOR 






66 


00000 








DS 


0D 








66 


00000 






POMNAM 


DS 


CL8 


MEMBER NAME 






66 


00008 






POMFLG 


DS 


XL1 


FLAGS 






66 


00009 






POMHAS 


DS 


XL3 


HASHING CHA^ 


J POINTER 




66 


O0O0C 






POMFP 


DS 


H 


FIRST PAGE RELATIVE TO DATA 












♦ 






SET 






66 


0000E 






POMPG 


DS 


H 


NUMBER OF DATA PAGES IN 












* 






MEMBER 16145 






66 


00010 






POMKL 


DS 


XL1 


KEY LENGTH 






66 


00011 






POMIX 


DS 


XL3 


MAX LOGICAL RECORD LENGTH 












* 






(ISEQ) 










66 00010 


POMSEQ 


EQU 


POMKL 


MAX LOGICAL RECORD LENGTH 












* 






(SEQ) 






66 


00014 






POMOVP 


DS 


XL1 


NUMBER CF OVERFLOW PAGES 




66 


00015 






POMP AD 


DS 


XL1 


PERCENT PAD 










66 00016 


POMBLP 


EQU 


POMDP 


NUMBER OF BYTES LAST PAGE 












♦ 






(SEQ) 






66 


00018 






POMBU 


DS 


H 


NUMBER BYTES 


USER DATA 




66 


0001A 






POMUSE 


DS 


CL1 


USER DATA 




CHAPOE 


Storaqe 


map 
















DEC 


HEX 





















oi 

I 










POENAM 




1 

1 


8 


8 | POEFLG 

i 


I 

i 




POEHAS 




i 
1 


POEMEM 


i 

1 
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Fields in CHAPOE — by displacement 

DEC HEX FIELD 
0000 0000 POENAM 



DEC HEX FIELD 
0008 0008 POEFLG 



DEC HEX FIELD 
0009 0009 POEHAS 
0012 000C POEMEM 



Alphabetical list of fields in CHAPOE 



FIELD 


DEC HEX 


FIELD 


DEC HEX 


POEFLG 


0008 0008 


POEHAS 


0009 0009 



FIELD DEC HEX 
POEMEM 0012 000C 
POENAM 0000 0000 



Assembler listing of CHAPOE 



LOCATION INSTRUCTION SOURCE 

65 00000 CHAPOE 

♦ 

65 00000 

65 00000 POENAM 

65 00008 POEFLG 

65 00009 POEHAS 

65 0000C POEMEM 



INST 


OPER 


DSECT 




DS 


0D 


DS 


CL8 


DS 


XL1 


DS 


XL3 



DS 



COMMENT 

LINKED BLOCK ALIAS 

DESCRIPTOR 

ALIAS NAME 

FLAGS 

POINTER TO NEXT HASHING 

SYNONYM 

POINTER TO MEMBER 

DESCRIPTOR 
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Page Table Page Header (CHAPPH) . and Page Table Page Entry Header (CHAPTH) 

The page table header describes a page table page CPTP) ; and indicates, using for- 
ward and backward pointers, the position in a chain of pages. The table controls the 
space available in the PTP by using the next available byte, by counting the total 
available bytes, by counting the number of page tables in a page table page, and by 
indicating the address of the first page table. 

The page table page header is 16 bytes in length, aligned on fullword boundaries. 
The table resides in virtual storage. 

The Page Table Page Entry Header (PTH) controls the assignment of space within a 
page table page entry. The PTH describes the contents of a page table entry, as 
follows: 

• the size of the page table entry, including header. 

• the number of unused bytes. 

• the availability status. 

• a pointer to the segment table entry (CHAAST). 

The 16 byte PTH resides in core storage aligned on fullword boundaries. 

CHAPPH Storage map 



DEC 





HEX 
01 



PPHFP 



PPHRP 



8| 
L 



PPHNB 



PPHNA 



PPHNS 



PPHFS 



Fields in CHAPPH — by displacement 



DEC HEX FIELD 
0000 0000 PPHFP 
000 a 0004 PPHRP 



DEC HEX FIELD 
0008 0008 PPHNB 
0010 000 A PPHNA 



DEC HEX FIELD 
0012 O0OC PPHNS 
0014 OOOE PPHFS 



Alphabetical list of fields in CHAPPH 
FIELD 



PPHFP 
PPHFS 



DEC HEX 

0000 0000 

0014 OOOE 



FIELD 
PPHNA 
PPHNB 



DEC HEX 

0010 OO0A 
0008 0008 



FIELD DEC HEX 
PPHNS 0012 O0OC 
PPHRP 0004 0004 



Assembler listing of CHAPPH 

LOCATION INSTRUCTION SOURCE 



INST OPER 



67 00000 


CHAPPH 


DSECT 




67 00000 




DS 


OF 


67 00000 


PPHFP 

* 
PPHRP 

* 


DS 


F 


67 00004 


DS 


F 


67 00008 


DS 


OH 


67 00008 


PPHNB 


DS 


H 


67 0000A 


PPHNA 


DS 


H 


67 0OO0C 


PPHNS 

* 

PPHFS 


DS 


H 


67 0000E 


DS 


H 




* 







COMMENT 

PAGE TABLE PAGE HEADER 

FORWARD POINTER TO NEXT PTP 
IN CHAIN 

REVERSE POINTER TO PREV PTP 
IN CHAIN 



LOC OF NEXT AVAILABLE BYTE 

IN PTP 

NUMBER OF BYTES AVAIL IN 

PTP 

NUMBER OF SEGMENTS IN THIS 

PTP 

LOC OF FIRST SEGMENT IN 

THIS PTP 



CHAPPH 311 



CHAPTH Storage map 



DEC 




HEX 
01 



PTHSN 



PTHSS 



PTHSP 



PTHSU (PTHID |PTHFL | 

_J .1 



UNNAMED 



Fields in CHAPTM — by displacement 

DEC HEX FIELD 
0000 0000 PTHSN 
0002 0002 PTHSS 
0004 0004 PTHSU 

Alphabetical list of fields in CHAPTH 



DEC HEX FIELD 

0006 0006 PTHID 

0007 0007 PTHSA 
0007 0007 PTHPH 



DEC HEX FIELD 

0007 0007 PTHDMP 

CEQU) 0007 0007 PTHFL 

(EQU) 0008 0008 PTHSP 



(EQU> 



FIELD DEC HEX FIELD 

PTHDMP 0007 0007 (EQU) PTHPH 

PTHFL 0007 0007 PTHSA 

PTHID 0006 0006 PTHSN 



DEC HEX FIELD DEC HEX 

0007 0007 (EQU) PTHSP 0008 0008 

0007 0007 (EQU) PTHSS 0002 0002 

0000 0000 PTHSU 0004 0004 



Assembler listing of CHAPTH 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 


COMMENT 




6A 00000 


CHAPTH 

* 


DSECT 




PAGE TABLE HEADER FOR PTP 
ENTRY 


6A 00000 






DS 


OF 




6A 00000 




PTHSN 


DS 


H 


SEGMENT NUMBER 


6A 00002 




PTHSS 


DS 


H 


BLOCK SIZE INCLUDING HEADER 


6A 00004 




PTHSU 


DS 


H 


NUMBER OF UNUSED BYTES IN 
BLOCK 


6A 00006 




PTHID 

* 


DS 


X 


TIME SLICE END ID OF LAST 

N470 
REFERENCED TIME SLICE 
N470 


6A 00007 




PTHFL 


DS 


X 


FLAG BYTE 
N470 




6A 00007 


PTHDMP 

* 


EQU 


PTHFL 


DRUM PREFERENCE FLAG 
N470 




00000004 


PTHDMPM 

* 


EQU 


X , 04 t 


DRUM PREFERENCE MASK 
N470 




6A 00007 


PTHPH 

* 


EQU 


PTHFL 


PAGE HOLD FLAG 
N470 




00000002 


PTHPHM 

* 


EQU 


X , 02 f 


SOME PAGE IN f PAGE HOLD' 
MASK N470 




6A 00007 


PTHSA 

* 


EQU 


PTHFL 


SEGMENT AVAILABILITY FLAG 
N470 




00000001 


PTHSAM 


EQU 


X f 01 f 


1 STATE MEANS BLOCK 
CONTENTS ARE ACTIVE 


6A 00008 




PTHSP 


DS 


F 


POINTER TO SEGMENT TABLE 
ENTRY 


6A O000C 






DS 


F 


UNUSED, FOR EXPANSION 
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Prefixed Storage Area (CHAPSA) 

The Prefixed Storage Area (PSA) contains data and programs that are unique and 
private to each CPU. While isolating one CPU from another, the PSA also functions as 
a logical extension of the general registers that make the supervisor program 
reenterable. 

The PSA constitutes a page (4096 bytes) in core storage, aligned on a p<±ge boun- 
dary. It is automatically addressed whenever the high-order 12 bits of the data or 
instruction address are all Os. These 12 high-order 0-bits in the original address 
are replaced with a 12- bit prefix value which is unique for each CPU # and predeter- 
mined by prefixing in the hardware. 

Locations through 127 of the PSA are reserved for status words, timer, interrupt 
indicators, etc. Locations 128 through 327 are permanently assigned to hardware dia- 
gnostic logouts. The CPU private working storage area (locations 328 through 455 and 
512 through 551) is assigned to selected monitor programs. Some of the private area 
in the CPU is used for temporary storage of general registers, allowing the asso- 
ciated programs to save the general registers, without requiring a base register for 
generation of the register save-area address. Locations 440 through 455 are assigned 
to the inter-CPU communication routine, as the drop area for incoming messages from 
another CPU. 

HEX DEC 

r t 



I ( 



80 

130 

148 

1C8 

200 

228 

880 

BE8 

COO 
1000 



128 



304 



328 



456 



512 



552 



2176 



3048 



3072 



PSW AREA 



CPU LOGOUT 



CHANNEL LOGOUT 



CPU PRIVATE WORKING STORAGE 



CPU STATUS TABLE (CHACST) 



I--- 



CPU PRIVATE WORKING STORAGE (continued) 



I— 



RECOVERY NUCLEUS RESIDENCE (CEAIR) 



—4 



INTER-CPU COMMUNICATION ROUTINE RESIDENCE (CEAIC) 



DAMAGE REPORT (CHADMR) AND CPU PRIVATE 
WORKING STORAGE (continued) 



h 



SERR BOOTSTRAP RESIDENCE (CMASA) 

Note 1 . For installations with more than 2 CPUs, 16 bytes 

per CPU (in excess of 2) will be removed from the recovery 

nucleus residence area and reassigned to the CPU status 

table. 

Note 2. There is a PSA for each CPU in TSS . 
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CHAPSA Storage map 



DEC 



HEX 



8 


8 


16 


10 


24 


18 


32 


20 


40 


28 


48 


30 


56 


38 


64 


40 


72 


48 


80 


50 


88 


58 


96 


60 


104 


68 


112 


70 


120 


78 


128 


80 



304 



328 



360 



392 

400 
408 



130 



148 



168 



188 



190 



198 



PSAIPL 



9 



PSAG15 



PSASIC 



PSAPIC 



1 PSASFG | PSAIND | 

J I L 



PSAEIC 



PSAMIC 



PSAIIC 



PSAEOP 



PSASOP 



PSAPOP 



PSAMOP 



PSAIOP 



PSACSW 



PSACAW 



PSATSA 



PSATIM 



PSATRV 



PSAENP 



PSASNP 



PSAPNP 



PSAMNP 



PSAINP 



PSACLO 



PSAILQ 



PSAISS 



PSACAS 



PSATPT 



PSAQPT 



PSADPT 



PSAPAT 



PSATPW 



C CHAPSA continued on page 315) 
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(CHAPSA continued from page 31**) 



416 


432 


440 


448 


456 



512 
520 
528 
536 
544 
552 



2016 



2048 



3072 



3624 



3640 



1A0| | 
| PSASCU I 


1B0| 




PSACTL 








1B8| 




PS AD AT 








1C0| 


| PSAIMC 

1 


| UNNAMED |PSACID | PSAILK | 
1 i 1 1 


1C8| 




PSACST 






= 


200| 




PSAWTM 








208| 




PSAETM 








210[ 


PSAOTB 


i 


PSAPKB 


| UNNAMED | 
» 1 


218| 




UNNAMED 








220 1 


PSASOA 


i 

1 






PSAS IP I 


228| 




PSARE1 








7E0| 


1 
I 












PSAISV 


i 


800| 




PSAIC 








cooi 




PSAERC 






= 


E28| 


i 

1 












PSAEXS 




E38| 




PSARE2 






= 
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Fields in CHAPSA — by displacement 



DEC 

0000 

0008 

0012 

0013 

0014 

0016 

0018 

0020 

0022 

0024 

0032 

0040 

0048 

0056 

0064 

0072 

0076 

0080 

0084 



0000 
0008 
000C 
000D 
000E 
0010 
0012 
0014 
0016 
0018 
0020 
0028 
0030 
0038 
0040 
0048 
004C 
0050 
0054 



FIELD 

PSAIPL 

PSAG15 

PSASFG 

PSAIND 

PSAEIC 

PSASIC 

PSAPIC 

PSAMIC 

PSAIIC 

PSAEOP 

PSASOP 

PSAPOP 

PSAMOP 

PSAIOP 

PSACSW 

PSACAW 

PSATSA 

PSATIM 

PSATRV 



DEC 

0088 

0096 

0104 

0112 

0120 

0128 

0304 

0328 

0360 

0392 

0396 

0400 

0404 

0408 

0416 

0432 

0440 

0452 

0454 



HEX 

0058 

0060 

0068 

0070 

0078 

0080 

0130 

0148 

0168 

0188 

018C 

0190 

0194 

0198 

01AO 

01B0 

01B8 

01C4 

01C6 



FIELD 

PSAENP 

PSASNP 

PSAPNP 

PSAMNP 

PSAINP 

PSACLO 

PSAILO 

PSAISS 

P SAC AS 

PSATPT 

PSAQPT 

PSADPT 

PSAPAT 

PSATPW 

PSASCU 

PSACTL 

P SADAT 

PSAIMC 

PSACID 



DEC 


HEX 


FIELD 




0455 


01C7 


PSAILK 




0456 


01C8 


PSACST 




0512 


0200 


PSAWTM 




0520 


0208 


PSAETM 




0528 


0210 


PSAOTB 




0532 


0214 


PSAPKB 




0544 


0220 


PSASOA 




0548 


0224 


PSAS IP 




0552 


0228 


PSARE1 




2020 


07E4 


PSAISV 




2048 


0800 


PSAIC 




3048 


0BE8 


PSADMR 


(EQU) 


3064 


0BF8 


PSAFIC 


(EQU) 


3068 


0BFC 


PSAFTM 


CEQU) 


3072 


OCOO 


PSAERC 




3628 


0E2C 


PSAEXS 




3640 


0E38 


PSARE2 





Alphabetical list of fields in CHAPSA 



FIELD 

PS AC AS 

PS AC AW 

PSACID 

PSACLO 

PSACST 

PSACSW 

PSACTL 

PSADAT 

PSADMR 

PSADPT 

PSAEIC 

PSAENP 

PSAEOP 

PSAERC 

PSAETM 

PSAEXS 

PSAFIC 

PSAFTM 

PSAG15 



DEC 

0360 

0072 

0454 

0128 

0456 

0064 

0432 

0440 

3048 

0400 

0014 

0088 

0024 

3072 

0520 

3628 

3064 

3068 

0008 



HEX 

0168 

0048 

01C6 

0080 

01C8 

0040 

01B0 

01B8 

0BE8 

0190 

000E 

0058 

0018 

OCOO 

0208 

0E2C 

0BF8 

0BFC 

0008 



FIELD 
PSAIC 
PSAIIC 
PSAILK 
PSAILO 
PSAIMC 
PSAIND 
PSAINP 
PSAIOP 
CEQU) PSAIPL 
PSAISS 
PSAISV 
PSAMIC 
PSAMNP 
PSAMOP 
PSAOTB 
PSAPAT 
(EQU) PSAPIC 
(EQU) PSAPKB 
PSAPNP 



DEC 

2048 

0022 

0455 

0304 

0452 

0013 

0120 

0056 

0000 

0328 

2020 

0020 

0112 

0048 

0528 

0404 

0018 

0532 

0104 



HEX 

0800 

0016 

01C7 

0130 

01C4 

000D 

0078 

0038 

0000 

0148 

07 E4 

0014 

0070 

0030 

0210 

0194 

0012 

0214 

0068 



FIELD 


DEC 


HEX 


PSAPOP 


0040 


0028 


PSAQPT 


0396 


018C 


PSARE1 


0552 


0228 


PSARE2 


3640 


0E38 


PSASCU 


0416 


01A0 


PSASFG 


0012 


oooc 


PSASIC 


0016 


0010 


PSASIP 


0548 


0224 


PSASNP 


0096 


0060 


PSASOA 


0544 


0220 


PSASOP 


0032 


0020 


PSATIM 


0080 


0050 


PSATPT 


0392 


0188 


PSATPW 


0408 


0198 


PSATRV 


0084 


0054 


PSATSA 


0076 


004C 


PSAWTM 


0512 


0200 



Assembler listing of CHAPSA 



LOCATION INSTRUCTION SOURCE 

68 00000 CHAPSA 
****** 



68 00000 
68 00000 
68 00008 

68 0O0OC 
68 0000D 



68 O0O0E 
68 00010 
68 00012 
68 00014 
68 00016 

68 00018 
68 00020 
68 00028 
(Listing 



PSAIPL 
PSAG15 

PSASFG 
PSAIND 

* 



PSAEIC 
PSASIC 
PSAPIC 
PSAMIC 
PSAIIC 
* 

PSAEOP 
PSASOP 
PSAPOP 
of CHAPSA continued 



INST OPER 
DSECT 



COMMENT 



DS 
DS 
DS 

DS 
DS 



DS 
DS 
DS 
DS 
DS 

DS 
DS 
DS 



PREFIXED STORAGE AREA ****** 

0D 

XL8 IPL PSW 

XL4 GR15 TEMPORARY SAVE AREA 
FOR RECOVERY NUCLEUS 

XL1 SIPE FLAG BYTE 

XL1 INDICATOR FOR DISPATCHER & 
DEACTIVATOR 
INTERRUPTION CODE AREA IN EXTENDED 
PSW MODE (LOC 14-23) 



XL2 
XL2 
XL2 
XL2 
XL2 

XLS 
XL8 
XL8 



EXTERNAL INTERRUPTION 
SVC INTERRUPTION 
PROGRAM INTERRUPTION 
MACHINE CHECK INTERRUPTION 
INPUT/OUTPUT INTERRUPTION 
OLD PSW AREA 
EXTERNAL OLP PSW 
SUPER VI SER CALL OLD PSW 
PROGRAM OLD PSW 



on page 317) 
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(Listing of CHAPSA continued from page 316) 



LOCATION INSTRUCTION 


SOURCE 


INST 


OPER 


COMMENT 


68 


00030 


PSAMOP 


DS 


XL8 


MACHINE CHECK OLD PSW 


68 


00038 


PSAIOP 


DS 


XL8 


INPUT/OUTPUT OLD PSW 


68 


00040 


PSACSW 


DS 


XL 8 


CHANNEL STATUS WORD 


68 


00048 


PSACAW 


DS 


XL4 


CHANNEL ADDRESS WORD 
TIMER 


68 


0004C 


PSATSA 


DS 


XL4 


TIMER SAVE AREA 


68 


00050 


PSATIM 


DS 


XL4 


TIMER 


68 


00054 


PSATRV 

* 


DS 


XL4 


TIMER RESET VALUE 
NEW PSW AREA 


68 


00058 


PSAENP 


DS 


XL8 


EXTERNAL NEW PSW 


68 


00060 


PSASNP 


DS 


XL8 


SUPERVISOR CALL NEW PSW 


68 


00068 


PSAPNP 


DS 


XL8 


PROGRAM NEW PSW 


68 


00070 


PSAMNP 


DS 


XL8 


MACHINE CHECK NEW PSW 


68 


00078 


PSAINP 


DS 


XL8 


INPUT/OUTPUT NEW PSW 






* 




CPU LOGOUT 


AREA (LOCATION 128 THRU 






* 




303> 




68 


00080 


PSACLO 


DS 


44XL4 








* 




CHANNEL LOGOUT AREA (LOCATION 304 






* 




THRU 327) 




68 


00130 


PSAILO 

* 


DS 


6XL4 


CPU PRIVATE WORKING STORAGE 


68 


00148 


PSAISS 


DS 


8XL4 


INTERRUPT STACKER SAVE AREA 


68 


00168 


PS AC AS 


DS 


8XL4 


CORE ALLOCATION SAVE AREA 


68 


00188 


PSATPT 


DS 


XL4 


TSI POINTER 


68 


0018C 


PSAQPT 


DS 


XL4 


GQE POINTER 


68 


00190 


PSADPT 


DS 


XL4 


DCB POINTER 


68 


00194 


PSAPAT 


DS 


XL4 


FLAG BYTE USED BY I/O PATH 


68 


00198 


PSATPW 

* 


DS 


XL8 


TEMPORARY PSW USED BY 
DISPATCHER 


68 


O01A0 


PSASCU 

* 


DS 


2XL8 


SUPVR CORE ALLOC USER SAVE 
AREA 


68 


001BO 


PSACTL 


DS 


XL8 


ECRG SAVE AREA USED BY SIO 
DROP AREA (INTERCOMM) 


68 


001B8 


PSADAT 


DS 


3XL4 


TEXT OF INTERCOMM MESSAGE 


68 


001C4 


PSAIMC 


DS 


XL1 


INTERCOMM MESSAGE CODE 


68 


001C5 




DS 


CL1 


UNUSED 


68 


001C6 


PSACID 


DS 


XL1 


IDENTITY OF SENDING CPU 


68 


001C7 


PSAILK 


DS 


XL1 


INTERCOMM LOCK BYTE 


68 


001C8 


PSACST 


DS 


7XL8 


CPU STATUS TABLE 


68 


00200 


PSAWTM 

* 


DS 


XL8 


WAIT TIME USED BY INTERRUPT 
STACKER 


68 


00208 


PSAETM 


DS 


XL8 


ELAPSED TIMER 


68 


00210 


PSAOTB 

* 


DS 


XL4 


OLD TIMER USED BY INTERRUPT 
STACKER 


68 


00214 


PSAPKB 

* 


DS 


XL2 


I/O ADDRESS OF 1052-7 
PRINTER KEYBOARD 


68 


00216 




DS 


XL2 


UNUSED 


68 


00218 




DS 


XL8 


USED BY STRATO 


68 


00220 


PSASOA 


DS 


XL4 


POINTER TO SERR OPERATING 
AREA 


68 


00224 


PSASIP 


DS 


F 


FOR PERFORMANCE 
MEASUREMENTS USE 


68 


00228 


PSARE1 

* 


DS 


367XL4 


RESERVED 
M4285 


68 


007E4 


PSAISV 

* 


DS 


7XL4 


INTERRUPT STACKER SAVE AREA 
2 M4285 


♦ 










NSRB 4 06 * 


**** SERR AREA 








N 406 **** 


* 










NSRB 406 * 



(Listing of CHAPSA continued on page 318) 
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(Listing of CHAPSA continued from page 317) 

LOCATION INSTRUCTION SOURCE INST OPER COMMENT 

68 00800 PSAIC DS 256XL4 INTER-COM RESIDENCE 

* NSRB 406 * m 
68 00BE8 PSADMR EQU PSAIC+1000 SERR DAMAGE REPORT I 

* NSRB 406 * 

68 0OBF8 PSAFIC EQU PSADMR+16 MC INT, CODE FOR BAD CPU 

* NSRB 406 * 
68 00BFC PSAFTM EQU PSADMR* 20 SAVED TIMER VALUE 

* NSRB 406 * 

68 00C00 PSAERC DS 139XL4 ERROR RECOVERY CONTROL AREA 

* NSRB 406 * 

* NSRB 406 * 
**** END OF SERR AREA N 406 **** 

* NSRB 406 * 
68 00E2C PSAEXS DS 3XL4 PSAEOP ♦ PSAEIC SAVE AREA 

* FOR INT STACKER N 4 06 
68 00E38 PSARE2 DS 114XL4 UNASSIGNED 

* NSRB 406 
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Direct Access Paging Statistical Data Record (CHAPSD) 

The Direct Access Paging Statistical Data Record (CHAPSD) maintains information 
for channel outboard failures on direct access paging devices. 

The CHAPSD resides in core storage aligned on doubleword boundaries. The CHAPSD 
consists of a 8 byte header and one 80 byte statistical data record (SDR) entry for 
each paging device in the system. 

CHAPSD Storage map 



DEC 



HEX 



8 


8 


16 


10 


24 


18 


32 


20 


40 


28 


48 


30 


56 


38 





PSDLSD 


! 

I 


PSDLWA 




| PSDSDA 


(PSDFB | 
I 1 




UNNAMED 




| PSDLSA 


| PSDLP 


| PSDEIC 


i 

1 


PSDRET | 
1 


UNNAMED 






PSDRTH 








1 
I 


UNNAMED 




1 PSDTS 


| PSDSDR 



Fields in CHAPSD — by displacement 



DEC HEX FIELD 
0000 0000 PSDLSD 
000 4 0004 PSDLWA 
0008 0008 PSDSDA 
0008 0008 PSDHEND 
0010 O0OA PSDIR 



(EQU) 



DEC HEX FIELD 
0010 000A PSDF1 
0010 000A PSDFB 
0016 0010 PSDLSA 
0024 0018 PSDLP 
0026 001A PSDEIC 



DEC HEX FIELD 

(EQU) 0028 001C PSDRET 

0032 0020 PSDRTH 

0048 0030 PSDTS 

0056 0038 PSDSDR 

0088 0058 PSDEND 



Alphabetical list of fields in CHAPSD 



FIELD 

PSDEIC 

PSDEND 

PSDFB 

PSDF1 

PSDHEND 



DEC HEX 
0026 001A 
0088 0058 
0010 000A 



FIELD 



PSDIR 
PSDLP 
PSDLSA 
0010 000A (EQU) PSDLSD 
0008 0008 PSDLWA 



DEC HEX FIELD DEC HEX 

0010 000A (EQU) PSDRET 0028 001C 

0024 0018 PSDRTH 0032 0020 

0016 0010 PSDSDA 0008 0008 

0000 0000 PSDSDR 0056 0038 

0004 0004 PSDTS 0048 0030 
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Assembler listing of CHAPSD 



LOC 


: AT ION 


INSTRUCTION SOURCE 
69 00000 CHAPSD 


INST 


OPER 


COMMENT 




DSECT 






**** 


DIRECT 


ACCESS PAGING STATISTICAL DATA RECORD ***** 










******** 


HEADER ******** 


69 


00000 








DS 


OD 




69 


00000 






PSDLSD 

* 


DS 


F 


LENGTH OF SDR ENTRY (80 
BYTES) 


69 


00004 






PSDLWA 


DS 


XL4 


LAST WORD ADDRESS 


69 


00008 






PSDHEND 

* 
* 


DS 


OX 


END OF PAGING STATISTICAL 
DATA 15943 
RECORD TABLE HEADER 
15943 






00000008 


PSDHDSZ 


EQU 


PSDHEND- PSDLSD PAGING STATISTICAL 










* 






DATA RECORD 15943 










♦ 






TABLE HEADER SIZE 










♦ 






15943 




******* 


SDR ENTRY (ONE ENTRY PER 


DEVICE) ******** 


69 


00008 






PSDSDA 


DS 


XL 2 


SYMBOLIC DEVICE ADDRESS 


69 


O000A 






PSDFB 


DS 


X 


FLAG BYTE 






69 


0000A 


PSDF1 

* 


EQU 


PSDFB 


DEMOUNTABLE DEVICE 
(1= DEMOUNTABLE) 






00000080 


PSDF1M 


EQU 


x'80 1 


DEMOUNTABLE DEVICE MASK 






69 


0000A 


PSDIR 


EQU 


PSDFB 


IMMEDIATE REPORT FLAG 
N392 






00000040 


PSDIRM 


EQU 


X^O' 


IMMEDIATE REPORT MASK 










* 






N392 


69 


0O00B 








DS 


5C 


SPARE 


69 


00010 






PSDLSA 


DS 


XL8 


LAST SEEK ADDRESS 


69 


00018 






PSD LP 


DS 


XL2 


PATH LAST USED 


69 


0001A 






PSDEIC 


DS 


XL2 


TOTAL ERROR-INCIDENT COUNT 


69 


0001C 






PSDRET 


DS 


XL2 


TOTAL RETRY COUNT 


69 


0001E 








DS 


H 


SPARE 


69 


00020 






PSDRTH 


DS 


3XL4 


RETRY THRESHOLDS 


69 


0002C 








DS 


F 


SPARE 


69 


00030 






PSDTS 

* 
* 


DS 


2F 


DATE TIME STAMP OF FIRST 

SDR ERROR 

IN MICRO- SECONDS 


69 


00038 






PSDSDR 

* 


DS 


8XL4 


SDR BUCKETS (64 9 1/2 
BYTES) 


69 


00058 






PSDEND 

* 
* 
* 


DS 


OX 


END OF PAGING STATISTICAL 
DATA 15943 
RECORD TABLE ENTRY 
15943 






00000050 


PSDSZE 


EQU 


PSDEND- 


-PSDSDA PAGING STATISTICAL 










* 






DATA RECORD 15943 










* 
* 






TABLE ENTRY SIZE 
15943 
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Public/Private Volume Table (CHAPVT) 



i. 



The Public Volume Table identifies and locates all volumes. Two tables exist: a 
public table to identify and locate volumes in public storage; and a private table to 
identify and locate volumes in private virtual storage. 

The public PVT is created at STARTUP- SYS GEN for all public data sets. At SYSGEN, 
the table is created, and the volume IDs are entered. At STARTUP, each volume is 
located; the device type code and the symbolic device address are entered. 

A private PVT resides in private virtual storage for each private data set. The 
table is created by ADDCAT at OPEN from the volumes identified by the JFCB, Data Set 
Descriptor, or DSCB. Once built, the table resides in virtual storage, accepting no 
additions or deletions. 

The public and private tables are identical, consisting of a 16-byte header and a 
variable number of 16-byte entries. Both tables reside in virtual storage, aligned 
on double word boundaries. 



CHAPVT Storage map 



DEC 




HEX 

01 



PVTHDR 



16 



10[ 



PVTENT 



ORG 


PVTHDR 







8 


01 

1 

8| 

L 


ORG 


PVTENT 






16 


10| 

L 


24 


18| 







UNNAMED 






| PVTMCT | 
I 1 


PVTECT 


i 














PVTVID 


1 

1 


PVTSDA 


PVTDVC 




|PVTFLG [UNNAMED | 
1 1 1 


PVTAVS 



Fields in CHAPVT — by displacement 



DEC HEX FIELD 
0000 0000 PVTHDR 
0012 000C PVTMCT 
0014 000E PVTECT 
0016 0010 PVTVID 



DEC HEX FIELD 
0016 0010 PVTENT 
0022 0016 PVTSDA 
0024 0018 PVTDVC 
0028 001C PVTFLG 



DEC HEX FIELD 
0028 001C PVTX80 
0030 001E PVTAVS 



(EQU) 



Alphabetical list of fields in CHAPVT 



FIELD 

PVTAVS 

PVTDVC 

PVTECT 

PVTENT 



DEC HEX 
0030 001E 
0024 0018 
0014 000E 
0016 0010 



FIELD 

PVTFLG 

PVTHDR 

PVTMCT 

PVTSDA 



DEC HEX 
0028 O01C 
0000 0000 
0012 OO0C 
0022 0016 



FIELD DEC HEX 

pvtvid 0016 ooia 

PVTX80 0028 001C CEQU) 
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Assembler listing of CHAPVT 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 


COMMENT 




6B 


00000 


CHAPVT 


DSECT 




VAM DATA SET VOLUME TABLE 


6B 00000 








DS 


OD 


ALIGN TO DOUBLE WORD 


6B 00000 






PVTHDR 


DS 


CL16 


VOLUME TABLE HEADER 




6B 


00000 




|ORG| 


PVTHDR 


SUBFIELD ALIGNMENT 


6B 00000 








DS 


CL12 


RESERVED 


6B OOOOC 






PVTMCT 


DS 


CL2 


MAXIMUM VOLUME ENTRY COUNT 


6B OO00E 






PVTECT 


DS 


H 


COUNT OF VOLUME ENTRIES 


6B 00010 






PVTENT 


DS 


CL16 


VOLUME ENTRY. 




6B 


00010 




|ORG| 


. PVTENT 


SUBFIELD ALIGNMENT 


6B 00010 






PVTVID 


DS 


CL6 


VOLUME ID 


6B 00016 






PVTSDA 


DS 


H 


SYMBOLIC DEVICE ADDR 


6B 00018 






PVTDVC 


DS 


F 


DEVICE CODE 


6B 0001C 






PVTFLG 


DS 


XL1 


FLAG BYTE 




6B 


0001C 


PVTX80 


EQU 


PVTFLG 


RELOCATED PAGES FLAG 




00000080 


PVTX80M 


EQU 


x'so 1 


RELOCATED PAGES MASK 


6B 0001D 








DS 


XL1 


UNUSED 


6B 0001E 






PVTAVS 

* 


DS 


H 


NUMBER OF AVAILABLE PAGES 
ON VOLUME 
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Reply Checking Table (CHARET, CHAPES, & CHARWD) 

The Reply Checking Table contains all the allowable reply words that an operator 
can use when answering messages sent to him from the system. 
The Reply Checking Table consists of: 

1. A table header (RET) indicating the number of code entries in the table. 

2. A reply code descriptor (DES) ; and, 

3. A reply checking word (RWD) . 

The Reply command, upon finding a reply check request, references the Reply Check- 
ing Table to locate the valid replies. A descriptor, located by the reply code numb- 
er, points to the first valid reply word in the table, and also specifies how many 
reply words should be considered. 

The Reply Checking Table occupies up to 2144 bytes of virtual storage, aligned on 
doubleword boundaries. 

CHARET Storage map 



DEC 




HEX 
01 



RETNUM 



RETUN1 



RETDES 



168 



A8] 



RETRWD 



Fields in CHARET — by displacement 



DEC HEX FIELD 
0000 0000 RETNUM 



DEC HEX FIELD 
0004 0004 RETUN1 



DEC HEX FIELD 
0008 0008 RETDES 
0168 00A8 RETRWD 



Alphabetical list of fields in CHARET 



FIELD 
RETDES 



DEC HEX 
0008 0008 



FIELD 
RETNUM 



DEC HEX 
0000 0000 



FIELD 

RETRWD 

RETUN1 



DEC HEX 
0168 00A8 
0004 0004 



Assembler listing of CHARET 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 




6D 


00000 


CHARET 


DSECT 




6D 00000 








DS 


0D 


6D 00000 






RETNUM 


DS 


F 


6D 00004 






RETUN1 


DS 


F 


6D 00008 






RETDES 


DS 


20XL8 


6D 000A8 






RETRWD 


DS 


245CL8 




6E 


00000 


CHADES 


DSECT 




6E 00000 








DS 


0D 


6E 00000 






DESWRD 


DS 


H 


6E 00002 






DESCOD 


DS 


H 


6E 00004 






DESPNT 


DS 


F 




6F 


00000 


CHARWD 


DSECT 




6F 00000 








DS 


0D 


6F 00000 






RWDREP 


DS 


CL8 



COMMENT - 

REPLY CHECKING TABLE HEADER 

MAXIMUM NUMBER OF REPLY 

CODES 

UNUSED 

REPLY CODE DESCRIPTOR 

REPLY WORD ENTRY 

REPLY CODE DESCRIPTOR 



NUMBER OF REPLY WORDS FOR 

CODE 

REPLY CODE NUMBER 

POINTER TO FIRST REPLY WORD 

REPLY WORD ENTRY 

REPLY WORD DELIMITED BY 
COMMA 
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CHAPES Storage map 



DEC HEX 



0( DESWRD | DESCOD | DESPOT 

I I I 

Fields in CHAPES — by displacement 

DEC HEX FIELD DEC HEX FIELD DEC HEX FIELD 

0000 0000 DESWRD 0002 0002 DESCOD 0004 0004 DESPNT 

Alphabetical list of fields in CHAPES 

FIELD DEC HEX FIELD DEC HEX FIELD DEC HEX 

DESCOD 0002 0002 DESPNT 0004 0004 DESWRD 0000 0000 



CHARWD Storage map 
DEC HEX 



0| RWDREP 
I 



Fields in CHARWD — by displacement 

DEC HEX FIELD DEC HEX FIELD DEC HEX FIELD 

0000 0000 RWDREP 

Alphabetical list of fields in CHARWD 

FIELD DEC HEX FIELD DEC HEX FIELD DEC HEX 
RWDREP 0000 0000 
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Relet ive External Storage Correspondence Table (CHARHD, CHADHD, CHAMHD, CHAEPE) 

The RESTBL provides a correspondence between an open VAM data set and its external 
pages. The RESTBL maintains a list of external pages, vital information pertaining 
to the data set, and information concerning each DCB opened for use by the data set. 
The RESTBL is used to convert relative data set page numbers to external storage 
addresses, and to maintain the sharing of data set pages. 

The RESTBL is a variable length table, write -protected from the user, and con- 
tained in virtual storage. 

The RESTBL consists of four sections: 

CHARHD RESTBL Header 

CHADHD DCB Header 

CHAMHD Member Header 

CHAEPE External Page Entry 
The four sections are fixed, but, except for the header, the number of these sections 
is variable. The RESTBL header is followed by the external page entries. The DCB 
headers and member headers originate at the end of the RESTBL and expand toward the 
external page entries. 

RESTBL Header (CHARHD) 

The 48 byte RESTBL HEADER contains control information for the RESTBL and the data 
set it describes. A RESTBL has only one header. 
The fields in the RESTBL HEADER are as follows: 

RHDNAP - a two byte relative address, of the next available external page entry, 
pointing to the next available unused entry assigned to the data set. To obtain the 
actual relative value, shift left two bits to multiply. The two low-order bits, 
being zero, are not carried. 

RHDFEP - a two byte offset which, when added to the address of RESTBL, yields the 
address of the first external page entry assigned to the data set. To obtain the 
actual relative value, multiply this field by four. The two low- order bits, being 
zero, are not carried. 
RHDDIR - (two bytes) 

• The number of index sequential directory pages for an index sequential data set. 

• The number of pages in the POD for a partitioned data set. 
RH DOVF = RHD BYT - (two bytes) 

• The number of overflow pages for an index sequential data set. 

• The number of bytes used in the last data page for a sequential data set. 
RHDODC - a two byte address, of the first DCB header in a chain. The actual relative 
address is obtained by multiplying the entry by eight. The three low-order bits, 
being zero, are not carried. 

RHDADC - a two byte relative address, of the next available DCB header. The actual 
relative address is obtained by multiplying the entry by eight. The three low-order 
bits, being zero, are not carried. 

RHDOMC - a two byte relative address, of the first member header. The actual rela- 
tive location is obtained by multiplying the entry by eight. The three low-order 
bits, being zero, are not carried. 

RHDAMC - a two byte relative address, of the next available member header. The actu- 
al relative address is obtained by multiplying the entry by eight. The three low- 
order bits, being zero, are not carried. 

RHD POD - the virtual storage address of the partitioned organization directory (POD) 
for partitioned data sets. 
RESTBL External Page Entry (CHAEPE) 

A four-byte field containing the address of the external device of a data page. 
The two high-order bits are used as flags indicating the condition of the data page. 
For shared data sets, the entry is preceded by a four byte interlock control word. 
DCB Header (CHADHD) 

Contains information necessary to associate a data set with a particular task; 
requires 64 bytes of storage. 

Note 1 . DHDNDH - a two-byte relative address of the next DCB header for DCBs opened 
for the data set. The field is zeroed when no chain exists, or if this is 
the last DCB. To obtain the actual relative address, multiply the entry by 
four. The two low-order bits, being zero, are not carried. 
Note 2 . DHDPDH - a two-byte relative address of the previous DCB header for the open 
DSBs. This entry is zeroed if it is the first entry of a chain. The actual 
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relative address is obtained by multiplying the entry by four. The two low- 
order bits, being zero, are not carried. 
Member Header (CHAMHD) 

Contains information necessary to associate a member of a partitioned data set 
with the data set described by a RESTBL. A RESTBL may contain a maximum of 65K memb- 
er headers. CHAMHD requires 32 bytes of storage. 

Note 1 . MHDNMH - a two byte relative address of the next member header in the chain 
(zero, if this is the last member header). The actual relative address is 
obtained by multiplying the entry by eight. The three low-order bits, being 
zero, are not carried. 
Note 2 . MHDPMH - a two byte relative address of the previous member header in the 

chain (zero, if this is the first). The actual relative address is obtained 
by multiplying the entry by eight. The three low-order bits, being zero, 
are not carried. 



CHARHD Storage map 



DEC 


HEX 



























0|RHDINW 
1 


RHDINR | RHDINN | RHDINI 
1 1 




RHDNAP 




RHDNEP | 


8 


81 

1 


RHDFEP | 


RHDDIR 




RHDDAT 




RHDOVF | 


16 


10 I UNNAMED 
1 1 


RHDRPG \ 
I 


RHDTHD 


| RHDFLG 


| RHDINI 

1 


RHDDCB | 


24 


181 

I 


RHDODC | 


RHDADC 




RHDOMC 




RHDAMC I 


32 


20 | 

1 




RHDPOD 












RHDTID 






40 


281 

1 




RHDVTA 












RHDSPT 






48 


30 [ 
1 




RHDCPO 












UNNAMED 






56 


38( 

I 




RHDSAL 


(RHDRFM 
I 


[RHDKYL 


(RHDPAD 
I 


1 
\ 


RHDRKP 




64 


40 | 
1 




RHDRCL 








RHDDSO 




RHDCRD | RHDOPC | 

1 \ i 


ORG 


RHDINR 

1 
in CHARHD 


~ bi 




















- 


1 


| RHDTSLK 




1 
1 




Fields 


i displacement 








« 




DEC 


HEX 


FIELD 


DEC 


HEX 


FIELD 






DEC 


HEX 


FIELD 






0000 


0000 


RHDINW 


0020 


0014 


RHDRCG 




(EQU) 


0036 


0024 


RHDTID 






0000 


0000 


RHDINT 


0020 


0014 


RHDDSC 




(EQU) 


0040 


0028 


RHDVTA 






0001 


0001 


RHDTSLK 


0020 


0014 


RHDPDI 




(EQU) 


0044 


002C 


RHDSPT 






0001 


0001 


RHDINR 


0020 


0014 


RHDISD 




(EQU) 


0048 


0030 


RHDCPO 






0002 


0002 


RHDINN 


0020 


0014 


RHDSPR 




(EQU) 


0056 


0038 


RHDSAL 






0003 


0003 


RHDINI 


0020 


0014 


RHDISQ 




(EQU) 


0059 


003B 


RHDRFM 






0004 


0004 


RHDNAP 


0020 


0014 


RHDPRT 




(EQU) 


0060 


003C 


RHDKYL 






0006 


0006 


RHDNEP 


0020 


0014 


RHDSHR 




(EQU) 


0061 


003D 


RHDPAD 






0008 


0008 


RHDFEP 


0020 


0014 


RHDFLG 






0062 


003E 


RHDRKP 






0010 


000A 


RHDDIR 


0021 


0015 


RHDINI 






0064 


0040 


RHDRCL 






0012 


oooc 


RHDDAT 


0022 


0016 


RHDDCB 






0068 


0044 


RHDDSO 






0012 


oooc 


RHDDTB 


0024 


0018 


RHDODC 






0070 


0046 


RHDREF 


(EQU) 




0014 


000E 


RHDBYT (EQU) 0026 


001A 


RHDADC 






0070 


0046 


RHDCHG 


(EQU) 




0014 


000E 


RHDOVF 


0028 


001C 


RHDOMC 






0070 


0046 


RHDCRD 






0017 


0011 


RHDRPG 


0030 


001E 


RHDAMC 






0071 


0047 


RHDOPC 






0018 


0012 


RHDTHD 


0032 


0020 


RHDPOD 






0072 


0048 


RHDEND 





326 CHARHD 



Alphabetical list of fields in CHARHD 



FIELD 

RHDADC 

RHDAMC 

RHDBYT 

RHDCHG 

RHDCPO 

RHDCRD 

RHDDAT 

RHDDCB 

RHDDIR 

RHDDSC 

RHDDSO 

RHDDTB 

RHDEND 

RHDFEP 

RHDFLG 

RHDINI 



DEC 

0026 

0030 

0014 

0070 

0048 

0070 

0012 

0022 

0010 

0020 

0068 

0012 

0072 

0008 

0020 

0003 



HEX 

001A 

001E 

000E (EQU) 

0046 (EQU) 

0030 

0046 

000C 

0016 

000A 

0014 (EQU) 

0044 

000C 

0048 

0008 

0014 

0003 



FIELD 

RHDINN 

RHDINR 

RHDINT 

RHDINW 

RHDINI 

RHDISD 

RHDISQ 

RHDKYL 

RHDNAP 

RHDNEP 

RHDODC 

RHDOMC 

RHDOPC 

RHDOVF 

RHDPAD 

RHDPDI 



DEC 

0002 

0001 

0000 

0000 

0021 

0020 

0020 

0060 

0004 

0006 

0024 

0028 

0071 

0014 

0061 

0020 



HEX 

0002 

0001 

0000 

0000 

0015 

0014 (EQU) 

0014 (EQU) 

003C 

0004 

0006 

0018 

001C 

0047 

OOOE 

003D 

0014 (EQU) 



FIELD 

RHDPOD 

RHDPRT 

RHDRCG 

RHDRCL 

RHDREF 

RHDRFM 

RHDRKP 

RHDRPG 

RHDSAL 

RHDSHR 

RHDSPR 

RHDSPT 

RHDTHD 

RHDTID 

RHDTSLK 

RHDVTA 



DEC 

0032 

0020 

0020 

0064 

0070 

0059 

0062 

0017 

0056 

0020 

0020 

0044 

0018 

0036 

0001 

0040 



HEX 

0020 

0014 (EQU) 

0014 (EQU) 

0040 

0046 (EQU) 

003B 

003E 

0011 

0038 

0014 (EQU) 

0014 (EQU) 

002C 

0012 

0024 

0001 

0028 



Assembler listing of CHARHD 



LOCATION INSTRUCTION SOURCE 



70 00000 



70 00000 
70 00000 
70 00001 
70 00002 
70 00003 



70 00001 



70 00001 

70 00004 
70 00006 
70 00008 
70 0000A 
70 O0O0C 
70 0000C 
70 OOOOE 

70 00010 
70 00011 
70 00012 
70 00014 



70 OOOOE 



70 00014 
00000080 
70 00014 
00000040 
70 00014 
00000020 
70 00014 
00000010 
70 00014 
00000008 
70 00014 
00000004 
70 00014 
00000002 
70 00014 
00000001 



70 00015 

70 00016 
70 00018 
70 0001A 
70 0001C 
70 0001E 
70 00020 
( Listing 



of CHARHD 



CHARHD 
RHDINT 
RHDINW 
RHDINR 
RHDINN 
RHDINI 
* 

RHDTSLK 

* 

RHDNAP 

RHDNEP 

RHDFEP 

RHDDIR 

RHDDTB 

RHDDAT 

RHDOVF 

RHDBYT 

RHDRPG 
RHDTHD 
RHDFLG 
RHDSHR 
RHDSHRM 
RHDPRT 
RHDPRTM 
RHDISQ 
RHDISQM 
RHDSPR 
RHDSPRM 
RHDISD 
RHDISDM 
RHDPDI 
RHDPDIM 
RHDDSC 
RHDDSCM 
RHDRCG 
RHDRCGM 
RHDINI 
* 

RHDDCB 
RHDODC 
RHDADC 
RHDOMC 
RHDAMC 
RHDPOD 
continued 



INST OPER 

DSECT 

DS OF 



DS 
DS 
DS 
DS 

1 QRG I 
DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

EQU 

DS 

DS 

DS 

DS 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

TOO 

EQU 

DS 

DS 
DS 
DS 
DS 
DS 
DS 



XL1 
XL1 
XL1 
XL1 

RHDINR 
XL3 

H 

H 

H 

H 

OF 

H 

H 

RHDOVF 

C 

XL1 

H 

XL1 

RHDFLG 

X^O' 

RHDFLG 

X^O' 

RHDFLG 

X^O* 

RHDFLG 

X f 10 f 

RHDFLG 

X'08' 

RHDFLG 

X , 04 t 

RHDFLG 

X , 02 i 

RHDFLG 

X'Ol' 

XL1 

H 
H 

H 
H 

H 
F 



COMMENT 
RESTBL HEADER 
INTERLOCK CONTROL 
WRITE INTERLOCK FLAG 
READ INTERLOCK FLAG 
READ INTERLOCK COUNT 
READ INTERLOCK CONTROL 
FLAG 

ADDRESS OF ROUTINE SETTING 

LOCK 

NEXT AVAILABLE PAGE ENTRY 

NO. AVAIL. EXTERNAL PAGES 

FIRST EXTERNAL PAGE ENTRY 

NUMBER OF DIRECTORY PAGES 

NUMBER OF DATA PAGES 

NUMBER OF OVERFLOW PAGES 

BYTES IN LAST DATA PAGE 

SPARE 

NO. OF RESTBL PAGES 

LOCATION OF LAST HDR SPACE 

FLAGS 

SHARED FLAG 

SHARED MASK 

PARTITIONED FLAG 

PARTITIONED MASK 

INDEX SEQUENTIAL FLAG 

INDEX SEQUENTIAL MASK 

SPARE FLAG 

SPARE MASK 

ISD INTEGRITY FLAG 

ISD INTEGRITY MASK 

POD INTEGRITY FLAG 

POD INTEGRITY MASK 

DSCB INTEGRITY FLAG 

DSCB INTEGRITY MASK 

RECATALOG FLAG 

RECATALOG MASK 

INTERLOCK FOR FOLLOWING 

FIELDS 

NUMBER OF DCBS 

LOC OF FIRST DCB HEADER 

NEXT AVAIL. DCB HDR SPACE 

LOC OF FIRST MEMBER HEADER 

NEXT MEMBER HEADER SPACE 

ADDRESS OF POD 



on page 328) 



CHARHD 327 



(Listing of CHARHD continued from page 327) 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 


70 


00024 






RHDTID 

* 

RHDVTA 


DS 


F 


70 


00028 






DS 


F 


70 


0002C 






RHDSPT 


DS 


F 


70 


00030 






RHDCPO 


DS 


F 


70 


00034 








DS 


F 


70 


00038 






RHDSAL 


DS 


XL3 


70 


0003B 






RHDRFM 


DS 


XL1 


70 


0003C 






RHDKYL 


DS 


XL1 


70 


0003D 






RHDPAD 


DS 


XL1 


70 


0003E 






RHDRKP 


DS 


XL2 


70 


00040 






RHDRCL 


DS 


F 


70 


00044 






RHDDSO 


DS 


XL2 


70 


00046 






RHDCRD 


DS 


XL1 






70 


00046 


RHDCHG 


EQU 


RHDCRD 






00000080 


RHDCHGM 


EQU 


x'so' 






70 


00046 


RHDREF 


EQU 


RHDCRD 






00000040 


RHDREFM 


EQU 


X f 40* 


70 


00047 






RHDOPC 


DS 


XL1 


70 


00048 






RHDEND 

* 

RHDLNGTH 

+ 


DS 


OX 






00000048 


EQU 


RHDEND 






00000004 


RHDEPSZ 


EQU 


4 






00000008 


RHDSEPSZ 

+ 


EQU 


8 






00000003 


RKDHODSZ 

* 
* 
* 


EQU 


3 



COMMENT 

TASK ID WHICH SET RESTBL 

LOCK 

ADDRESS OF VOLUME TABLE 

POINTER TO E DSCB OF DATA 

SET 

CURRENT PAGEOUT COUNT 

RESERVED 

SECONDARY ALLOCATION (ES A) 

RECORD FORMAT 

KEY LENGTH 

VI PAD FACTOR 

RELATIVE KEY POSITION 

RECORD LENGTH 

DATA SET 

ORGANIZATION (DSORG) 

CHANGE/REFERENCE DATA FLAG 

BYTE 

CHANGE DATA FLAG 

CHANGE DATE MASK 

REFERENCE DATE FLAG 

REFERENCE DATE MASK 

OPTION CODES 

END OF RESTBL HEADER 

16478 
fcRHD LENGTH OF RESTBL 
HEADER 16478 
NON- SHARED EXT PAGE ENTRY 
SIZE 16478 
SHARED EXT PAGE ENTRY SIZE 

16478 
TWOS EXPONENT TO CONVERT 

16478 
RESTBL PTRS TO 
DISPLACEMENTS 16478 



328 CHARHD 



CHADHD Storage map 



HEX 



DEC 


8 

16 

24 
32 
40 
48 
56 



Fields in CHADHD — by displacement 



oi 


DHDDCB 




DHDJFC | 


8| 
1 


DHDTSK 




DHDRES | 


10| 
1 


DHDPOD 




DHDLNK | 


18|DHDOPN 

1 


| DHDPRO | 
1 1 


DHDINT 


DHDCOP | 


20( 
I 


DHDISD 




DHDCDP 


I 

I 


DHDNOP | 


28 1 

1 


DHDMRL 




1 DHDNDH 


1 

I 


DHDPDH | 


30[ 

1 


DHDDUP 




DHDSISD | 


38] 
i 


DHDDXP 




| DHDOXP | 



DEC 


HEX 


FIELD 


0000 


0000 


DHDDCB 


0004 


0004 


DHDJFC 


0008 


0008 


DHDTSK 


0012 


oooc 


DHDRES 


0016 


0010 


DHDPOD 


0020 


0014 


DHDLNK 


0024 


0018 


DHDOPN 


0025 


0019 


DHDPRO 


0026 


001A 


DHDINT 




FIELD 

DHDVRO 

DHDFBP 

DHDCOP 

DHDNBP 

DHDISD 

DHDFDP 

DHDCDP 

DHDPCO 

DHDNOP 



DEC 
(EQU) 0040 
(EQU) 0044 

0046 
(EQU) 0048 

0052 
(EQU) 0056 

0060 
(EQU) 0060 

0064 



HEX FIELD 
0028 DHDMRL 
002C DHDNDH 
002E DHDPDH 
0030 DHDDUP 
0034 DHDSISD 
0038 DHDDXP 
00 3C DHDCPR 
003C DHDOXP 
0040 DHDEND 



(EQU) 



Alphabetical list of fields in CHADHD 



FIELD DEC HEX 

DHDCDP 0036 0024 

DHDCOP 0028 001C 

DHDCPR 0060 003C (EQU) 

DHDDCB 0000 0000 

DHDDUP 0048 0030 

DHDDXP 0056 0038 

DHDEND 0064 0040 

DHDFBP 0028 001C (EQU) 

DHDFDP 0036 0024 (EQU) 



FIELD 

DHDINT 

DHDISD 

DHDJFC 

DHDLNK 

DHDMRL 

DHDNBP 

DHDNDH 

DHDNOP 

DHDOPN 



DEC 

0026 

0032 

0004 

0020 

0040 

0032 

0044 

0038 

0024 



HEX 

001A 

0020 

0004 

0014 

0028 

0020 

002C 

0026 

0018 



FIELD 
DHDOXP 
DHDPCO 
DHDPDH 
DHDPOD 
DHDPRO 
(EQU) DHDRES 
DHDSISD 
DHDTSK 
DHDVRO 



DEC HEX 
0060 003C 
0038 0026 (EQU) 
0046 002E 
0016 0010 
0025 0019 
0012 OOOC 
0052 0034 
0008 0008 
0027 001B (EQU) 



Assembler listing of CHADHD 



LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 




2A 00000 


CHADHD 


DSECT 




2A 00000 




DHDDCB 


DS 


F 


2A 00004 




DHDJFC 


DS 


F 


2A 00008 




DHDTSK 


DS 


F 


2A 0000C 




DHDRES 


DS 


F 


2A 00010 




DHDPOD 


DS 


F 


2A 00014 




DHDLNK 


DS 


F 


2A 00018 




DHDOPN 


DS 


XL1 




00000000 


DHDINP 


EQU 


X'00' 




0000003C 


DHDOUT 


EQU 


X f 3C' 


2A 00019 




DHDPRO 


DS 


XL1 


2A 0001A 




DHDINT 


DS 


H 




2A 0001B 


DHDVRO 


EQU 


DHDINT+1 




00000080 


DHDVROM 


EQU 


X - 80» 


2A 0001C 




DHDCOP 


DS 


F 




2A 0001C 


DHDFBP 


EQU 


DHDCOP 


2A 00020 




DHDISD 


DS 


F 




2A 00020 


DHDNBP 


EQU 


DHDISD 


2A 00024 




DHDCDP 


DS 


H 


(Listing 


of CHADHD 


continued 


on page 330) 



COMMENT 

DCB HEADER 

DCB ADDRESS 

JFCB ADDRESS 

TASK ID 

RESTBL ADDRESS 

POD ADDRESS 

LINK TO MEMBER/RESTBL 

HEADER 

OPEN OPTIONS 

INPUT REQUEST 

OUTPUT REQUEST 

PROTECTION CLASS 

INTERLOCK SUMMARY 

READ-ONLY ACCESS 

READ-ONLY ACCESS MASK 

LOC OF CURRENT OFLO PAGE 

LOC OF FIRST BUFFER PAGE 

LOC OF IND SEQ DIRECTORY 

NO. OF BUFFER PAGES 

CURRENT DATA PAGE 



CHADHD 329 



(Listing of CHADHD continued from page 329) 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 




2A 


00024 


DHDFDP 


EQU 


DHDCDP 


2h 00026 






DHDNOP 


DS 


H 




2A 


00026 


DHDPCO 


EQU 


DHDNOP 


2A 00028 






DHDMRL 


DS 


F 


2A 0002C 






DHDNDH 


DS 


H 


2A 0002E 






DHDPDH 


DS 


H 


2A 00030 






DHDDUP 


DS 


F 


2A 00034 






DHDSISD 


DS 


F 


2A 00038 






DHDDXP 


DS 


F 


2A 0003C 






DHDOXP 


DS 


F 




2A 


0003C 


DHDCPR 


EQU 


DHDOXP 


2A 00040 






DHDEND 


DS 


OX 




00000040 


DHDLNGTH 

* 


EQU 


DHDEND 



COMMENT 

FIRST DATA PAGE CHECKED OUT 
CURRENT OVERFLOW PAGE 
NO. DATA PAGES CHECKED OUT 
MAX LOGICAL RECORD LENGTH 
NEXT DCB HEADER 
PREVIOUS DCB HEADER 
ADDRESS OF DUPLEX COPY OF 
DS 

ADDRESS SUPER INDEX 
SEQUENTIAL DIRECTORY 
LAST DATA PAGE EXTERNAL 
ADDRESS 

LAST OVERFLOW PAGE EXTERNAL 
ADDRESS 

NO PAGES IN LAST PAGING 
REQUEST 

END OF DCB HEADER 
16478 
-CHADHD SIZE OF DCB HEADER 
16478 



l 



CHAMHD Storage map 



DEC 



8 
16 
24 



HEX 



01 

1 


MHDNAM 




8 | MHDFEP 


| MHDDIR | MHDDAT 
t 1 


MHDOVF 


10 | MHDW |MHDR 
I 1 


|MHDN |MHDI (MHDFLG | MHDINT 
1 1 t 1 


MHDUSE 


18| 

1 


MHDVAL | MHDNMH 


MHDPMH 



Fields in CHAMHD — by displacement 



DEC HEX FIELD 
0000 0000 MHDNAM 
000 8 0008 MHDFEP 
0010 000A MHDDIR 
0012 O0OC MHDDAT 
0014 000E MHDBYT 
0014 000E MHDOVF 



DEC HEX FIELD 

0016 0010 MHDW 

0017 0011 MHDR 

0018 0012 MHDN 

0019 0013 MHDI 
(EQU) 0020 0014 MHDFLG 

0021 0015 MHDINT 



DEC HEX 
0022 0016 
0024 0018 
0028 001C 
0030 001E 
0032 0020 



FIELD 

MHDUSE 

MHDVAL 

MHDNMH 

MHDPMH 

MHDEND 



Alphabetical list of fields in CHAMHD 



FIELD 


DEC 


HEX 


FIELD 


DEC 


HEX 


MHDBYT 


0014 


000E (EQU) MHDI 


0019 


0013 


MHDDAT 


0012 


oooc 


MHDINT 


0021 


0015 


MHDDIR 


0010 


000A 


MHDN 


0018 


0012 


MHDEND 


0032 


0020 


MHDNAM 


0000 


0000 


MHDFEP 


0008 


0008 


MHDNMH 


0028 


001C 


MHDFLG 


0020 


0014 


MHDOVF 


0014 


000E 



FIELD 


DEC 


HEX 


MHDPMH 


0030 


001E 


MHDR 


0017 


0011 


MHDUSE 


0022 


0016 


MHDVAL 


0024 


0018 


MHDW 


0016 


0010 



330 CHAMHD 



Assembler listing of CHAMHD 



LOCATION INSTRUCTION 

52 00000 
52 00000 
52 00008 

52 0O00A 
52 0000C 
52 0000E 



52 OOOOE 



52 00010 
52 00011 
52 00012 
52 00013 
52 00014 
52 00015 

52 00016 
52 00018 
52 0001C 
52 0001E 
52 00020 



00000020 



SOURCE 
CHAMHD 
MHDNAM 
MHDFEP 

* 

MHDDIR 

MHDDAT 

MHDOVF 

MHDBYT 

MHDW 

MHDR 

MHDN 

MHDI 

MHDFLG 

MHDINT 

* 

MHDUSE 

MHDVAL 

MHDNMH 

MHDPMH 

MHDEND 

* 

MHDLNGTH 

* 



INST OPER 

DSECT 

DS 

DS 



DS 

DS 

DS 

EQU 

DS 

DS 

DS 

DS 

DS 

DS 

DS 
DS 
DS 
DS 

DS 

EQU 



CL8 

H 

H 

H 

H 

MHDOVF 

XL1 

XL1 

XL1 

XL1 

XL1 

XL1 

H 
F 
H 
H 
OX 

MHDEND 



COMMENT 

MEMBER HEADER 
MEMBER NAME 
FIRST EXTERNAL PAGE 
(OFFSET) 

NUMBER OF DIRECTORY PAGES 
NUMBER OF DATA PAGES 
NUMBER OVERFLOW PAGES 
BYTES USED LAST PAGES 
WRITE INTERLOCK 
READ INTERLOCK 
READ INTERLOCK COUNTER 
READ INTERLOCK CONTROL 
FLAGS (SHARED, PART. , ETC) 
INTERLOCK FOR FOLLOWING 
FIELDS 

NUMBER OF USERS 
VALUE OF 1ST EXT PG ENTRY 
NEXT MEMBER HEADER 
PREVIOUS MEMBER HEADER 
END OF KEMBER HEADER 
16478 
-CHAMHD LENGTH OF MEMBER 
HEADER 16478 



CHAEPE Storage map 



DEC 




HEX 



0|EPEINW IEPEINR [EPEINN |EPEINI | 
I I I I L 



EPESDA 



EPEEPN 



> ( 



Fields in CHAEPE — by displacement 



DEC HEX FIELD 
0000 0000 EPEINW 

0000 0000 EPEIN 

0001 0001 EPEINR 

0002 0002 EPEINN 

0003 0003 EPEINI 



DEC HEX FIELD 
0004 0004 EPEFL1 
0004 0004 EPERVN 
0004 0004 EPEEDA 
0004 0004 EPEFLG 
0004 0004 EPESDA 



DEC HEX FIELD 
(EQU) 0004 0004 EPEEPE 
(EQU) 0006 0006 EPEPNV 
(EQU) 0006 0006 EPEEPN 
(EQU) 



(EQU) 



Alphabetical list of fields in CHAEPE 



FIELD 

EPEEDA 

EPLEPE 

EPEEPN 

EPEFLG 

EPEFL1 



DEC HEX 



FIELD 



0004 0004 (EQU) EPEIN 



0004 0004 
0006 0006 
0004 0004 (EQU) 
0004 0004 



EPEINI 

EPEINN 

EPEINR 

(EQU) EPEINW 



DEC HEX 

0000 0000 
0003 0003 
0002 0002 

0001 0001 
0000 0000 



FIELD DEC HEX 

EPEPNV 0006 0006 (EQU) 

EPERVN 0004 0004 (EQU) 

EPESDA 0004 0004 



Assembler listing of CHAEPE 



LOCATION INSTRUCTION SOURCE INST OPER 

32 00000 CHAEPE DSECT 

* 

32 00000 EPEIN DS OF 

32 00000 EPEINW DS XL1 

32 00001 EPEINR DS XL1 

3 2 0000 2 EPEINN DS XL1 

32 00003 EPEINI DS XL1 

32 00004 EPEEPE DS OF 

(Listing of CHAEPE continued on page 332) 



COMMENT 

RESTBL EXTERNAL PAGE 

ENTRIES 

INTERLOCK CONTROL WORD 

WRITE INTERLOCK 

READ INTERLOCK 

READ INTERLOCK COUNTER 

READ INTERLOCK CONTROL 

EXTERNAL ADDR OF PAGE 



CHAEPE 331 



(Listing of CHAEPE continued from page 331) 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 


32 00004 




EPESDA 


DS 


H 


32 00006 




EPEEPN 


DS 


H 




32 00004 


EPEFLG 


EQU 


EPESDA 




32 00004 


EPEEDA 


EQU 


EPESDA 




32 00004 


EPERVN 


EQU 


EPESDA 




32 00006 


EPEPNV 


EQU 


EPEEPN 




32 00004 


EPEFL1 


EQU 


EPESDA 




OOOOOOCO 


EPEFLME 


EQU 


X'CO' 




00000080 


EPEFLM 


EQU 


X 9 B0 9 




00000040 


EPEFLMR 


EQU 


XMO 1 




00000000 


EPEFLMA 


EQU 


X^O' 



COMMENT 

SYMBOLIC DEVICE ADDRESS 
EXTERNAL PAGE NUMBER 
CONDITION FLAG 
EXTERNAL DEVICE CODE 
RELATIVE VOLUME NUMBER. 
PAGE NUMBER IN VOLUME. 
ASSIGNMENT FLAG. 
PAGE IS IN ERROR 
ASSIGNED AND NOT USED 
PAGE IS RELOCATED 
ASSIGNED AND IN USE 



332 CHAEPE 



RJE Retry Threshold Value Table (CHARJE) 

CHARJE maintains SYSGEN parameters establishing the maximum number of retry 
attempts for error recovery on a 2780. CHARJE occupies 12 bytes of storage. 

CHARJE Storage map 



DEC 



HEX 



0IRJE27010|RJE27011|RJE27012IRJE27013|RJE27014|RJE27015|RJE27016|RJE27017| 

1 I I I I I I I I 

8 8|RJE27018| UNNAMED | 

I I I 

Fields in CHARJE — by displacement 



DEC 
0000 



HEX FIELD 



0000 RJE27010 

0001 0001 RJE27011 

0002 0002 RJE27012 



DEC HEX FIELD 

0003 0003 RJE27013 

0004 0004 RJE27014 

0005 0005 RJE27015 



DEC HEX FIELD 

0006 0006 RJE27016 

0007 0007 RJE27017 

0008 0008 RJE27018 



Alphabetical list of fields in CHARJE 



FIELD 



DEC HEX 



RJE27010 0000 0000 
RJE27011 0001 0001 
RJE27012 0002 0002 



FIELD DEC HEX 
RJE27013 0003 0003 
RJE27014 0004 0004 
RJE27015 0005 0005 



FIELD DEC HEX 

RJE27016 0006 0006 

RJE27017 0007 0007 

RJE27018 0008 0008 



Assembler listing of CHARJE 



I 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 




71 


00000 


CHARJE 


DSECT 




71 00000 






RJE27010 


DS 


X 


71 00001 






RJE27011 


DS 


X 


71 00002 






RJE27012 


DS 


X 


71 00003 






RJE27013 


DS 


X 


71 00004 






RJE27014 


DS 


X 


71 00005 






RJE27015 


DS 


X 


71 00006 






RJE27016 


DS 


X 


71 00007 






RJE27017 


DS 


X 


71 00008 






RJE27018 


DS 


X 


71 00009 








DS 


3X 



COMMENT 

RJE RETRY THRESHOLD VALUES 

FOR 278 

CHANNEL DATA CHECK 

UNIT CHECK/LOST DATA 

UNIT CHECK/TIME OUT 

UNIT CHECK/ INTERVENTION 

REQUIRED 

UNIT CHECK/BUS OUT CHECK 

UNIT CHECK/DATA CHECK 

UNIT CHECK/OVERRUN 

INCORRECT LENGTH 

•SHOULD NOT OCCUR ERRORS 1 

UNUSED 

* NOTE: THE FORMAT FOR THIS BLOCK MUST BE 

* IDENTICAL TO THE 

* FORMAT OF THE 2701 RETRY THRESHOLDS IN 

* THE CHASDT DSECT. 

* BOTH MUST MATCH THE FORMAT OF THE RETRY 

* COUNTERS IN 

* THE IORCB DSECT AT IORRJCT WITH THE 

* EXCEPTION OF THE 

* • SHOULD NOT OCCUR ERRORS • FOR WHICH 

* THERE IS ONLY ONE VALUE. 
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Reply Queue Entry (CHARQE) 

Each reply queue entry in the reply queue contains information for a message which 
requires an operator reply. This queue is periodically searched for overdue replies. 
Overdue replies , when found, will be processed so as not to delay the task that 
issued the message. CHARQE occupies 32 bytes of storage. 

CHARQE Storage map 



DEC 



8 
16 
24 



HEX 



0| 

1 


RQELNG 


| RQERCD | RQECKN | 
I 1 1 


RQELNK | 


8| 
I 


RQESND 


| RQERNO | 
1 1 


RQEMEB | 


10 | 
1 




RQETIM 




18| 
1 




RQEUID 





Fields in CHARQE — by displacement 



DEC HEX FIELD 
0000 0000 RQELNG 

0002 0002 RQERCD 

0003 0003 RQECKN 



DEC HEX FIELD 
0004 0004 RQELJIK 
0008 0008 RQESND 
0010 000A RQERNO 



DEC HEX FIELD 
0012 000C RQEMEB 
0016 0010 RQETIM 
0024 0018 RQEUID 



Alphabetical list of fields in CHARQE 



FIELD 
RQECKN 
RQELNG 
RQELNK 



DEC HEX 

0003 0003 
0000 0000 

0004 0004 



FIELD 
RQEMEB 
RQERCD 
RQERNO 



DEC HEX 
0012 O0OC 
0002 0002 
0010 000A 



FIELD DEC HEX 

RQESND 0008 0008 

RQETIM 0016 0010 

RQEUID 0024 0018 



Assembler listing of CHARQE 



LOCATION INSTRUCTION SOURCE 
12 00000 CHARQE 
72 00000 
12 00000 



12 00002 
12 00003 
12 00004 
72 00008 
72 O0O0A 

72 0000C 

72 00010 

72 00018 



00000020 



RQELNG 

RQERCD 
RQECKN 
RQELNK 
RQESND 
RQERNO 
* 

RQEMEB 

* 

RQETIM 

RQEUID 

RQELEN 



INST 
DSECT 
DS 
DS 

DS 
DS 
DS 
DS 
DS 

DS 

DS 

DS 

EQU 



OPER 

0D 
H 

XL1 

XL1 
F 
H 
H 

F 

CL8 

CL8 



COMMENT 



TEST LENGTH OF 

MESSAGE=MCBLNG*8-16 

MEB RETURN CODE FROM MCBRCD 

REPLY CHECKING NUMBER 

REPLY QUEUE LINK FIELD 

SENDING TID - FRM MCBSND 

REPLY NUMBER - ASSIGNED BY 

CZACA(A) 

ADDRESS OF MEB - FROM 

MCBMEB 

LOG- IN TIME OR TIME OF LAST 

PROMPT 

USERID OF SENDER - FROM 

OPHUID 



♦-CHARQE LENGTH OF DSECT 
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Request Queue (CHARQU, CHASHD, £ CHAENT) 



The Request Queue maintains ordered lists of pending requests (by device class 

requested) for I/O devices in the system. 

The Request Queue consists of the following: 
A table header (RQU) . 

A number of subqueue headers (SHD) . Each of these subqueue headers describes 
the subqueue associated with one device class in the system. These headers are 
ordered on the device class field and contain a pointer to the first queue entry 
for that device class. 

Subqueue entries (ENT) . Each subqueue entry contains a pointer to the next 
entry in the same subqueue, along with an indicator of the type of request and 
the requesting task ID. 
The Request Queue occupies a minimum of 82** bytes of virtual storage , aligned on 

doubleword boundaries. 



1. 
2. 



3. 



CHARQU Storage map 



DEC 




HEX 
01 



L 



RQUFAV 



RQUNOD 



| RQUBLK 



| RQULOK | 
J I 



Fields in CHARQU — by displacement 

DEC HEX FIELD 
0000 0000 RQUFAV 

Alphabetical list of fields in CHARQU 



DEC HEX FIELD 
0004 0004 RQUNOD 



FIELD 
RQUBLK 



DEC HEX 
0006 0006 



FIELD 
RQUFAV 



DEC HEX 
0000 0000 



DEC HEX FIELD 

0006 0006 RQUBLK 

0007 0007 RQULOK 



FIELD 

RQULOK 

RQUNOD 



DEC HEX 
0007 0007 
0004 0004 



\( 



Assembler listing of CHARQU 



LOC 


NATION 


INSTRUCTION SOURCE 
73 00000 CHARQU 


INST 


OPER 




DSECT 




73 


00000 








DS 


0D 


73 


00000 






RQUFAV 


DS 


F 


73 


00004 






RQUNOD 


DS 


H 


73 


00006 






RQUBLK 


DS 


CL1 


73 


00007 






RQULOK 


DS 


XL1 






74 


00000 


CHASHD 


DSECT 




74 


00000 








DS 


0D 


74 


00000 






SHDLOC 


DS 


XL1 


74 


00001 






SHDNOQ 


DS 


XL1 


74 


00002 






SHDSDA 


DS 


XL1 


74 


00003 






SHDNCV 


DS 


XL1 


74 


00004 






SHDDTC 


DS 


H 






74 


00004 


SHDCDR 


EQU 


SHDDTC 






00000801 


SHDCDRM 


EQU 


X f 0801« 






74 


00004 


SHDCDP 


EQU 


SHDDTC 






00000802 


SHDCDPM 


EQU 


X , 0802' 






74 


00004 


SHDPTR 


EQU 


SHDDTC 






00000808 


SHDPTRM 


EQU 


x^sos- 






74 


00004 


SHDD11 


EQU 


SHDDTC 






00002001 


SHDD11M 


EQU 


X^OOl 1 






74 


00004 


SHDD14 


EQU 


SHDDTC 






00002008 


SHDD14M 


EQU 


X f 2008' 






74 


00004 


SHDDRU 


EQU 


SHDDTC 






00002002 


SHDDRUM 


EQU 


X f 2002 f 






74 


00004 


SHDDAC 


EQU 


SHDDTC 






00002003 


SHDDACM 


EQU 


X f 2003' 






74 


00004 


SHDTPD 


EQU 


SHDDTC 


(Listing 


Of 


CHARQU 


continued 


on page 336) 



COMMENT 
REQUEST QUEUE 

ADDRESS OF THE FIRST 

AVAILABLE ENTRY 

NO OF SUBQUEUE HEADERS 

SPARE 

TABLE LOCK BYTE 



SUBQUEUE LOCK BYTE 

NO OF REQUESTS IN THE 

SUBQUEUE 

NO OF THE SDA REQUESTS IN 

THE SUBQUEUE 

NO OF CONVERSATIONAL 

REQUESTS IN THE SUBQUEUE 

DEVICE TYPE CODE- HEX 

CARD READER FLAG 

CARD READER MASK 

CARD PUNCH FLAG 

CARD PUNCH MASK 

140 3 PRINTER FLAG 

1403 PRINTER MASK 

2311 DISK FLAG 

2311 DISK MASK 

2314 DISK FLAG 

2314 DISK MASK 

2301 DRUM FLAG 

2301 DRUM MASK 

2321 DATA CELL FLAG 

2321 DATA CELL MASK 

2400 TAPE DRIVE FLAG 
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(Listing of CHARQU continued from page 335) 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 


COMMENT 






00008001 


SHDTPDM 


EQU 


X'SOOl* 


2400 TAPE DRIVE MASK 






74 


00004 


SHDD02 


EQU 


SHDDTC 


2302 DRUM FLAG 






00002004 


SHDD02M 


EQU 


X , 2004 t 


2302 DRUM MASK 


7a 


00006 






SHDSP1 


DS 


H 


SPARE 


74 


00008 






SHDSAD 

* 


DS 


F 


ADDRESS OF THE FIRST QUEUE 
ENTRY 


74 


ooooc 






SHDLST 

* 


DS 


F 


ADDRESS OF THE LAST QUEUE 
ENTRY 






75 


00000 


CHAENT 


DSECT 






75 


00000 








DS 


0D 




75 


00000 






ENTNEX 


DS 


F 


ADDRESS OF THE NEXT QUEUE 
ENTRY 


75 


00004 






ENTEFL 


DS 


XL1 


FLAG BYTE 






75 


00004 


ENTEL 


EQU 


ENTEFL 


MESSAGE SENT FLAG 






00000080 


ENTELM 


EQU 


x'so' 








75 


00004 


ENTEO 


EQU 


ENTEFL 


SDA FLAG 






00000040 


ENTEOM 


EQU 


X'40' 








75 


00004 


ENTEC 


EQU 


ENTEFL 


CONVERSATIONAL FLAG 






00000020 


ENTECM 


EQU 


X % 2Q % 




75 


00005 






ENTSPR 


DS 


XL1 


SPARE 


75 


00006 






ENTTID 


DS 


H 


TASK I D 


75 


00008 






ENTBCK 


DS 


F 


BACKWARD LINK 


75 


OOOOC 






E NTS DA 


DS 


F 


SDAT ADDRESS 






75 


OOOOC 




|ORG| 


*-4 




75 


OOOOC 






ENTSDS 


DS 


H 


S DAS DA- SYMBOLIC DEVICE 
ADDRESS 


75 


0000E 






ENTDEV 

* 


DS 


XL1 


OPTIONAL FEATURES ON THE 
DEVICE 


75 


0000F 






ENTSP 

* 


DS 


XL1 


SPARE 

DEVICE CODES FOR SHDDTC 










* 0801= 


2540 CARD READER 


2001=2311 DISK PACK 










* 0802= 


2540 CARD PUNCH 


2002=2301 DRUM 










* 0808= 


1403 PRINTER 


2003=2321 DATA CELL 










* 0810= 


2671 PERFORATED 


2004=2302 DISK 
TAPE READER 200 8=231 



p 



8001=2400 TAPE DRIVE 
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CHASHD Storage map 



DEC 




HEX 



0( SHDLOC [SHDNOQ | SHDSDA | SHDNCV 

i I 1 I 

8 J SHDSAD 

i 



SHDDTC 



SHDSP1 



SHDLST 



Fields in CHASHD — by displacement 



DEC 
0000 


HEX 
0000 


FIELD 
SHDLOC 




0001 


0001 


SHDNOQ 




0002 


0002 


SHDSDA 




0003 


0003 


SHDNCV 




0004 


0004 


SHOD 02 


(EQU) 


0004 


0004 


SHDTPD 


(EQU) 



DEC HEX FIELD 
0004 0004 SHDDAC 
0004 0004 SHDDRU 
0004 0004 SHDD14 
0004 0004 SHDD11 
0004 0004 SHDPTR 
0004 0004 SHDCDP 



DEC 

(EQU) 0004 

CEQU) 0004 

(EQU) 000 6 

(EQU) 0008 

(EQU) 0012 
(EQU) 



HEX FIELD 
0004 SHDCDR 
0004 SHDDTC 
0006 SHDSP1 
0008 SHDSAD 
000C SHDLST 



(EQU) 



Alphabetical list of fields in CHASHD 



FIELD DEC HEX FIELD 

SHDCDP 0004 0004 (EQU) SHDD11 

SHDCDR 0004 0004 (EQU) SHDD14 

SHDDAC 0004 0004 (EQU) SHDLOC 

SHDDRU 0004 0004 (EQU) SHDLST 

SHDDTC 0004 0004 SHDNCV 

SHDD02 0004 0004 (EQU) SHDNOQ 



DEC HEX FIELD 

0004 0004 (EQU) SHDPTR 

0004 0004 (EQU) SHDSAD 

0000 0000 SHDSDA 
0012 000C SHDSP1 
0003 0003 SHDTPD 

0001 0001 



DEC HEX 

0004 0004 (EQU) 

0008 0008 

0002 0002 

0006 0006 

0004 0004 (EQU) 



CHAENT Storage map 



DEC 




HEX 
Of 
I. 
8| 



ENTNEX 



i ENTEFL 



I ENTSPR 



ENTTID 



ENTBCK 



ENTSDA 



ORG *-4 



12 



Fields in CHAENT — by displacement 



ENTSDS 



| ENTDEV | ENTSP | 



DEC HEX FIELD 
0000 0000 ENTNEX 
0004 0004 ENTEC 
0004 0004 ENTEO 
0004 0004 ENTEL 



DEC HEX FIELD 

0004 0004 ENTEFL 

(EQU) 0005 0005 ENTSPR 

(EQU) 0006 0006 ENTTID 

(EQU) 0008 0008 ENTBCK 



DEC HEX FIELD 
0012 000C ENTSDS 
0012 000C ENTSDA 

0014 000E ENTDEV 

0015 O00F ENTSP 



Alphabetical list of fields in CHAENT 



FIELD 
ENTBCK 
ENTDEV 
ENTEC 



DEC HEX 
0008 0008 
0014 OO0E 



FIELD 



ENTEL 
ENTEO 
0004 0004 (EQU) ENTNEX 



DEC HEX FIELD 

0004 0004 (EQU) ENTSDS 

0004 0004 (EQU) ENTSP 
0000 0000 ENTSPR 



ENTEFL 0004 0004 



ENTSDA 



0012 000C 



ENTTID 



DEC HEX 
0012 000C 
0015 000F 

0005 0005 

0006 0006 
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Resident Shared-Page Index (CHARSP) 

The Resident Shared-Page Index (RSPI) contains the status and control information 
required by the Resident Supervisor to maintain the shared-page tables. 

The RSPI indicates the core storage location (if available), the intransit state, 
and the length of shared-page tables. In addition, the RSPI indicates the existence 
and identity of items in a GQE chain of TSIs waiting for an in-transit condition to 
end. One RSPI entry is assigned for each currently active shared-page table number. 

The RSPI is used or set by ADSPG, Page Posting, Page Turning, and Timer Interrupt 
Processor. 

Sixteen bytes of core storage are allocated to RSPI, aligned on word boundaries. 

CHARSP Storage map 



DEC 




HEX 



0|RSPPTL | 

I L 

81 



RSPPTO 



RS PS PT 



RSPGQE 



_L 



(RSPLOCK | RSPFLl | 



|RSPN 



[RSPU 



RSPLNG 



I 



Fields in CHARSP — by displacement 



DEC HEX FIELD 

0000 0000 RSPPTL 

0001 0001 RSPPTO 
0004 0004 RSPSPT 

0006 0006 RSPLOCK 

0007 0007 RSPGI 



DEC HEX FIELD 
0007 0007 RSPOI 
0007 0007 RSPII 
0007 0007 RSPAV 
0007 0007 RSPPS 
(EQU) 0007 0007 RSPVA 



DEC HEX FIELD 
(EQU) 0007 0007 RSPFLl 
(EQU) 000 8 0008 RSPGQE 
(EQU) 0012 000C RSPN 
(EQU) 0013 000D RSPU 
(EQU) 0014 000E RSPLNG 



Alphabetical list of fields in CHARSP 



FIELD 

RSPAV 

RSPFLl 

RSPGI 

RSPGQE 

RSPII 



DEC HEX 



FIELD 



0007 0007 (EQU) RSPLNG 
0007 0007 RSPLOCK 

0007 0007 (EQU) RSPN 

0008 0008 RSPOI 
0007 0007 (EQU) RSPPS 



DEC HEX 
0014 000E 

0006 0006 
0012 000C 

0007 0007 



FIELD 
RSPPTL 
RSPPTO 
RSPSPT 
(EQU) RSPU 



0007 0007 (EQU) RSPVA 



DEC HEX 

0000 0000 

0001 0001 
0004 0004 
0013 000D 
0007 0007 



(EQU) 
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Assembler listing of CHARSP 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 






76 00000 


CHARSP 


DSECT 




76 


00000 






DS 


OF 


76 


00000 




RSPPTL 


DS 


XL1 


76 


00001 




RSPPTO 


DS 


XL3 


76 


00004 






DS 


OH 


76 


00004 




RSPSPT 


DS 


H 


76 


00006 




RSPLOCK 


DS 


XL1 


76 


00007 




RSPFL1 


DS 


XL1 






76 00007 


RSPVA 


EQU 


RSPFL1 






00000080 


RSPVAM 


EQU 


X'80' 






76 00007 


RSPPS 


EQU 


RSPFL1 






00000010 


RSPPSM 


EQU 


X f 10 - 






76 00007 


RSPAV 


EQU 


RSPFL1 






00000008 


RSPAVM 


EQU 


X'08 f 






76 00007 


RSPII 


EQU 


RSPFL1 






00000004 


RSPIIM 


EQU 


X , 04 f 






76 00007 


RSPOI 


EQU 


RSPFL1 






00000002 


RSPOIM 


EQU 


X , 02 i 






76 00007 


RSPGI 


EQU 


RSPFL1 






00000001 


RSPGIM 


EQU 


X'Ol 1 


76 


00008 






DS 


OF 


76 


00008 




RSPGQE 


DS 


F 


76 


OOOOC 




RSPN 


DS 


XL1 


76 


0000D 




RSPU 


DS 


XL1 


76 


0000E 




RSPLNG 

* 


DS 


H 



COMMENT 



SHARED PAGE TABLE LENGTH 
SHARED PAGE TABLE ORIGIN 

SHARED PAGE TABLE NUMBER 
LOCK BYTE FOR SHARED PAGE 
TABLE UPDATE 
FIRST FLAG BYTE 
VARIABLE SEGMENT FLAG 
VARIABLE SEGMENT MASK 
PUBLIC PAGE TABLE FLAG 
PUBLIC PAGE TABLE MASK 
SHARED PAGE TABLE 
AVAILABILITY FLAG 
SHARED PAGE TABLE 
AVAILABILITY MASK 
INCOMING IN-TRANSIT 
CONDITION FLAG 
INCOMING IN-TRANSIT 
CONDITION MASK 
OUTGOING IN-TRANSIT 
CONDITION FLAG 
OUTGOING IN-TRANSIT 
CONDITION MASK 
GQE CHAIN INDICATOR FLAG 
GQE CHAIN INDICATOR MASK 

GQE CHAIN 
IN- USE PAGE COUNT 
UNUSED PAGE COUNT 
NUMBER OF BYTES ASSIGNED 
THIS SPT 
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TSSS Real Symbol Table (CHARST) 

The Real Symbol Table contains pointers to external symbols used in the TSSS Resi- 
dent Support System CRSS) and in the Resident Supervisor, and is used for resolution 
of these symbols. 

Each three- word entry contains a 2 -word symbol name, and a 1-word address for that 
symbol. The last entry in the table is a two-word field of X'FFFFFFFFFFFFFFFF* . 

The Real Symbol Table resides in virtual storage aligned on word 
boundaries. 

CHARST Storage map 

DEC HEX 

0| RSTSYMB | 

I I 

8 8| RSTADDR | 

i I 



Fields in CHARST — by displacement 

DEC HEX FIELD DEC HEX FIELD DEC HEX FIELD 

0000 0000 RSTSYMB 0008 0008 RSTADDR 

Alphabetical list of fields in CHARST 

FIELD DEC HEX FIELD DEC HEX FIELD DEC HEX 
RSTADDR 0008 0008 RSTSYMB 0000 0000 

Assembler listing of CHARST 

LOCATION INSTRUCTION SOURCE INST OPER COMMENT 

* REAL SYMBOL TABLE PROVIDED BY 

* STARTUP 
77 00000 CHARST DSECT 

77 00000 RSTSYMB DS 2F SYMBOL PORTION OF ENTRY 

77 0000 8 RSTADDR DS F ADDRESS PORTION OF ENTRY 

* TWO FULL WORDSD 

* TWO FULL WORDS OF 'ALL BITS ON* 

* INDICATE THE END OF THE TABLE 

* X • FFFFFFFFFFFFFFFF ' 
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Real-Time Inter rupt-Pending Queue (CHARTI) Entry 

The Real-Time Interrupt- Pending Queue (RTIJ contains information necessary for 
creating a real-time interruption. The variable length RTI consists of a string of 
**-word RTI entries, aligned on doubleword boundaries. 

CHARTI Storage map 



DEC 




HEX 
Of 
L 
81 



RTITIME 



RTITSI 



i RTIFLAG 



RTIADCON 



Fields in CHARTI — by displacement 

DEC HEX FIELD 

0000 0000 RTITIME 

0008 0008 RTITSI 



DEC HEX FIELD 
0012 000C RTIADP 
0012 000C RTICNCL 



DEC HEX FIELD 
CEQU) 0012 00 0C RTIFLAG 
(EQU) 0013 00 0D RTIADCON 



Alphabetical list of fields in CHARTI 



FIELD 



DEC HEX 



FIELD 



DEC HEX 



FIELD 



RTIADCON 0013 000D RTICNCL 
RTIADP 0012 000C CEQU) RTIFLAG 



0012 000C (EQU> RTITIME 
0012 000C RTITSI 



DEC HEX 
0000 0000 
0008 0008 



Assembler listing of CHARTI 



I / 



LOCATION INSTRUCTION SOURCE 
78 00000 



INST OPER 
DSECT 



COMMENT 



********* 

* 
* 

* 

* 

* 
# 

********* 

78 00000 

78 00008 
78 0000C 
78 0O00D 



CHARTI DSECT REAL TIME INTERRUPT PENDING 

* QUEUE ENTRY 

************************************************************** 

POINTERS AND COUNTS PERTAINING TO CHARTI ARE * 
FOUND IN CHASYS (3YSRT1 THROUGH SYSRT6) AND ARE * 
MAINTAINED BY SET REAL TIME INTERRUPT (CEAS 7 JAN D CREATE * 
REAL TIME INTERRUPT CCEAKR) . INITIALLY, CEAS7 REQUESTS* 
64 BYTES OF CORE FOR CHARTI. FOUR FOUR-WORD ENTRIES * 
ARE ARRANGED IN PHYSICAL SEQUENTIAL ORDER OF INCREASING* 
REAL TIME WITHIN THIS CORE BLOCK. WHEN MORE SPACE IS * 
NEEDED, LARGER CORE BLOCKS ARE OBTAINED IN MULTIPLES OF* 
6 a, THE EXISTING CORE BLOCK IS MOVED INTO THE LARGER ONE* 
AND THE NEW ENTRIES ARE ADDED, AND THE OLD CORE BLOCK * 
SPACE IS RELEASED. * 

************************************************************** 



DS 



DS 
DS 



78 0000C 

00000001 

78 0000C 
00000002 



RTITIME 

* 

RTITSI 
RTIFLAG 
RTIADCON DS 

RTICNCL 

* 

RTICNCLM EQU 

♦ 

RTIADP 
RT1ADPM 



F 

XL1 

XL3 



EQU RTIFLAG 



EQU 
EQU 



X - 01 f 

RTIFLAG 
X"02 f 



TIME OF EXPECTED REAL-TIME 

INTERRUPT 

ADDRESS OF TSI 

FLAG BYTE 

ADDRESS OF ROUTINE FOR 

WHICH 

INTERRUPT IS INTENDED 

CANCEL INTERRUPT REQUEST 

FLAG 

CANCEL INTERRUPT REQUEST 

MASK 

ADCON PRESENT FLAG 

ADCON PRESENT MASK 
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Symbolic- to- Actual Conversion Table (CHASAC) 



The Symbolic- to- Act ual Address conversion Table (SAC) enables direct lookup for 
converting symbolic device addresses to actual device addresses. SAC occupies from 4 
to 32,768 bytes of core storage, aligned on fullword boundaries. 



p 



CHASAC Storage map 



DEC 




HEX 
0! 



SACHDA 



UNNAMED 



ORG SACBEG 



| SACDA 



UNNAMED 



Fields in CHASAC — by displacement 



DEC HEX FIELD 
0000 0000 SACDA 
0000 0000 SACDP 



DEC HEX FIELD 
0000 0000 SACHDA 
0000 0000 SACHED 



DEC HEX FIELD 
0000 0000 SACBEG 



Alphabetical list of fields in CHASAC 



FIELD 

SACBEG 

SACDA 



DEC HEX 
0000 0000 
0000 0000 




DEC HEX 
0000 0000 
0000 0000 



FIELD 
SACHED 



DEC HEX 
0000 0000 



Assembler listing of CHASAC 



LOCATION INSTRUCTION SOURCE 
79 00000 CHASAC 

SACBEG 
SACHED 
SACHDA 



79 00000 
79 00000 
79 00000 
79 00002 



79 00000 



79 00000 

79 00000 
79 00001 



SACDP 
SACDA 



INST OPER 
DSECT 



DS 
DS 
DS 
DS 
1 QRG I 
DS 

DS 
DS 



OF 

OF 

H 

H 

SACBEG 

OF 



COMMENT 

SYMBOLIC TO ACTUAL 

ADDRESS CONVERSION TBL 

ALIGN ON FULL WORD BOUNDARY 

HEADER 

MAX SYMB DEV ADDR IN TABLE 

NOT USED 



* NOTE 1- THE FULL 

* (LABEL SACDA) IS 

* REPEATED N TIMES 

* SYSTEM SYMBOLIC 



DEV GP TBL PTR (RTMOST 3 

BYTES) 
C ACTUAL DEVICE ADDRESS 

3C DEVICE GP TBL PTR 

WORD SYMBOLIC DEVICE ENTRY 



WHERE N IS THE MAXIMUM 



DEVICE ADDRESS. 
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SERR Auxiliary Queue (CHASAQ) 

The SERR Auxiliary Queue (SAQ) contains I/O status information required by Systems 
Error Routines (SERR), The SAQ, formed from pending I/O interruptions, describes the 
operational status of the I/O device(s) required by SERR (e.g., paging drum and/or 
operator's console). The status information is obtained from the Test I/O (TIO) pro- 
cedure in the SERR Bootstrap module (CMASA) . 

The SAQ resides in real core storage, aligned on fullword boundaries. A 4 byte 
header is followed by reserved storage for at least six 44-byte entries. 

CHASAQ Storage map 



DEC 



8 
16 
24 



HEX 



| SAQLK 

1 


| SAQCTL | 
1 1 


SAQLN 


| SAQFLG 

1 


| UNNAMED | 
1 1 


SAQIC | 


8| 

1 






SAQCSW 






10 | SAQSNS | 
1 1 


18| 
1 

1 
1 
1 

1 






SAQCHL 

s 







>( 




Fields in CHASAQ — by displacement 



DEC HEX FIELD 

0000 0000 SAQLK 

0001 0001 SAQDA 

0001 0001 SAQCTL 

0002 0002 SAQLN 
0004 0004 SAQFI 
0004 0004 SAQFC 



DEC HEX FIELD 

0004 0004 SAQFB 

(EQU) 0004 0004 SAQFA 

0004 0004 SAQFLG 

0004 0004 SAQSSO 

(EQU) 0006 0006 SAQIC 

(EQU) 0008 0008 SAQTSI 



DEC HEX FIELD 
(EQU) 0008 0008 SAQCSW 
(EQU) 0012 000C SAQISP 

0016 0010 SAQSNS 
(EQU) 0024 0018 SAQCHL 



Alphabetical list of fields in CHASAQ 



FIELD 


DEC 


HEX 




FIELD 


DEC 


HEX 




FIELD 


DEC 


HEX 


SAQCHL 


0024 


0018 




SAQFC 


0004 


0004 


(EQU) 


SAQLN 


0002 


0002 


SAQCSW 


0008 


0008 




SAQFI 


0004 


0004 


(EQU) 


SAQSNS 


0016 


0010 


SAQCTL 


0001 


0001 




SAQFLG 


0004 


0004 




SAQSSO 


0004 


0004 


SAQDA 


0001 


0001 


(EQU> 


SAQIC 


0006 


0006 




SAQTSI 


0008 


0008 


SAQFA 


0004 


0004 


(EQU) 


SAQISP 


0012 


OOOC 










SAQFB 


0004 


0004 


(EQU) 


SAQLK 


0000 


0000 











(EQU) 



.( 
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Assembler listing of CHASAQ 



LOCATION INSTRUCTION 
7A 00000 



7A 00000 
7A 00000 

7A 00001 



7A 00001 
00000080 



7A 00002 



7A 00004 



7A 00004 



7A 00004 
00000080 
7A 00004 
00000040 
7A 00004 
00000020 
7A 00004 
00000010 



7A 00005 

7A 00006 
7A 00008 
7A 00010 
7A 00018 

7A 00008 
7A 0000C 



7A 00008 



0000002C 



SOURCE 

CHASAQ 
******* 

******* 

SAQLK 

SAQCTL 

SAQDA 

SAQDAM 

SAQLN 

SAQSSO 
******* 

******* 

SAQFLG 

SAQFA 

SAQFAM 

SAQFB 

SAQFBM 

SAQFC 

SAQFCM 

SAQFI 

SAQFIM 



SAQIC 
SAQCSW 
SAQSNS 
SAQCHL 

SAQTSI 
SAQISP 
SAQLNG 



INST OPER 

DSECT 
************* 

HEADER * 

************* 



DS 
DS 

DS 
EQU 

EQU 

DS 

EQU 



0D 
XL1 

XL1 

SAQCTL 

X'80" 

XL2 



COMMENT 



LOCK BYTE - USED BY 
INTERRUPT STACKER 
CONTROL BYTE. 

DATA IN QUEUE FLAG f SET BY 

SERR 

NUMBER OF QUEUE DATA 

SECTIONS. MINIMUM IS 6 

ORIGIN OF REPEATING SECTION 



************************* 

QUEUE DATA SECTION * 
************************* 



DS 

EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
DS 

DS 
DS 
DS 
DS 

l ORG l 
DS 
DS 
EQU 



CL1 

SAQFLG 

X^O' 

SAQFLG 

X^O' 

SAQFLG 

X , 20 f 

SAQFLG 

X'10' 

CL1 

XL2 

XL8 

XL8 

XL24 

SAQCSW 

CL4 

CL36 

♦-SAQSSO 



FLAG BYTE-CLEARED BY CEAJI 

PSA CSW PRESENT 

SENSE DATA PRESENT 

CHANNEL LOGOUT PRESENT 

QUEUE SPECIFIED PROG. INT 

SPARE REQUIRED FOR 

ALIGNMENT 

INTERRUPT CODE 

CHANNEL STATUS WORD ENTRY 

SENSE DATA ENTRY 

CHANNEL LOG ENTRY 

TSI POINTER 

NOT USED IF SAQFIM ON 

LENGTH OF SECTION 
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System Activity and Resources Table (CHASAR) 

The System Activity and Resources Table (SAR) is defined for the SERR routines, 
SAR occupies 80 bytes of shared virtual storage. 

CHASAR Storage map 



DEC 


8 

16 

24 
32 
40 
48 
56 
64 
72 

88 

96 

104 



HEX 



0| 


SARLCK (SARACT [SARCUR (SARSPA [ 
1 1 ( i 




SAREXC 




B| 




SARPRI 








SARPUN 




10) 




SARTAP 








SARRJE 




181 




SARREM 








SARNRM 




20 | 




SARMCA 








SARREP 




28) 




SARTTS 








SARPUB 




30 | 


SARCON 


I 

1 


SARBAK 




SARRDA 


1 

I 


SARAPR | 


38| 


SARARD 


1 

I 


SARAPN 




SARATP 


i 

1 


SARADK | 


40 | 




SARAUD 








SARAUP 




48| 








SARTIM 








58 


SARCNL 




SARBTL 


i 


SARRML 


i 


SARMAL | 


60 J 


SARMMA 




SARMCN 


i 

i 


SARMBT 


1 

I 


SARMRM | 


68 


SARCNC 


| SARBAS I 
I 1 




SARSPA2 





Fields in CHASAR — by displacement 



DEC 


HEX 


FIELD 


DEC 


HEX 


FIELD 


DEC 


HEX 


FIELD 


0000 


0000 


SARLCK 


0040 


0028 


SARTTS 


0088 


0058 


SARCNL 


0001 


0001 


SARACT 


0044 


002C 


SARPUB 


0090 


005A 


SARBTL 


0002 


0002 


SARCUR 


0048 


0030 


SARCON 


0092 


005C 


SARRML 


0003 


0003 


SARSPA 


0050 


0032 


SARBAK 


0094 


005E 


SARMAL 


0004 


0004 


SAREXC 


0052 


0034 


SARRDA 


0096 


0060 


SARMMA 


0008 


0008 


SARPRI 


0054 


0036 


SARAPR 


0098 


0062 


SARMCN 


0012 


OOOC 


SARPUN 


0056 


0038 


SARARD 


0100 


0064 


SARMBT 


0016 


0010 


SARTAP 


0058 


003A 


SARAPN 


0102 


0066 


SARMRM 


0020 


0014 


SARRJE 


0060 


003C 


SARATP 


0104 


0068 


SARCNC 


0024 


0018 


SARREM 


0062 


003E 


SARADK 


0106 


006A 


SARBAS 


0028 


001C 


SARNRM 


0064 


0040 


SARAUD 


0107 


006B 


SARSPA2 


0032 


0020 


SARMCA 


0068 


0044 


SARAUP 


0112 


0070 


SAR END 


0036 


0024 


SARREP 


0072 


0048 


SARTIM 









(EQU) 



Alphabetical list of fields in CHASAR 



( 



FIELD 

SARACT 


DEC 
0001 


HEX 
0001 


FIELD 
SARCON 


DEC 
0048 


HEX 

0030 


FIELD 
SARPUB 


DEC 
0044 


HEX 
002C 


SARADK 


0062 


003E 


SARCUR 


0002 


0002 


SARPUN 


0012 


OOOC 


SARAPN 


0058 


003A 


SAREND 


0112 


0070 


(EQU) SARRDA 


0052 


0034 


SARAPR 


0054 


0036 


SAREXC 


0004 


0004 


SARREM 


0024 


0018 


SARARD 


0056 


0038 


SARLCK 


0000 


0000 


SARREP 


0036 


0024 


SARATP 


0060 


003C 


SARMAL 


0094 


005E 


SARRJE 


0020 


0014 


SARAUD 


0064 


0040 


SARMBT 


0100 


0064 


SARRML 


0092 


005C 


SARAUP 


0068 


0044 


SARMCA 


0032 


0020 


SARSPA 


0003 


0003 


SARBAK 


0050 


0032 


SARMCN 


0098 


0062 


SARSPA2 


0107 


006B 


SARBAS 


0106 


006A 


SARMMA 


0096 


0060 


SARTAP 


0016 


0010 


SARBTL 


0090 


005A 


SARMRM 


0102 


0066 


SARTIM 


0072 


0048 


SARCNC 


0104 


0068 


SARNRM 


0028 


001C 


SARTTS 


0040 


0028 


SARCNL 


0088 


0058 


SARPRI 


0008 


0008 
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.stinq of 


CHASAR 


INST 




LOCATION 


INSTRUCTION SOURCE 


OPER 




7B 00000 CHASAR 


DSECT 




7B 00000 


SARLCK 


DS 


CL1 


7B 00001 


SARACT 


DS 


CL1 


7B 00002 


SARCUR 


DS 


CL1 


7B 00003 


SARSPA 


DS 


CL1 


7B 00004 


SAREXC 


DS 


CL4 


7B 00008 


SARPRI 


DS 


CL4 


7B OO00C 


SARPUN 


DS 


CL4 


7B 00010 


SARTAP 


DS 


CL4 


7B 00014 


SARRJE 


DS 


CL4 


7B 00018 


SARREM 


DS 


CL4 


7B 0001C 


SARNRM 

* 


DS 


FL4 


7B 00020 


SARMCA 


DS 


FL4^ 
6** 


7B 00024 


SARREP 


DS 


CL4 


7B 00028 


SARTTS 

* 

SARPUB 


DS 


CL4 


7B 0002C 


DS 


CL4 


7B 00030 


SARCON 


DS 


CL2 


7B 00032 


SARBAK 


DS 


CL2 


7B 00034 


SARRDA 


DS 


CL2 


7B 00036 


SARAPR 


DS 


CL2 


7B 00038 


SARARD 


DS 


CL2 


7B 0003A 


SARAPN 


DS 


CL2 


7B 0003C 


SARATP 


DS 


CL2 


7B 0003E 


SARADK 


DS 


CL2 


7B 00040 


SARAUD 


DS 


CL4 


7B 00044 


SARAUP 


DS 


CL4 


7B 00048 


SARTIM 


DS 


CL16 


7B 00058 


SARCNL 

* 


DS 


HL2 
6** 


7B 0005A 


SARBTL 

* 


DS 


HL2 






6** 


7B 0005C 


SARRML 

* 


DS 


HL2 
6** 


7B 0005E 


SARMAL 


DS 


HL2 
6** 


7B 00060 


SARMMA 

* 


DS 


HL2 
6** 


(Listing 


of CHASAR continued 


on page 347) 



COMMENT 

LOCK BYTE 

SET TO 1 INDICATES SARD 

ACTIVE 

SET TO 1 INDICATES SARD IS 

CURRENT 

RESERVED 

NUM OF EXEC JOBS PENDING IN 

BWQ 

NUM OF PRINT JOBS PENDING 

IN BWQ 

NUM OF PUNCH JOBS PENDING 

IN BWQ 

NUM OF TAPE JOBS PENDING IN 

BWQ 

NUM OF RJE JOBS PENDING IN 

BWQ 

NUM OF TASKS RUNNING IN 

BACKGROUND 

NUMBER OF BATCH TASKS IN 

EXECUTION N38 

COUNT OF ACTIVE MTT 
ADMINISTRATORS N38 

NUM OF UNANSWERED REPLY 

MESSAGES 

NUM OF PUB STOR PAGES IN 

TEMP USE 

AMOUNT OF AVAILABLE PUB 

STOR PAGES 

NUM OF CONV TASKS LOGGED ON 

NUM OF NON-CONV TASKS 

LOGGED ON 

NUM OF ACTIVE RJE STATIONS 

NUM OF AVAILABLE PRINTERS 

NUM OF AVAILABLE READERS " 

NUM OF AVAILABLE PUNCHES 

NUM OF AVAILABLE TAPES 

NUM OF AVAILABLE DISKS 

NUM OF AVAILABLE DRUM PAGES 

NUM OF AVAILABLE DISK PAGES 

CURRENT SARD TIME WHEN 

ACTIVE 

NUMBER OF CONV. TASKS 

CURRENTLY ALLOWED N38 

NUMBER OF BATCH TASKS 
CURRENTLY ALLOWED N38 

NUMBER OF REMOTE TASKS 
CURRENTLY ALLOWED N38 

NUMBER OF MTT ADMIN. TASKS 
CURRENTLY ALLOWED N38 

MAX -NUMBER OF MTT 

ADMIN. TASKS ALLOWED N38 
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(Listing 


of 


CHASAR 


continued 


from 


page 346) 


LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 


7B 00062 






SARMCN 

* 


DS 


HL2 
6** 


7B 00064 






SARMBT 

* 


DS 


HL2 
6** 


7B 00066 






SARMRM 


DS 


HL2 
6** 


7B 00068 






SARCNC 


DS 


HL2 
6** 


7B 0006A 






SARBAS 


DS 


XL1 
6** 


7B 0006B 






SARSPA2 


DS 


XL5 




7B 


00070 


SAREND 


EQU 


* 




00000070 


SARLEN 


EQU 


SAREND- 



COMMENT 

MAXIMUM NUMBER OF CONV. 

TASKS ALLOWED N38 

MAXIMUM NUMBER OF BATCH 
TASKS ALLOWED N38 

MAXIMUM NUMBER OF REMOTE 
TASKS ALLOWED N38 

COUNT OF CURRENT 
CONVERSATIONAL TASKS 

BULK IO SUPPRESS FLAG SET 
X'Ol* TO SUPPRESS BIO N38 

RESERVED 
N386 



SAREND-CHASAR LENGTH OF SARD TABLE 



N38 
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System Accounting Table (CHASAT) 

The System Accounting Table (SAT) contains accumulated CPU time used by an indivi- 
dual task. Records are maintained for individual charge numbers and user IDs. 
Entries are added and updated by the accounting routine. 

An unfilled data set is defined at SYSGEN. Virtual storage contains the JFCB 
which is added to the task definition table upon initiation. 

The SAT (24 bytes) resides on a system residence volume as a VISAM data set 
aligned on doubleword boundaries. The key is a combination of charge numbers and 
userid. 

CHASAT Storage map 

DEC HEX 



8 
16 

Fields in CHASAT — by displacement 

DEC HEX FIELD DEC HEX FIELD DEC HEX FIELD 

0000 0000 SATCNO 0008 0008 SATUID 0016 0010 SATCPU 

Alphabetical list of fields in CHASAT 



0| 

1 


SATCNO 


8| 

1 


SATUID 


10 | 

1 


SATCPU 



FIELD 


DEC HEX 


FIELD 


DEC HEX 


FIELD 


DEC HEX 


SATCNO 


0000 0000 


SATCPU 


0016 0010 


SATUID 


0008 0008 



Assembler listing of CHASAT 



LOCATION INSTRUCTION SOURCE INST OPER COMMENT 

7C 00000 CHASAT DSECT SYSTEM ACCOUNTING TABLE 

7C 00000 SATCNO DS 8C CHARGE NUMBER 

7C 00008 SATUID DS 8C USER IDENTIFICATION 

7C 00010 SATCPU DS D RUNNING COUNT OF CPU TIME 
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Screen Routines Common Area (CHASCA) 

The Screen Routines Common Area (SCA) is a format of the common fields used by the 
EXHIBIT and the DISPLAY routines. 
The SCA occupies 25 bytes of virutal storage, aligned on word boundaries. 

CHASCA Storage map 



DEC 




HEX 



8 


8 


16 


10 



SCADCB 


SCAWRK 


SCABUF 


SCANUM 


SCAENT 


SCAFCT 


| SCACSW 
i 


| SCALST 
I 



Fields in CHASCA — by displacement 



DEC HEX FIELD 

0000 0000 SCADCB 

000*4 0004 SCAWRK 

0008 0008 SCABUF 



DEC HEX FIELD 
0012 000C SCANUM 
0016 0010 SCAENT 
0020 0014 SCAFCT 



DEC HEX FIELD 

0022 0016 SCACSW 

0023 0017 SCALST 



Alphabetical list of fields in CHASCA 



FIELD 
SCABUF 
SCACSW 
SCADCB 



DEC HEX 
0008 0008 
0022 0016 
0000 0000 



FIELD 
SCAENT 
SCAFCT 
SCALST 



DEC HEX 
0016 0010 
0020 0014 
0023 0017 



FIELD DEC HEX 
SCANUM 0012 000C 
SCAWRK 0004 0004 



Assembler listing of CHASCA 



LOCATION INSTRUCTION SOURCE 



INST OPER 



7D 00000 


CHASCA 


DSECT 




7D 00000 


SCADCB 


DS 


A 


7D 00004 


SCAWRK 


DS 


A 


7D 00008 


SCABUF 


DS 


A 


7D 0OO0C 


SCANUM 


DS 


F 


7D 00010 


SCAENT 


DS 


A 


7D 00014 


SCAFCT 


DS 


H 


7D 00016 


SCACSW 


DS 


X 


7D 00017 


SCALST 


DS 


XL1 



COMMENT 

XXXX DCB ADDRESS 

WORK AREA ADDR FOR DISPLAY 

ROUTINES 

INTERNAL DISPLAY BUFFER 

ADDRESS 

RESERVED 

ADDR OF ENTRY SAVE AREA 

RESERVED 

COMMAND SYSTEM ENTRY SWITCH 

RESERVED 
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SAM Communication Block (CHASCB) 



The Sequential Access Method Communication Block (SCB) contains permanent proces- 
sing data for any task that uses SAM modules. The SCB also functions as a communica- 
tions pool for the following SAM modules: OPEN; CLOSE; EOV; Label Processors; DEB 
modification/ construction routines; and shared routines. In addition, the SCB holds 
those parameter lists which are required as an interface with routines external to 
SAM. 

The SCB is read only to user and occupies 24 bytes of virtual storage, aligned on 
word boundaries, in the PSECT of the SAM OPEN (CECWO) , CLOSE (CECWC) and EOV (CECXE) 
routines. 

CHASCB Storage map 



DEC 


8 

16 

24 

32 

40 

48 

56 

64 

72 

80 

88 

96 

104 

112 

120 

128 

136 

144 

152 

160 

168 

176 

184 

192 

200 



HEX 


8 

10 
18 
20 
28 
30 
38 
40 
48 
50 
58 
60 
68 
70 
78 
80 
88 
90 
98 
A0 
A8 
B0 
B8 
CO 
C8 



| SCBPRG | SCBRS0 | SCBERR | 
III 1 


| SCBDCT | SCBDET | 


| SCBDT | SCBWKP | 


| SCBFM1 I SCBFM3 | 


| SCBDSB | SCBDCB | 


| SCBDEB | SCBJFC | 


| SCBIOA I SCBVCA | 


1 SCBPSV | SCBPSR | 


| SCBLVE J SCBLVB | 


| SCBLVD | SCBLIO | 


| SCBJFM | SCBVMA | 


| SCBJFP | SCBVPA | 


| SCBSDT | SCBPAR | 


| SCBKEY | SCBCHR | 


| SCBIOB | SCBEXJ | 


| SCBEXD | SCBGVJ | 


| SCBGVE | SCBGTC | 


| SCBGTO | SCBGT1 | 


I SCBGTI | SCBGT2 | 


| SCBGOC | SCBTML | 


| SCBTMO | SCBTMT | 


| SCBRS1 | SCBRS3 | 


| SCBRS4 | SCBRS5 | 


| SCBVLM I SCBVLP | SCBPOS | SCBIOZ | 


| SCBF3Z | SCBDBZ ( SCBEXT (SCBTPl ( SCBTP2 | 
1 1 1 ill 


| SCBCNT (SCBNXM | SCBFLG | SCBRVS | SCBTLN | 
1 III 1 1 



(CHASCB continued on page 351) 
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V 



HEX 



DEC 
208 

216 

22** 

232 



ORG SCBERR 



(CHASCB continued from page 350) 



D0| 
i 


SCBRS6 


D8 | SCBWK1 

1 


E0| 

1 


SCBWK2 


E8| 

i 


SCBWK3 



SCBABN 



SCBMSG 



ORG i 


SCBGTI 


140 


8C 


144 


90 J 



SCBWTI 



Fields in CHASCB — by displacement 



SCBWTO 



SCBWTZ 



DEC 


HEX 


FIELD 


DEC 


HEX 


FIELD 


DEC 


HEX 


FIELD 


0000 


0000 


SCBPRG 


0088 


0058 


SCBJFP 


0164 


00A4 


SCBTMT 


0000 


0000 


SCBBEG 


0092 


005C 


SCBVPA 


0168 


00A8 


SCBRS1 


0002 


0002 


SCBRS0 


0096 


0060 


SCBSDT 


0172 


00 AC 


SCBRS3 


0004 


0004 


SCBABN 


0096 


0060 


SCBRET 


0176 


00B0 


SCBRS4 


0004 


0004 


SCBERR 


0096 


0060 


SCBOBT 


0180 


00B4 


SCBRS5 


0006 


0006 


SCBMSG 


0100 


0064 


SCBPAR 


0184 


00B8 


SCBVLM 


0008 


0008 


SCBDCT 


0104 


0068 


SCBKEY 


0184 


00B8 


SCBVAR 


0012 


oooc 


SCBDET 


0108 


006C 


SCBCHR 


0186 


00BA 


SCBVLP 


0016 


0010 


SCBDT 


0112 


0070 


SCBIOB 


0188 


00BC 


SCBPOS 


0020 


0014 


SCBWKP 


0116 


0074 


SCBEXJ 


0190 


00BE 


SCBIOZ 


0024 


0018 


SCBFM1 


0116 


0074 


SCBEXN 


0192 


OOCO 


SCBF3Z 


0028 


001C 


SCBFM3 


0120 


0078 


SCBEXD 


0194 


00C2 


SCBDBZ 


0032 


0020 


SCBDSB 


0124 


007C 


SCBGVJ 


0196 


00C4 


SCBEXT 


0036 


0024 


SCBDCB 


0124 


007C 


SCBGVB 


0198 


00C6 


SCBTP1 


0040 


0028 


SCBDEB 


0128 


0080 


SCBGVE 


0199 


00C7 


SCBTP2 


0044 


002C 


SCBJFC 


0132 


0084 


SCBGTC 


0200 


00C8 


SCBCNT 


0048 


0030 


SCBIOA 


0132 


0084 


SCBGAT 


0202 


00CA 


SCBNXM 


0052 


0034 


SCBVCA 


0136 


0088 


SCBGTO 


0203 


00CB 


SCBFLG 


0056 


0038 


SCBPSV 


0140 


008C 


SCBWTO 


0204 


OOCC 


SCBRVS 


0060 


00 3C 


SCBPSR 


0140 


008C 


SCBGT1 


0206 


OOCE 


SCBTLN 


0064 


0040 


SCBLVE 


0144 


0090 


SCBWTI 


0208 


00D0 


SCBRS6 


0064 


0040 


SCBLVP 


0144 


0090 


SCBGTI 


0216 


O0D8 


SCBWK1 


0068 


0044 


SCBLVB 


0148 


0094 


SCBWTZ 


0216 


00D8 


SCBWRK 


0072 


0048 


SCBLVD 


0148 


0094 


SCBGT2 


0224 


00E0 


SCBWK2 


0076 


004C 


SCBLIO 


0152 


0098 


SCBGOC 


0232 


00E8 


SCBWK3 


0080 


0050 


SCBJFfc 


0156 


009C 


SCBTML 


0240 


00F0 


SCBEND 


0080 


0050 


SCBBMP 


0156 


009C 


SCBTIM 








0084 


0054 


SCBVMA 


0160 


00A0 


SCBTMO 









CEQU) 



Alphabetical list of fields in CHASCB 



FIELD 


DEC 


HEX 


FIELD 


DEC 


HEX 


FIELD 


DEC 


HEX 


SCBABN 


0004 


0004 


SCBEND 


0240 


00F0 (EQU) SCBGTC 


0132 


0084 


SCBBEG 


0000 


0000 


SCBERR 


0004 


0004 


SCBGTI 


0144 


0090 


SCBBMP 


0080 


0050 


SCBEXD 


0120 


0078 


SCBGTO 


0136 


0088 


SCBCHR 


0108 


006C 


SCBEXJ 


0116 


0074 


SCBGTI 


0140 


008C 


SCBCNT 


0200 


00C8 


SCBEXN 


0116 


0074 


SCBGT2 


0148 


0094 


SCBDBZ 


0194 


00C2 


SCBEXT 


0196 


00C4 


SCBGVB 


0124 


007C 


SCBDCB 


0036 


0024 


SCBFLG 


0203 


OOCB 


SCBGVE 


0128 


0080 


SCBDCT 


0008 


0008 


SCBFMl 


0024 


0018 


SCBGVJ 


0124 


007C 


SCBDEB 


0040 


0028 


SCBFM3 


0028 


001C 


SCBIOA 


0048 


0030 


SCBDET 


0012 


OOOC 


SCBF3Z 


0192 


OOCO 


SCBIOB 


0112 


0070 


SCBDSB 


0032 


0020 


SCBGAT 


0132 


0084 


SCBIOZ 


0190 


OOBE 


SCBDT 


0016 


0010 


SCBGOC 


0152 


0098 


SCBJFC 


0044 


002C 


(Continued on 


page 352) 
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(Continued from page 351) 





FIELD 


DEC 


HEX 


FIELD 


DEC 


HEX 




SCBJFM 


0080 


0050 


SCBRET 


0096 


0060 




SCBJFP 


0088 


0058 


SCBRSO 


0002 


0002 




SCBKEY 


0104 


0068 


SCBRS1 


0168 


00A8 




SCBLIO 


0076 


004C 


SCBRS3 


0172 


O0AC 




SCBLVB 


0068 


0044 


SCBRS4 


0176 


00B0 




SCBLVD 


0072 


0048 


SCBRS5 


0180 


00B4 




SCBLVE 


0064 


0040 


SCBRS6 


0208 


00 DO 




SCBLVP 


0064 


0040 


SCBRVS 


0204 


oocc 




SCBMSG 


0006 


0006 


SCBSDT 


0096 


0060 




SCBNXM 


0202 


00CA 


SCBTIM 


0156 


009C 




SCBOBT 


0096 


0060 


SCBTLN 


0206 


00CE 




SCBPAR 


0100 


0064 


SCBTML 


0156 


009C 




SCBPOS 


0188 


00BC 


SCBTMO 


0160 


00A0 




SCBPRG 


0000 


0000 


SCBTMT 


0164 


00A4 




SCBPSR 


0060 


003C 


SCBTP1 


0198 


00C6 




SCBPSV 


0056 


0038 


SCBTP2 


0199 


00C7 


Assembler 


listinq of 


CHASCB 












LOCATION 


INSTRUCTION SOURCE 


INST OPER 








7E 00000 


CHASCB 


DSECT 






7E 


00000 






SCBBEG 

* 

SCBPRG 


DS 


OF 






7E 


00000 






DS 


H 






7E 


00002 






SCBRSO 


DS 


H 






7E 


00004 






SCBERR 


DS 


IF 










7E 00004 




|ORG 


| SCBERR 




7E 


00004 






SCBABN 


DS 


H 






7E 


00006 






SCBMSG 


DS 


H 






7E 


00008 






SCBDCT 


DS 


F 






7E 


ooooc 






SCBDET 


DS 


F 






7E 


00010 






SCBDT 


DS 


F 






7E 


00014 






SCBWKP 


DS 


F 






7E 


00018 






SCBFM1 


DS 


F 






7E 


0001C 






SCBFM3 


DS 


F 






7E 


00020 






SCBDSB 


DS 


F 






7E 


00024 






SCBDCB 


DS 


F 






7E 


00028 






SCBDEB 

* 

SCBJFC 


DS 


F 






7E 


0002C 






DS 


F 






7E 


00030 






SCBIOA 


DS 


F 






7E 


00034 






SCBVCA 

* 

SCBPSV 


DS 


F 






7E 


00038 






DS 


F 






7E 


0003C 






SCBPSR 


DS 


F 






7E 


00040 






SCBLVP 
SCBLVE 


DS 


OF 






7E 


00040 






DS 


F 






7E 


00044 






SCBLVB 

SCBLVD 

* 

SCBLIO 

# 


DS 


F 






7E 


00048 






DS 


F 






7E 


0004C 






DS 


F 






7£ 


00050 






SCBBMP 


DS 


OF 






7E 


00050 






SCBJFM 

* 

SCBVMA 


DS 


F 






7E 


00054 






DS 


F 






7E 


00058 






SCBJFP 

* 

SCBVPA 


DS 


F 






7E 


0005C 






DS 


F 






(Listing 


of CHASCB 


continued 


on page 353) 
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FIELD 


DEC 


HEX 


SCBVAR 


0184 


00B8 


SCBVCA 


0052 


0034 


SCBVLM 


0184 


00B8 


SCBVLP 


0186 


00BA 


SCBVMA 


0084 


0054 


SCBVPA 


0092 


005C 


SCBWKP 


0020 


0014 


SCBWK1 


0216 


00D8 


SCBWK2 


0224 


OOEO 


SCBWK3 


0232 


00E8 


SCBWRK 


0216 


00D8 


SCBWTI 


0144 


0090 


SCBWTO 


0140 


008C 


SCBWTZ 


0148 


0094 



COMMENT 

SAM COMMUNICATION BLOCK 

ALIGN TABLE ON WORD 

BOUNDARY 

PROGRAM MODULE CODE 

RESERVED 

ERROR PARAMETERS FOR 

MESSAGE WRITER 

ABEND CODE 

MESSAGE WRITER CODE 

PTR TO ACCESS METHOD DCB 

PTR TO ACCESS METHOD DEB 

PTR TO ACCESS METHOD DECB 

PTR TO SAM WORK PAGE 

PTR TO A BUFFER FOR FORMAT 

1 DSCBS 

PTR TO BUFFER OF FORMAT 3 

DSCBS 

PTR TO A CHAIN OF DSCBS 

PTR TO THE USERS DCB BEING 

PROCESSED 

PTR TO THE USERS DEB BEING 

PROCESSED 

PTR TO THE USERS JFCB 

PTR TO I/O BUFFER FOR 

LABELS 

ADDR OF A VOL SER FLD IN 

JFCB 

POSTING V — ADDRESS CONSTANT 

POSTING R — ADDRESS CONSTANT 

ADDR OF LVPRV PARAMETER 

LIST 

PTR TO V AND R CONSTANT 

LVPRV IS TO LINK 

PTR TO WHAT IS TO BE PLACED 

IN GR 0-LVPRV 

PTR TO WHAT IS TO BE PLACED 

IN GR 1 -LVPRV 

I/O BUFFER POINTED TO BY 

SCBLVB FOR LVPRV 

ADDR OF BUMP PARAMETER LIST 

PTR TO JFCB WHICH CONTAINS 

MOUNTED VOL 

PTR TO VOL SER FIELD WHICH 

CONTAINS MOUNT 

PTR TO JFCB WHICH WILL HAVE 

VOL MOUNTED 

PTR TO VOL SER FIELD TO GET 



/ 



(Listing 


of 


CHASCB 


continued 


from ] 


page 3523 


LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 


7E 00060 






SCBOBT 

* 


DS 


OF 


7E 00060 






SCBRET 


DS 


OF 


7E 00060 






SCBSDT 


DS 


F 


7E 00064 






SCBPAR 


DS 


F 


7E 00068 






SCBKEY 


DS 


F 


7E 0006C 






SCBCHR 


DS 


F 


7E 00070 






SCBIOB 

SCBEXN 

♦ 


DS 


F 


7E 00074 






DS 


OF 


7E 00074 






SCBEXJ 


DS 


F 


7E 00078 






SCBEXD 


DS 


F 


7E 0007C 






SCBGVB 

* 

SCBGVJ 


DS 


OF 


7E 0007C 






DS 


F 


7E 00080 






SCBGVE 


DS 


F 


7E 00084 






SCBGAT 


DS 


OF 


7E 00084 






SCBGTC 


DS 


F 


7E 00088 






SCBGTO 


DS 


F 


7E 0008C 






SCBGT1 


DS 


F 


7E 00090 






SCBGTI 


DS 


F 


7E 00094 






SCBGT2 


DS 


F 




7E 


0008C 




|ORG| 


SCBGTI 


7E 0008C 






SCBWTO 


DS 


F 


7E 00090 






SCBWTI 


DS 


F 


7E 00094 






SCBWTZ 


DS 


F 


7E 00098 






SCBGOC 


DS 


F 




00000001 


SCBGMR 


EQU 


X f 01 f 




00000002 


SCBGMW 


EQU 


X f 02 - 




00000003 


SCBGMA 


EQU 


X'OS' 




00000004 


SCBGMS 


EQU 


X i 04 i 


7E 0009C 






SCBTIM 

* 


DS 


OF 


7E 0009C 






SCBTML 


DS 


F 


7E 000A0 






SCBTMO 


DS 


F 


7£ O0OA4 






SCBTMT 

♦ 


DS 


F 


7£ 000A8 






SCBRS1 


DS 


F 


7E 000AC 






SCBRS3 - 


DS 


F 


7E 000B0 






SCBRS4 


DS 


F 


7E 000B4 






SCBRS5 


DS 


F 


7E 000B8 






SCBVAR 


DS 


0CL32 


7E 00 OB 8 






SCBVLM 


DS 


H 


7E 00 OB A 






SCBVLP 


DS 


H 


7E OOOBC 






SCBPOS 


DS 


H 


7E OOOBE 






SCBIOZ 


DS 


H 


7E OOOCO 






SCBF3Z 


DS 


H 


(Listing 


of 


CHASCB 


continued 


on page 354) 



COMMENT 

MOUNT 

ADDR OF OBTAIN PARAMETER 

LIST 

ADDR OF RETAIN PARAMETER 

LIST 

PTR TO CHASDT WHICH HAS 

DSCBS TO BE PROC 

PTR TO A PACKED PAR 

AREA — (SCBTP1) 

PTR TO THE KEY USED BY 

OBTAIN — FM-1-DSCB 

PTR TO CCHHR FOR RETAIN 

PTR TO I/O BUFFER FOR 

OBTAIN/RETAIN 

ADDR OF EXTEND PARAMETER 

LIST 

PAR 1 OF EXTEND PAR 

LIST— PTR TO JFCB 

PAR 2 OF EXTEND PAR 

LIST — PTR TO SCBDSB 

ADDR OF GIVBKS PARAMETER 

LIST 

PTR TO JFCB 

PTR TO EXTENTS WITHIN DEB 

BEING RETURNED 

ADDR OF GATE PARAMETER LIST 

GATE PAR 1 — PTR TO GATE 

OP CODE — SCBGOC 

GATE PAR 2 — PTR TO OUTPUT 

MESSAGE 

GATE PAR 3 — PTR TO SIZE 

OF OUTPUT MESSG 

GATE PAR 4 — PTR TO INPUT 

MESSAGE 

GATE PAR 5 — PTR TO SIZE 

OF INPUT MESSG 

WTO PAR 1 — PTR TO OUTPUT 

MESSAGE 

WTO PAR 2 — PTR TO INPUT 

MESSAGE 

WTO PAR 3 — SIZE OF INPUT 

MESSAGE 

OPERATION CODE FOR 

GATE— PNTD TO BY GTC 

GATE OP CODE MASKS — READ 

GATE OP CODE MASKS — WRITE 

GATE OP CODE MASKS — WAR 

GATE OP CODE MASKS — WSR 

ADDR OF EBCBTIME PARAMETER 

LIST 

PTR TO OUTPUT MAP LENGTH 

PTR TO OUTPUT MAP 

PTR TO TIME TO BE 

CONVERTED, OR ZERO 

RESERVED 

RESERVED 

RESERVED 

RESERVED 

BEGINNING OF VARIABLE 

SECTION OF TABLE 

RELATIVE VOLUME SEQUENCE OF 

MOUNTED VOL 

RELATIVE VOLUME SEQUENCE OF 

VOL TO MOUNT 

TAPE POSITIONING PARAMETER 

I/O LABEL BUFFER SIZE 

SIZE OF BUFFER POINTED TO 
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(Listing of CHASCB continued from page 353) 



LOCATION INSTRUCTION SOURCE INST OPER 

* 

7E 000C2 SCBDBZ DS H 

7E OO0C4 SCBEXT DS H 

* 

7E 000C6 SCBTP1 DS X 

00000001 SCBOF1 EQU X'01' 

* 

00000000 SCBOF3 EQU X'00' 

* 

00000005 SCBOLB EQU X'05' 

7E 000C7 SCBTP2 DS X 

00000000 SCBRDS EQU X'00' 

00000001 SCBRLB EQU X'01' 

00000002 SCBRFM EQU X'02 f 
# 

7E 000C8 SCBCNT DS H 

7E 000CA SCBNXM DS X 

7E 000CB SCBFLG DS X 

00000080 SCBRF1 EQU X'.80' 

00000040 SCBOPN EQU X'40' 

00000020 SCBEOV EQU X'20* 

00000010 SCBCLS EQU X'10' 

00000008 SCBPOM EQU X'08' 
* 

00000001 SCBMUF EQU X'01* 

00000002 SCBMTF EQU X'02' 
7E 000CC SCBRVS DS H 

* 

7E 000CE SCBTLN DS H 

7E OOODO SCBRS6 DS 4H 

7E 000D8 SCBWRK DS 0DL3 

7E 000D8 SCBWK1 DS D 

7E 000E0 SCBWK2 DS D 

7L 000E8 SCBWK3 DS D 

7E 000F0 SCBEND EQU * 

O0O000F0 SCBSZF EQU SCBEND- 

00000020 SCBSZV EQU SCBWRK- 

* 

00000018 SCBSZW EQU SCBEND- 



COMMENT 

BY SCBFM3 

SIZE OF DEB BEING PROCESSED 

EXIT CODE USED FOR DCB EXIT 

LIST SCAN 

TYPE CODE FOR OBTAIN 

OBTAIN TYPE CODE FOR FMl 

DSCB'S 

OBTAIN TYPE CODE FOR 

FM3,4+5 DSCB'S 

OBTAIN TYPE CODE FOR LABELS 

TYPE CODE FOR RETAIN 

RETAIN TYPE CODE FOR DSCB'S 

RETAIN TYPE CODE FOR LABELS 

RETAIN TYPE CODE FOR FILE 

MARKS 

COUNT FOR RETAIN 

REL SEQUENCE OF NEXT EXTENT 

TO PROCESS 

FLAGS FOR INTER SAM MODULE 

COMMUNICATION 

REWRITE FMl DSCB WITH INT 

BIT OFF ONLY 

SCB INITIALIZED BY OPEN 

-CZCWO- 

SCB INITIALIZED BY EOV 

-CZCXE- 

SCB INITIALIZED BY CLOSE 

-CZCWC- 

INDICATOR FOR CZCWP TO 

RETURN TO CALLER ON ERROR 

USERS DEB IS TO BE MODIFIED 

TEMP DEB IS TO BE MODIFIED 

REL VOL SEQ TO CONVRT TO 

ADDR PTR--SCBVCA 

LENGTH OF OUTPUT MAP 

RESERVED 

BEGINNING OF WORK AREA 

WORK AREA 1 

WORK AREA 2 

WORK AREA 3 

END OF BLOCK 
CHASCB COMPLETE TABLE SIZE 
SCBVAR SIZE OF VARIABLE 

SECTION OF TABLE 
SCBWRK SIZE OF WORK AREA 

SECTION OF TABLE 
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Selector Channel Table (CHASCH) 

The Selector Channel Table (CHASCH) contains status information concerning the 
connection between a selector channel and its assigned control units. CHASCH occu- 
pies from 4 to 128 bytes of core storage, aligned on word boundaries. 

CHASCH Storage map 



DEC 




HEX 
Of 
I. 



SCHFLG 



SCHCTD 



_L 



Fields in CHASCH — by displacement 



DEC HEX FIELD 
0000 0000 SCHR 
0000 0000 SCHE 



DEC HEX FIELD 
(EQU) 0000 0000 SCHP 
CEQU) 0000 0000 SCHFLG 



DEC HEX FIELD 
IEQU) 0000 0000 SCHBEG 
0002 0002 SCHCTD 



Alphabetical list of fields in CHASCH 

FIELD DEC HEX 
SCHBEG 0000 0000 
SCHCTD 0002 0002 

Assembler listing of CHASCH 



FIELD DEC HEX FIELD 
SCHE 0000 0000 (EQU> SCHP 
SCHFLG 0#00 0000 SCHR 



DEC HEX 

0000 0000 (EQU) 

0000 0000 (EQU) 



( 



LOCATION INSTRUCTION SOURCE 

CHASCH 



7F 00000 



7F 00000 



7F 00000 



7F 00000 
00000080 
7F 00000 
00000040 
7F 00000 
00000020 
OO0OO0CO 



7F 00002 



* 

SCHBEG 

* 

SCHFLG 

SCHP 

SCHPM 

SCHE 

SCHEM 

SCHR 

SCHRM 

SCHA 

SCHCTD 



INST 
DSECT 

DS 



OPER 



OF 



DS 


XL2 


EQU 


SCHFLG 


EQU 


X , 80 i 


EQU 


SCHFLG 


EQU 


X'40' 


EQU 


SCHFLG 


EQU 


X^O' 


EQU 


x'co 1 


DS 


H 



COMMENT 

SELECTOR CHANNEL (N) TABLE 
(N = TO 31) 
ALIGN TABLE ON WORD 
BOUNDARY 
FLAG FIELD 

PARTITIONED FLAG AREA 
PARTITIONED MASK 
NONEXISTENT FLAG 
NONEXISTENT FLAG MASK 
RESERVED FLAG 
RESERVED MASK 
AVAILABILITY MASK 
CONTROL UNIT TABLE 
DISPLACEMENT 



* NOTES: 1- TABLE NONEXISTENT IN CONFIGURATIONS WITH NO SELECTOR CHANS* 

* 2- ENTRIES SEQUENTIAL. A SKIPPED UNIT RESERVES TABLE SPACE * 

* AND ITS ENTRY IS FLAGGED AS NON-EXISTENT. * 

* 3- SCH CANNOT ADDRESS TABLE ENTRIES ADDRESSED BY A CONTROL * 

* UNIT ASSIGNED TO THE MULTIPLEXOR CHANNEL TABLE (CHAMCH) . * 
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System Common (CHASCM) 

System Common (SCM) contains those system values referenced by command language 
object modules in two or more tasks. 

SCM, created by SYSGEN, has privileged protection and remains in the virtual 
storage of each active task from startup to shutdown time. 
SCM occupies 136 bytes of virtual storage, aligned on doubleword boundaries. 

CHASCM Storage map 



DEC 



HEX 



8 


8 


16 


10 


24 


18 


32 


20 


40 


28 


48 


30 


56 


38 


64 


40 


72 


48 


80 


50 


88 


58 


96 


60 


104 


68 



120 
128 



78 

80 



SCMMWT 



SCMLPR 



SCMCFM (CONT) 



SCMPFM (CONT) | SCMNCV | SCMREM 
± 



SCMTAP JSCMTA1 | SCMTA2 ISCMTA3 
I I I 



SCMPUN JSCMRDN | SCMPRN f SCMDET 

L_ 



SCMPSP 



SCMSSP 



S CMS ST 



SCMUL1 



SCMMAV 



SCMTTS 



SCMUN3 



SCMAUXLK|SCMIDP 
I 



l SCMIPL 



ISCMATH 



SCMPDC 



SCMCFM 



SCMPFM 



SCMNCP |SCMOCF | SCMBPR [SCMOMS 



SCMDA |SCMDA1 |SCMDA2 | SCMPTN 

JL 



SCMTDN |SCMORG | SCMLAB | SCMPRV 
I 1 I 



SCMPSC 



SCMSSC 



SCMUL2 



SCMIT 



SCMUN1 



SCMTPS 



SCMAUX 



SCMDA3 (SCMFIR ] 



SCMTIM 



SCMTIM (CONT) 



UNNAMED 



UNNAMED (CONT) | SCMMVD 



SCMATV 



SCMSPA 



RESERVED 



SCMQST 



SCMDSC 



Fields in CHASCM — by displacement 



DEC 


HEX 


FIELD 




DEC 


HEX 


FIELD 


DEC 


HEX 


FIELD 




0000 


0000 


SCMMWT 




0031 


001F 


SCMOMS 


0056 


0038 


SCMSST 




0008 


0008 


SCMLF 


(EQU) 


0032 


0020 


SCMTAP 


0058 


003A 


SCMUL1 




0008 


0008 


SCMLE 


(EQU) 


0033 


0021 


SCMTA1 


0061 


003D 


SCMUL2 




0008 


0008 


SCMLD 


(EQU) 


0034 


0022 


SCMTA2 


0064 


0040 


SCMMAV 




0008 


0008 


SCMLC 


(EQU) 


0035 


0023 


SCMTA3 


0068 


0044 


SCMITI 


(EQU) 


0008 


0008 


SCMLB 


(EQU) 


0036 


0024 


SCMDA 


0068 


0044 


SCMIT 




0008 


0008 


SCMLA 


(EQU) 


0037 


0025 


SCMDA 1 


0069 


0045 


SCMUN1 




0008 


0008 


SCMLP0 


(EQU) 


0038 


0026 


SCMDA2 


0072 


0048 


SCMTTS 




0008 


0008 


SCMLPR 




0039 


0027 


SCMPTN 


0076 


004C 


SCMTPS 




0009 


0009 


SCMLP1 


(EQU) 


0040 


0028 


SCMPUN 


0080 


0050 


SCMUN3 




0010 


000A 


SCMLT 


(EQU) 


0041 


0029 


SCMRDN 


0084 


0054 


SCMAUX 




0010 


000A 


SCMLP2 


(EQU) 


0042 


002A 


SCMPRN 


0088 


0058 


SCMAUXLK 




0011 


000B 


SCMLP3 


(EQU) 


0043 


002B 


SCMDET 


0089 


0059 


SCMIDP 




0012 


00 OC 


SCMPDC 




0044 


002C 


SCMTDN 


0090 


00 5A 


SCMIPL 




0014 


O00E 


SCMCFM 




0045 


002D 


SCMORG 


0091 


005B 


SCMATH 




0020 


0014 


SCMPFM 




0046 


002E 


SCMLAB 


0092 


005C 


SCMDA3 




0026 


001A 


SCMNCV 




0047 


002F 


SCMPRV 


0093 


005D 


SCMFIR 




0027 


001B 


SCMREM 




0048 


0030 


SCMPSP 


0094 


005E 


SCMTIM 




0028 


001C 


SCMNCP 




0050 


0032 


SCMSSP 


0106 


006A 


SCMLLER 


(EQU) 


0029 


001D 


SCMOCF 




0052 


0034 


SCMPSC 


0106 


006A 


SCMALER 


(EQU) 


0030 


001E 


SCMBPR 




0054 


0036 


SCMSSC 


0106 


006A 


SCMMV1 


(EQU) 


(Continued on page 


357) 
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(Continued from page 356) 



DEC 
0106 



HEX FIELD 



006A SCMMVD 
0107 006B SCMATV 



DEC HEX FIELD 
0109 006D SCMSPA 
012** 007C SCMDSC 



DEC HEX FIELD 
0128 0080 SCMQST 
0136 0088 SCWBDY 



Alphabetical list of fields in CHASCM 



FIELD 


DEC 


HEX 




FIELD 


DEC 


HEX 




FIELD 


DEC 


HEX 


SCMALER 


0106 


006A 


(EQU) 


SCMLD 


0008 


0008 


(EQU) 


SCMPSC 


0052 


0034 


SCMATH 


0091 


005B 




SCMLE 


0008 


0008 


(EQU) 


SCMPSP 


0048 


0030 


SCMATV 


0107 


006B 




SCMLF 


0008 


0008 


(EQU) 


SCMPTN 


0039 


0027 


SCMAUX 


008t* 


0054 




SCMLLER 


0106 


006A 


(EQU) 


SCMPUN 


0040 


0028 


SCMAUXLK 


0088 


0058 




SCMLPR 


0008 


0008 




SCMQST 


0128 


0080 


SCMBDY 


0136 


0088 




SCMLP0 


0008 


0008 


(EQU) 


SCMRDN 


0041 


0029 


SCMBPR 


0030 


001E 




SCMLP1 


0009 


0009 


(EQU) 


SCMREM 


0027 


001B 


SCMCFM 


0014 


000E 




SCMLP2 


0010 


000A 


(EQU) 


SCMSPA 


0109 


006D 


SCMDA 


0036 


0024 




SCMLP3 


0011 


000B 


(EQU) 


SCMSSC 


0054 


0036 


SCMDA1 


0037 


0025 




SCMLT 


0010 


000A 


(EQU) 


SCMSSP 


0050 


0032 


SCMDA 2 


0038 


0026 




SCMMAV 


0064 


0040 




SCMSST 


0056 


0038 


SCMDA3 


0092 


005C 




SCMMVD 


0106 


006A 




SCMTAP 


0032 


0020 


SCMDET 


0043 


002B 




SCMMV1 


0106 


006A 


(EQU) 


SCMTA1 


0033 


0021 


SCMDSC 


0124 


007C 




SCMMWT 


0000 


0000 




SCMTA2 


0034 


0022 


SCMFIR 


0093 


005D 




SCMNCP 


0028 


001C 




SCMTA3 


0035 


0023 


SCMIDP 


0089 


0059 




SCMNCV 


0026 


001A 




SCMTDN 


0044 


002C 


SCMIPL 


0090 


005A 




SCMOCF 


0029 


001D 




SCMTIM 


0094 


005E 


SCMIT 


0068 


0044 




SCMOMS 


0031 


001F 




SCMTPS 


0076 


004C 


SCMITI 


0068 


0044 


(EQU) 


SCMORG 


0045 


002D 




SCMTTS 


0072 


0048 


SGML A 


0008 


0008 


(EQU) 


SCMPDC 


0012 


000C 




SCMUL1 


0058 


003A 


SCMLAB 


0046 


002E 




SCMPFM 


0020 


0014 




SCMUL2 


0061 


003D 


SCMLB 


0008 


0008 


(EQU) 


SCMPRN 


0042 


002A 




SCMUN1 


0069 


0045 


SCMLC 


0008 


0008 


(EQU) 


SCMPRV 


0047 


002F 




SCMUN3 


0080 


0050 



Assembler listing of CHASCM 



LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 


COMMENT 




80 00000 


CHASCM 


DSECT 




SYSTEM COMMON 


80 00000 




SCMMWT 

* 


DS 


D 


MAXIMUM WAIT TIME FOR 
OPERATOR REPLY 


80 00008 




SCMLPR 


DS 


XL4 


INST. 


LEGITIMATE PRIVILEGE 






♦ 






CLASSES 




80 00008 


SCMLPO 


EQU 


SCMLPR 


FIRST 


PRIVILEGE CLASS BYTE 




80 00008 


SCMLA 


EQU 


SCMLPO 


CLASS 


A 




00000080 


SCMLAM 


EQU 


X'SO' 


CLASS 


A MASK 




80 00008 


SCMLB 


EQU 


SCMLPO 


CLASS 


B 




00000040 


SCMLBM 


EQU 


X'40' 


CLASS 


B MASK 




80 00008 


SCMLC 


EQU 


SCMLPO 


CLASS 


C 




00000020 


SCMLCM 


EQU 


X*20 f 


CLASS 


C MASK 




80 00008 


SCMLD 


EQU 


SCMLPO 


CLASS 


D 




00000010 


SCMLDM 


EQU 


X f 10 - 


CLASS 


D MASK 




80 00008 


SCMLE 


EQU 


SCMLPO 


CLASS 


E 




00000008 


SCMLEM 


EQU 


X f 08 f 


CLASS 


E MASK 




80 00008 


SCMLF 


EQU 


SCMLPO 


CLASS 


F 




00000004 


SCMLFM 


EQU 


X , 04 i 


CLASS 


F MASK 




80 00009 


SCMLP1 


EQU 


SCMLPR +1 


SECOND PRIVILEGE CLASS BYTE 




80 OOOOA 


SCMLP2 


EQU 


SCMLPR* 2 


THIRD 


PRIVILEGE CLASS BYTE 




80 OOOOA 


SCMLT 


EQU 


SCMLP2 


CLASS 


T 




00000010 


SCMLTM 


EQU 


X'lO 1 


CLASS 


T MASK 




80 0000B 


SCMLP3 


EQU 


SCMLPR +3 


FOURTH PRIVILEGE CLASS BYTE 


80 0000C 




SCMPDC 


DS 


H 


NUMBER OF PUBLIC DEVICES IN 
SYSTEM 


80 0000E 




SCMCFM 


DS 


6C 


INST. 


DEFAULT VALUE FOR 






* 






CARD FORMS 


80 00014 




SCMPFM 


DS 


6C 


INST. 


DEFAULT VALUE FOR 






* 






PRINTER FORMS 


80 0001A 




SCMNCV 


DS 


XL1 


RESERVED 
N386** 


80 0001B 




SCMREM 

* 


DS 


XL1 


RESERVED 
N386** 


80 0001C 




SCMNCP 

* 


DS 


XL1 


NON-CONV. ORDER PRIORITY, 
0=BATCH l=BULKIO 


(Listing 


Of CHASCM 


continued 


on pag 
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(Listing 


Of 


CHASCM 


continued 


from ] 


page 357) 




LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 




80 


0001D 






SCMOCF 

* 
* 
* 
SCMBPR 


DS 


C 




80 


0001E 






DS 


C 




80 


0001F 






SCMOMS 

* 


DS 


c 




80 


00020 






* 
SCMTAP 

* 
* 
* 
SCMTA1 


DS 


XL1 




80 


00021 






DS 


XL1 




80 


00022 






SCMTA2 
SCMTA3 


DS 


XL1 




80 


00023 






DS 


XL1 




80 


00024 






SCMDA 

* 


DS 


XL1 




80 


00025 






* 

SCMDAl 
* 
SCMDA2 


DS 


XL1 1 




80 


00026 






DS 


XL1 




80 


00027 






SCMPTN 


DS 


XL1 




80 


00028 






SCMPUN 


DS 


XL1 




80 


00029 






SCMRDN 


DS 


XL1 




80 


0002A 






SCMPRN 


DS 


XL1 




80 


0002B 






SCMDET 


DS 


XL1 




80 


0002C 






SCMTDN 

* 


DS 


XL1 




80 


0002D 






SCMORG 

* 


DS 


XL1 




80 


0002E 






SCMLAB 

* 


DS 


XL1 




80 


0002F 






* 
SCMPRV 


DS 


CL1 




80 


00030 






SCMPSP 

* 

SCMSSP 


DS 


H 




80 


00032 






DS 


H 




80 


00034 






SCMPSC 


DS 


H 




80 


00036 






SCMSSC 

* 

SCMSST 


DS 


H 




80 


00038 






DS 


H 




80 


0003A 






SCMUL1 


DS 


3C 




80 


0003D 






SCMUL2 

* 
SCMMAV 


DS 


3C 




80 


00040 






DS 


F 




80 


00044 






SCMIT 


DS 


XL1 








80 


00044 


SCMITI 

* 

SCMITIM 


EQU 


SCMIT 








00000080 


EQU 


X'80' 




80 


00045 






SCMUN1 


DS 


CL3 




80 


00048 






SCMTTS 

* 

SCMTPS 


DS 


F 




80 


0004C 






DS 


F 
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Of 
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COMMENT 

OPERATOR OR INSTALLATION 

DEFAULT 

VALUE FOR CONFIRMATION 

Y=YES N=NO 

INST. BATCH MONITOR 

INTERNAL PRIORITY 

OPERATOR OR INSTALLATION 

DEFAULT 

VALUE FOR MESSAGE OPTION 

M=FULL C=CODE 

INST. DEFAULT TAPE FLAG, 

00=9 TRACK A0=7 TRACK 

NO DATA CONVERSION E0=7 

TRACK DATA CONVERSION 

NUMBER OF 7 TRACK TAPES 

NUMBER OF 7 TRACK TAPES 

DATA CONVERSION 

NUMBER OF 9 TRACK TAPES 

INST. DEFAULT DIRECT ACCESS 

FLAG, 01=2311 04= 

2302 

NUMBER OF 2311 DIRECT 

ACCESS DEVICES 

NUMBER OF 2302 DIRECT 

ACCESS DEVICES 

NUMBER OF PAPER TAPES 

NUMBER OF PUNCHES 

NUMBER OF READERS 

NUMBER OF PRINTERS 

TOTAL NUMBER OF DEVICES 

INST. DEFAULT TAPE DENSITY 

FLAG, 03=200 43=500 

83=800 

INST. DEFAULT DATA SET 

ORGANIZATION FLAG, 

01=SAM 02=TAM 3=GAM 

04=VAMI 05=VAMS 06=VAMP 

INST. DEFAULT LABEL TYPE 

FLAG, 01=NONE(TAPE 

ONLY) 2=STANDARD 

04=STANDARD AND USER 

INST. DEFAULT PRIVILEGE 

CLASS, D=USER 

INST. DEFAULT PRIMARY PAGE 

SPACE ALLOCATION 

INST. DEFAULT SECONDARY 

PAGE SPACE ALLOCATION 

INST. DEFAULT PRIMARY CYLD. 

SPACE ALLOCATION 

INST. DEFAULT SECONDARY 

CYLD. SPACE ALLOCATION 

INST. DEFAULT SECONDARY 

TRACK SPACE ALLOCATION 

USER LIBRARY PRIMARY PAGE 

SPACE ALLOCATION 

USER LIBRARY SECONDARY PAGE 

SPACE ALLOCATION 

MAX AUX STORAGE AVAIL PLUS 

DELTA 

FLAG 

INHIBIT TASK INITIATION 

FLAG 

INHIBIT TASK INITIATION 

MASK 

UNUSED 

TOTAL TEMPORARY STORAGE 

ALLOCATION 

TOTAL PERMANENT STORAGE 



I 



(Listing of CHASCM continued from page 358) 



( 



LOCATION INSTRUCTION SOURCE 



INST OPER 











* 






80 


00050 






SCMUN3 


DS 


F 


80 


00054 






SCMAUX 
SCMAUXLK 


DS 


F 


80 


00058 






DS 


XL1 


80 


00059 






SCMIDP 

* 

SCMIPL 


DS 


XL1 


80 


0005A 






0S 


XL1 


80 


0005B 






SCMATH 


DS 


CL1 


80 


0005C 






SCMDA3 

* 

SCMFIR 


DS 


XL1 


80 


0005D 






DS 


C 


80 


0005E 






SCMTIM 


DS 


XL8 


80 


00066 








DS 


XL4 


80 


0006A 






SCMMVD 


DS 


XL1 






80 


0006A 


SCMMV1 


EQU 


SCMMVD 






00000080 


SCMMV1M 


EQU 


X'80' 






80 


0006A 


SCMALER 

* 

SCMALERM 


EQU 


SCMMVD 






00000040 


EQU 


X'40' 






80 


0006A 


SCMLLER 

* 

SCMLLERM 


EQU 


SCMMVD 






00000020 


EQU 


X'20 f 


80 


0006B 






SCMATV 


DS 


XL2 


80 


0006D 






SCMSPA 


DS 


XL12 


80 


0007C 






SCMDSC 


DS 


F 


80 


00080 






» 
SCMQST 


DS 


D 


80 


00088 






SCMBDY 


DS 


OX 






00000088 


SCMSZE 


EQU 


SCMBDY- 



COMMENT 
ALLOCATION 
UNUSED 

PRESENT AUX STORAGE SPACE 
AVAILABLE 

LOCK BYTE CONTROL FOR 
SCMAUX 

INST. DEFAULT EXTERNAL 
PRIORITY 

INST. DEFAULT PROMPT LIMIT 
INST. DEFAULT 

AUTHORIZATION, U=USER P=SYS PROG 
NUMBER OF 2314 DIRECT 
ACCESS DEVICES 
FORTRAN INTERRUPT RECOVERY 
USER-ESTIMATED RUNNING TIME 
RESERVED 

MULTI -VOLUME FLAGS 
MULTI-VOLUME PUBLIC D.S. 
NO MULTI-VOLUME PUBLIC D.S. 
BYPASS CHANGE MACRO FOR 
FUTHER ABENDS 

MASK TO BYPASS CHANGE MACRO 
BYPASS CHANGE MACRO FOR 
FUTHER LOGOFFS 
MASK TO BYPASS CHANGE MACRO 
ACV THRESHOLD VALUE 
RESERVED 

POINTER TO FORMAT E DSCB 
FOR QKSTART 

BITS 00-0 3 DSCB SLOT NUMBER 
BITS 04-15 REL. VOL. NUMBER 
BITS 16-31 REL. PAGE NUMBER 
DSNAME OF QKSTART TO BE 
CATALOGED 

END OF SYSTEM COMMON 
15943 
•SCMMWT SYSTEM COMMON SIZE 
15943 
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Scan Table (CHASCN) 



The Scan Table C SCANT) , a resident control table, serves to locate all GQEs repre- 
senting work-in-progress inside the supervisor. SCANT informs the supervisor con- 
cerning the storage location of the transient GQEs, at any time, by pointing to the 
first GQE in the GQE chain. 

SCANT remains private to the Queue Scanner routine, which includes Enqueue, 
Dequeue, Set Suppress Flags, and Move GQE. The size of SCANT is primarily determined 
at system generation (SYSGEN) time and depends upon the installation configuration. 

SCANT resides in core storage, aligned on doubleword boundaries, and contains one 
16-byte entry for each I/O device or supervisor facility. The four-byte fields 
within each entry completely relate the supervisor queue processors to their 
facilities. 

Note : One Scan Table entry is assigned for each I/O device or supervisor facility. 
The "processor pointer" field points to a unique processor for each entry with the 
exception of the I/O device entries. All I/O device processor SCANT entries point to 
the same processor program (since only one I/O device queue processor exists in the 
supervisor) . 

The functions of the flags are described below: 
SCNFB1 
Flag 0; Indicates work for processor remaining in the queue associated with this 

entry. Set by Interrupt Stacker or any processor via Enqueue or Move GQE rou- 
tine. Reset by any processor via Dequeue routine. 

SCNFQ (FQM EQU X f 80 f ) — Queue flag. 
Flags 1 through 7: Suppress Flags. Set by any processor via Set on Suppress Flag 

routine. Reset by any processor via Set Off Suppress Flag routine. Processor 

can not be activated if one or more flags are on. Meaning of each flag depends 

upon the processor associated with its table entry. 

SCNF1 (F1M EQU X'UO") — I/O in progress. 

SCNF2 CF2M EQU X'20 f ) — Path Busy. 

SCNF3 (F3M EQU X'10') 

SCNF4 (F4M EQU X'OS*) 

SCNF5 (F5M EQU X , 04 f ) 

SCNF6 (F6M EQU X , 02 f ) 

SCNF7 (F7M EQU X'Ol*) 
SCNLOK: Processor Lock Byte. Set by Queue Scanner. Reset by processor via 

Dequeue or Set Suppress Flag routines. A CPU is currently assigned to process 

entries from this queue. 



p 



CHASCN Storage map 



DEC 




HEX 



0|SCNFB1 (SCNIDX |SCNDID | SCNLOK | 

I I I I L 

8 J SCNFQE | 

I L 



SCNPRO 



SCNLQE 



ORG SCNPRO 



I. 



|SCNF3L0K| 



UNNAMED 



Fields in CHASCN — by displacement 



DEC HEX FIELD 
0000 0000 SCNF7 
0000 0000 SCNF6 
0000 0000 SCNF5 
0000 0000 SCNF4 
0000 0000 SCNF3 
0000 0000 SCNF2 



DEC HEX FIELD 

(EQU) 0000 0000 SCNF1 

(EQU) 0000 0000 SCNFQ 

(EQU) 0000 0000 SCNFB1 

(EQU) 0001 0001 SCNIDX 

(EQU) 0002 0002 SCNDID 

(EQU) 0003 0003 SCNLOK 



DEC HEX FIELD 
(EQU) 0004 0004 SCNF3LOK 
(EQU) 0004 0004 SCNPRO 
0008 0008 SCNFQE 
0012 000C SCNLQE 
0016 0010 SCNBDY 
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Alphabetical list of fields in CHASCN 



FIELD 

SCNBDY 

SCNDID 

SCNFB1 

SCNFQ 

SCNFQE 

SCNF1 



DEC HEX 
0016 0010 
0002 0002 
0000 0000 



FIELD DEC HEX FIELD 

SCNF2 0000 0000 CEQU) SCNF7 

SCNF3 0000 0000 (EQU) SCNIDX 

SCNF3LOK 0004 0004 SCNLOK 



0000 0000 CEQU) SCNF4 0000 0000 CEQU) SCNLQE 
0008 0008 SCNF5 0000 0000 CEQU) SCNPRO 



0000 0000 CEQU) SCNF6 



0000 0000 CEQU) 



DEC HEX 

0000 0000 CEQU) 

0001 0001 
0003 0003 
0012 000C 
0001* 0004 



Assembler listing of CHASCN 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 


COMMENT 






81 00000 


CHASCN 


DSECT 




SCAN TABLE 


81 


00000 






DS 


OF 




81 


00000 




SCNFB1 


DS 


XL1 


FLAG BYTE NUMBER 1 






81 00000 


SCNFQ 


EQU 


SCNFB1 


QUEUE FLAG 






00000080 


SCNFQM 


EQU 


X f 80 f 


QUEUE MASK 






0000007F 


SCNFQMC 


EQU 


X f 7F f 


QUEUE MASK COMPLEMENT 






81 00000 


SCNF1 


EQU 


SCNFB1 


I/O IN PROGRESS 






00000040 


SCNF1M 


EQU 


X f 40 f 








81 00000 


SCNF2 


EQU 


SCNFB1 


RESERVED 






00000020 


SCNF2M 


EQU 


X f 20' 


RESERVED 






81 00000 


SCNF3 


EQU 


SCNFB1 


-SUPPRESS FLAGS 






00000010 


SCNF3M 


EQU 


X'lO* 


-MEANING OF EACH DEPENDS 






81 00000 


SCNF4 


EQU 


SCNFB1 


-UPON THE PROCESSOR 






00000008 


SCNF4M 


EQU 


x , 08 t 


-ASSOCIATED WITH ITS 






81 00000 


SCNF5 


EQU 


SCNFB1 


-TABLE ENTRY 






00000004 


SCNF5M 


EQU 


X , 04* 


-PROCESSOR CANNOT BE 






81 00000 


SCNF6 


EQU 


SCNFB1 


-ACTIVATED IF ONE OR 






00000002 


SCNF6M 


EQU 


X f 02 f 


-MORE FLAGS ARE ON 






81 00000 


SCNF7 


EQU 


SCNFB1 








00000001 


SCNF7M 


EQU 


X'Ol 1 




81 


00001 




SCNIDX 


DS 


XL1 


CHBSST DISK INDEX 


81 


00002 




SCNDID 


DS 


XL1 


DIG CODE 


81 


00003 




SCNLOK 


DS 


XL1 


LOCK BYTE 


81 


00004 






DS 


OF 




81 


00004 




SCNPRO 


DS 


F 


PROCESSOR POINTER 






81 00004 


* 


IORG1 


SCNPRO 


REDEFINE FIELD 
M3532 


81 


00004 




SCNF3LOK 

* 


DS 


X 


SCNF3 LOCK BYTE 
M3532 


81 


00005 




* 


DS 


AL3 


THREE BYTE FILL 
M3532 


81 


00008 




SCNFQE 


DS 


F 


FIRST QUEUE ENTRY 


81 


ooooc 




SCNLQE 


DS 


F 


LAST QUEUE ENTRY 


81 


00010 




SCNBDY 


DS 


OX 


END OF SCAN TABLE 
15943 






00000010 


SCNSZE 


EQU 


SCNBDY- 


•SCNFB1 SCAN TABLE SIZE 
15943 
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Supervisor Core Control CHASCT) 

The Supervisor Core Control CSCT) table indicates the availability of portions of 
pages C64 byte blocks), which can be temporarily allocated to the supervisor for 
bookkeeping operations, such as GQEs, PCBs, etc. 

The SCT, a resident table, is privately maintained by the supervisor core control 
subroutine. Each table entry appears in the first block of each page currently used 
by SCT. 

Note 1 . The byte length for availability bits is variable and depends on block size. 
The block size is initially set at 24 bytes but can vary from 32 through 2048 bytes. 
Note 2 . The size of each table entry equals the block size. 
Mote 3 . Flags field is currently unused. 



CHASCT Storage map 



DEC HEX 


















0| 
1 






SCTFLK 






SCTBLK 




8 81 
1 






SCTIDE 




(SCTZZZ1 


| SCTFLG | 
\ I 


SCTAVC | 


16 10) 
i 






SCTAV1 






SCTAV2 




Fields in CHASCT — by displacement 










DEC HEX FIELD 
0000 0000 SCTFLK 


DEC 
0012 


HEX 
OOOC 


FIELD 
SCTZZZ1 


DEC HEX 
0016 001C 


FIELD 
SCTAV1 


0004 0004 SCTBLK 


0013 


000D 


SCTFLG 


0016 0010 


SCTAVB 


0008 0008 SCTIDE 


0014 


000E 


SCTAVC 


0020 0014 


SCTAV2 


Alphabetical list of 


fields in CHASCT 










FIELD 
SCTAVB 


DEC 
0016 


HEX 
0010 


FIELD 
SCTAV2 


DEC HEX 
0020 0014 


FIELD 
SCTFLK 


DEC HEX 
0000 0000 


SCTAVC 


0014 


000E 


SCTBLK 


0004 0004 


SCTIDE 


0008 0008 


SCTAV1 


0016 


0010 


SCTFLG 


0013 OO0D 


SCTZZZ1 


0012 OOOC 


Assembler listinq of 


CHASCT 












LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 


COMMENT 








82 00000 


CHASCT 


DSECT 


SUPERVISOR CORE CONTROL 










* 






TABLE 




82 


00000 








DS 


OF 






82 


00000 






SCTFLK 


DS 


F 


FORWARD LINK 




82 


00004 






SCTBLK 


DS 


F 


BACKWARD LINK 




82 


00008 






SCTIDE 


DS 


F 


SFVR CORE CONTROL PAGE 










* 






IDENT 




82 


ooooc 






SCTZZZ1 


DS 


XL1 


UNUSED 




82 


OOO0D 






SCTFLG 


DS 


XL1 


FLAGS 




82 


0000E 






SCTAVC 


DS 


XL2 


COUNT OF AVAIL BLKS IN PAGE 


82 


00010 






SCTAVB 


DS 


OF 


AVAILABILITY 


BITS 


82 


00010 






SCTAV1 


DS 


F 


WORD 1 




82 


00014 






SCTAV2 


DS 


F 


WORD 2 
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Symbolic Device Allocation Table ICHASDA) 



c 



The Symbolic Device Allocation Table CSDA) provides information on the status and 
characteristics of each allocable I/O device in the system. 
SDA resides in virtual storage , aligned on doubleword boundaries. 

SDA has an 8 byte header and a variable number of 64 byte entries. The entries 
are contiguous and are initialized by Device Management. Each entry is divided into 
a 32 byte fixed format area and a 32 byte device dependent area. 



CMASDA Storage map 



DEC 


HEX 
I 

I 
10| 

1 
18| 

i 

20 | 

i 

281 

I 
301. 

I 
38| 

I 
40) 

I 

*-4 























SDAHPS 








SDAHAL | 


8 


5DALOC (SDAFLA 

1 


1 


SDASDA 






SDADEV | 


16 


SDATID 




\ 


SDAMRfi 




|SDAUSC JSDAFLB 
I 1 


| SDADCE | SDADM4 | 
i t 1 


24 










SDAUID 






32 


SDATAP 




1 

\ 








S DAVID 




40 


SDADM2 




1 

1 


SDANLC 




1 


SDALCS 


| SDATRL | 
i I 


48 


5DAOHI (SDAOHL 

1 


|SDAOHK |SDADFL 
1 1 


I 
I 


SDATOL 


| SDADPT | SDADBT | 
1 1 1 


56 






SDAVTC 






| SDAPLO 

1 


JSDADN JSDAGSC | 
1 i 1 


64 




SDAGSR 






1 
i 


SDANPS | 


ORG 



















12 



JSDADEA |SDADEB | SDADEC | SDADED | 



± 



ORG SDADM2 



40 



28) 



SDAPLM 



ORG SDADW2 



40 



281 



SDASPC 



ORG SDALCS 



44 
48 



2C 

301 



i. 



SDAPID 



SDAPST 



ORG SDAVTC 



56 



381 



SDAPTO 



SDAPVMA 



A 
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CCHASDA continued from page 363) 



DEC 


HEX 
























ORG 


SDAPLO 
3D 
























61 


| SDAVLC | 




ORG 


SDADN 
3E 
♦-4 
























62 


SDAINV | 

1 




ORG 








64 


40) 

i 


5 DAGS A 


1 

I 


5DAGSB 






ORG 


SDAGSR 
















64 


40) 

1 




SDAPSM 










ORG 


SDAPSM 
















64 


40| 


S DAD AM 


1 
i 


SDAPAM 






ORG 


S DAT AM 
















40 


28 | 

1 
30| 

J 










SDAFORMN 












48 


I 

J 




SDACARRG 








SDACHTRN 




56 


38 J SDACHTRN (CONT) 

I 


|SDADEN | 






SDAURSKY 








64 


40|SDAURSKY| 

\ i 








SDAUCSKY 








|SDAFOLD 1 
* 1 


Fields 


in CHASDA 


— by displacement 




















DEC 


HEX 


FIELD 




DEC 


HEX 


FIELD 




DEC 


HEX 


FIELD 






0000 


0000 


SDAHPS 




0021 


0015 


SDAAM 


CEQU) 


0048 


0030 


SDAPID 






0004 


0004 


SDAHAL 




0021 


0015 


SDAAX 


CEQU) 


0048 


0030 


SDAOHI 






0008 


0008 


SDALOC 




0021 


0015 


SDAFLB 




0049 


0031 


SDAOHL 






0008 


0008 


SDATEN 




0022 


0016 


SDAIOR 


CEQU) 


0050 


0032 


SDACARRG 






0009 


0009 


SDACE 


CEQU) 


0022 


0016 


SDAIREQ 


CEQU) 


0050 


0032 


SDAOHK 






0009 


0009 


SDAW 


CEQU) 


0022 


0016 


SDADCE 




0051 


0033 


SDAX07 


CEQU) 




0009 


0009 


SDASD 


CEQU) 


0023 


0017 


SDASF 


CEQU) 


0051 


0033 


SDAX06 


CEQU) 




0009 


0009 


SDAPH 


CEQU) 


0023 


0017 


SDAPF 


CEQU) 


0051 


0033 


SDAX05 


CEQU) 




0009 


0009 


SDAPR 


CEQU) 


0023 


0017 


SDADM4 




0051 


0033 


SDADFL 






0009 


0009 


SDAAV 


IEQU) 


0024 


0018 


SDAUID 




0052 


0034 


SDATOL 






0009 


0009 


SDAFLA 




0032 


0020 


SDATAP 




0054 


0036 


SDACHTRN 






0010 


000A 


SDASDA 




0034 


0022 


SDAVID 




0054 


0036 


SDADPT 






0012 


OOOC 


SDADEA 




0040 


0028 


SDAFORMN 




0055 


0037 


SDADBT 






0012 


oooc 


SDADEV 




0040 


0028 


S DAS PC 




0056 


0038 


SDAPTO 






0013 


000D 


SDADEE 




0040 


0028 


SDAPLM 




0056 


0038 


SDAVTC 






0014 


000E 


SDADEC 




0040 


0028 


SDADM2 




0058 


003A 


SDADEN 






0015 


000F 


SDADED 




0040 


0028 


SDATM1 




0058 


003A 


SDAPVMA 






0016 


0010 


SDATID 




0040 


0028 


SDATAM 




0059 


003B 


SDAURSKY 






0018 


0012 


SDAMRB 




0041 


0029 


SDATM2 


CEQU) 


0061 


003D 


SDAVLC 






0020 


0014 


SDAUSC 




0042 


002A 


SDANLC 




0061 


003D 


SDAPLO 






0021 


0015 


SDARNG 


CEQU) 


0042 


002A 


SDATM3 


CEQU) 


0062 


003E 


SDAINV 






0021 


0015 


SDALAB 


CEQU) 


0044 


002C 


SDAPST 




0062 


003E 


SDADN 






0021 


0015 


SDAVT 


CEQU) 


0044 


00 2C 


SDALCS 




0063 


003F 


SDAGSC 






0021 


0015 


SDAPP 


CEQU) 


0046 


002E 


SDATRL 




0064 


0040 


SDADAM 






(Continued on page 365) 



















364 CHASDA 



(Continued from page 364) 



DEC HEX 


FIELD 




DEC HEX 


FIELD 




DEC HEX 


FIELD 




0064 0040 SDAPSM 




0066 0042 SDAPAM 




0072 0048 SDAND 




0064 0040 SDAGSA 




0066 0042 SDAGSB 




0072 0048 SDAEND 


(EQU) 


0064 0040 SDAGSR 




0068 00 44 SDANPS 












0065 0041 SDAUCSKY 




0071 0047 SDAFOLD 












list of 


fields in 


CHASD, 


h 
FIELD 


DEC 


HEX 




FIELD 


DEC 


HEX 




FIELD 


DEC 


HEX 






SDAAM 


0021 


0015 


(EQU) 


SDAGSR 


0064 


0040 




SDARNG 


0021 


0015 


(EQU) 


SDAAV 


0009 


0009 


(EQU> 


SDAHAL 


0004 


0004 




SDASD 


0009 


0009 


(EQU) 


SDAAX 


0021 


0015 


(EQU) 


SDAHPS 


0000 


0000 




SDASDA 


0010 


O00A 




SDACARRG 


0050 


0032 




SDAINV 


0062 


003E 




SDASF 


0023 


0017 


(EQU) 


SDACE 


0009 


0009 


(EQU) 


SDAIOR 


0022 


0016 


(EQU) 


SDASPC 


0040 


0028 




SDACHTRN 


0054 


0036 




SDAIREQ 


0022 


0016 


(EQU) 


S DAT AM 


0040 


0028 




SDADAM 


0064 


0040 




SDALAB 


0021 


0015 


(EQU) 


SDATAP 


0032 


0020 




SDADBT 


0055 


0037 




SDALCS 


0044 


002C 




SDATEN 


0008 


0008 




SDADCE 


0022 


0016 




SDALOC 


0008 


0008 




SDATID 


0016 


0010 




SDADEA 


0012 


000C 




SDAMRB 


0018 


0012 




SDATM1 


0040 


0028 




SDADEB 


0013 


O00D 




SDAND 


0072 


0048 




SDATM2 


0041 


0029 


(EQU) 


SDADEC 


0014 


000E 




SDANLC 


0042 


002A 




SDATM3 


0042 


002A 


(EQU) 


SDADED 


0015 


000F 




SDANPS 


0068 


0044 




SDATOL 


0052 


0034 




SDADEN 


0058 


003A 




SDAOHI 


0048 


0030 




SDATRL 


0046 


002E 




SDADEV 


0012 


000C 




SDAOHK 


0050 


0032 




SDAUCSKY 


0065 


0041 




SDADFL 


0051 


0033 




SDAOHL 


0049 


0031 




SDAUID 


0024 


0018 




SDADM2 


0040 


0028 




SDAPAM 


0066 


0042 




SDAURSKY 


0059 


003B 




SDADM4 


0023 


0017 




SDAPF 


0023 


0017 


(EQU) 


SDAUSC 


0020 


0014 




SDADN 


0062 


003E 




SDAPH 


0009 


0009 


(EQU) 


SDAVID 


0034 


0022 




SDADPT 


0054 


0036 




SDAPID 


0048 


0030 




SDAVLC 


0061 


003D 




SDAEND 


0072 


0048 


(EQU) 


SDAPLM 


0040 


0028 




SDAVT 


0021 


0015 


(EQU) 


SDAFLA 


0009 


0009 




SDAPLO 


0061 


003D 




SDAVTC 


0056 


0038 




SDAFLB 


0021 


0015 




SDAPP 


0021 


0015 


(EQU) 


SDAW 


0009 


0009 


(EQU) 


SDAFOLD 


0071 


0047 




SDAPR 


0009 


0009 


(EQU) 


SDAX0 5 


0051 


0033 


(EQU) 


SDAFORMN 


0040 


0028 




SDAPSM 


0064 


0040 




SDAX06 


0051 


0033 


(EQU) 


SDAGSA 


0064 


0040 




SDAPST 


0044 


002C 




SDAX07 


0051 


0033 


(EQU) 


SDAGSB 


0066 


0042 




SDAPTO 


0056 


0038 












SDAGSC 


0063 


003F 




SDAPVMA 


0058 


003A 













Assembler listing of CHASDA 



i 



LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 




83 


00000 


CHASDA 


DSECT 




83 00000 






♦ 


DS 


0D 


83 00000 






SDAHPS 


DS 


F 


83 00004 






SDAHAL 


DS 


F 


83 00008 






$ 


DS 


OD 


83 00008 






SDATEN 


DS 


0CL64 


83 00008 






SDALOC 


DS 


XL1 


83 00009 






SDAFLA 


DS 


XL1 




83 


00009 


SDAAV 


EQU 


SDAFLA 




00000080 


SDAAVM 


EQU 


X f 80' 


~ 


83 


00009 


SDAPR 


EQU 


SDAFLA 




00000040 


SDAPRM 


EQU 


X^O* 




83 


00009 


SDAPH 


EQU 


SDAFLA 




00000020 


SDAPHM 


EQU 


X , 20 t 




83 


00009 


SDASD 


EQU 


SDAFLA 




00000010 


SDASDM 


EQU 


X f 10 f 




83 


00009 


SDAW 


EQU 


SDAFLA 




00000008 


SDAWM 


EQU 


X f 08 f 




83 


00009 


SDACE 


EQU 


SDAFLA 




00000004 


SDACEM 


EQU 


X , 04 t 


(Listing 


Of 


CHASDA 


continued 


on pag 


e 366) 



COMMENT 

SYMBOLIC DEVICE 

ALLOCATION TABLE 

ALIGN TO DOUBLE WORD 

BOUNDARY 

FIRST PUBLIC DEVICE 

ADDRESS OF LAST ENTRY 

ALIGN TO DOUBLE WORD 

BOUNDARY 

SDAT ENTRY 

ENTRY LOCK BYTE X'FF' - IN 

USE 

FIRST FLAG BYTE 

AVAILABLE FLAG 1= AVAILABLE 

PARTITIONED FLAG 1= 
PART ION ED 

DETACHED FLAG 1=DETACHED 

SYSTEM DEVICE FLAG 

1 = RESERVED 

VOLUME VERIFICATION FLAG 

1 = VERIFIED 

DEVICE HELD BY MAIN 

OPERATOR N393 

1=HELD, SET BY HOLD AND 



CHASDA 365 



(Listing of CHASDA continued from page 365 > 





LOCATION 


INSTRUCTION SOURCE 


INST 


QPER 


COMMENT 










♦ 






N393 










* 






RESET BY DROP 










♦ 






N393 




83 


0000A 




SDASDA 


DS 


H 


SYMBOLIC DEVICE ADDRESS 




83 


OOOOC 






DS 


OF 






83 


ooooc 




SDADEV 


DS 


XL4 


DEVICE CODE 








83 OOOOC 




I ORG) 


*-4 


SUBFIELD ALIGNMENT 




83 


OOOOC 




SDADEA 


DS 


XL1 


MODEL CODE 








00000001 


SDAMCA 


EQU 


x-oi 1 


1050 TERMINAL SYSTEM MASK 
- TAM 








00000002 


SDAMCB 


EQU 


X , 02' 


2741 TERMINAL MASK - TAM 








00000003 


SDAMCC 


EQU 


X'03' 


MOD 35 TTY MASK - TAM 








00000004 


SDAMCD 

* 


EQU 


X , 04 f 


1052 - MOD 7 TERMINAL MASK 
- TAM 








00000000 


SDAANT 


EQU 


X f 00' 


MODEL NOT A TERMINAL 




83 


OOOOD 




SDADEB 


DS 


XL1 


DEVICE CLASS 








00000001 


SDADCA 


EQU 


X'Ol 1 


DIAL LINE MASK - TAM 








00000002 


SDADCB 


EQU 


X , 02" 


DEDICATED LINE MASK - TAM 








00000004 


SDADCD 


EQU 


X , 04 f 


AUTOMATIC CALL FEATURE - 
TAM 








00000008 


SDABUR 


EQU 


X'08* 


DEVICE CLASS UNIT RECORD 








00000020 


SDABDA 


EQU 


X - 20' 


DEVICE CLASS DIRECT ACCESS 








00000080 


SDABMT 


EQU 


X'80' 


DEVICE CLASS MAGNETIC TAPE 








00000040 


SDARJE 


EQU 


X^O' 


REMOTE JOB ENTRY DEVICE 




83 


0000E 




SDADEC 


DS 


XL1 


UNIT TYPE 








00000010 


SDAUT1 

* 


EQU 


X f 10« 


IBM TERMINAL CONTROL TYPE 1 
MASK - TAM 








00000020 


SDAUT2 

* 


EQU 


X^O' 


IBM TERMINAL CONTROL TYPE 2 
MASK - TAM 








00000030 


SDAUT3 

* 


EQU 


X*30' 


TELEGRAPH CONTROL TYPE 1 
MASK - TAM 








00000040 


SDAUT4 

* 


EQU 


X'40' 


TELEGRAPH CONTROL TYPE 2 
MASK - TAM 








00000080 


SDAUT5 

* 


EQU 


x-so - 


WORLD TRADE TERMINAL 
CONTROL MASK - TAM 








00000001 


SDAUTA 

* 


EQU 


X - 01' 


2702 TRANSMISSION CONTROL 
MASK - TAM 








00000002 


SDAUTB 

* 


EQU 


X'02 f 


2701 ON MULTIPLEXOR CHANNEL 
- TAM 








00000003 


SDAUTC 

* 


EQU 


X^' 


MULTIPLEXOR CHANNEL MASK - 
TAM (1052-7) 








00000004 


SDAUTD 

* 


EQU 


X'04' 


SELECTOR CHANNEL MASK - TAM 
(1052-7) 








00000005 


SDAUTE 


EQU 


X'05' 


2701 ON SELECTOR CHANNEL 








00000006 


SDAUTF 


EQU 


X , 06 i 


2703 TRANSMISSION CONTROL 








00000001 


SDACRD 

* 


EQU 


X'Ol 1 


2540 OR 2780 CARD READER 
15650 








00000002 


SDACPN 


EQU 


X'02 - 


2540 CARD PUNCH 








00000008 


SDACPT 

* 


EQU 


X'08 f 


1403 OR 2780 PRINTER 
15650 








00000010 


SDAPPT 


EQU 


X'lO" 


2671 PPT READER 








00000001 


SDADA11 


EQU 


X'01 1 


2311 D/A 








00000002 


SDADA01 


EQU 


X , 02 t 


2301 D/A 








00000003 


SDADA21 


EQU 


X , 03 t 


2321 D/A 








00000008 


SDADA14 


EQU 


X«08 f 


2314 D/A 








00000001 


SDATAPE 


EQU 


X'Ol* 


2400 SERIES 




83 


0000F 




SDADED 


DS 


XL1 


OPTIONAL FEATURES 








00000010 


SDAOFA 

* 


EQU 


X'lO' 


IBM LINE ADAPTER TYPE 1 - 
TAM 








00000020 


SDAOFB 


EQU 


X'20' 


IBM LINE ADAPTER TYPE 2 - 
TAM 








00000030 


SDAOFC 


EQU 


X f 30' 


DATA SET LINE ADAPTER - TAM 








00000040 


SDAOFD 

* 


EQU 


X'40' 


AUTOMATIC CALL ADAPTER - 
TAM 








00000050 


SDAOFE 

* 


EQU 


X f 50" 


TELEGRAPH LINE ADAPTER - 
TAM 








00000000 


SDAOF1 


EQU 


X'00 f 


SAD ZERO MASK - TAM 








00000001 


SDAOF2 


EQU 


X'01 f 


SAD ONE MASK - TAM 




(Listing 


of CHASDA 


continued 


on page 367) 




66 CHASDA 

















(Listing of CHASDA continued from page 366) 



c 



LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 






00000002 


SDAOF3 


EQU 


X , 02 t 






00000003 


SDAOF4 


EQU 


X , 03 l 






00000040 


SDAPFR 


EQU 


X^O' 






00000080 


SDAOCI 


EQU 


x'so' 






00000080 


SDADUC 


EQU 


x'so - 






00000080 


SDASCN 


EQU 


x^o- 






00000040 


SDATRV 


EQU 


X f 40 f 






0O00OOB0 


SDASTO 


EQU 


X f B0' 






000000E0 


SDATPW 


EQU 


X'EO' 






000000A0 


SDATPN 

4c 


EQU 


X f A0' 






O0O0O0C0 


SDATR9 


EQU 


X'CO' 






00000080 


SDATP9 


EQU 


X f 80 f 


83 


00010 




SDATID 


DS 


H 


83 


00012 




SDAMRB 


DS 


H 


83 


00014 




SDAUSC 


DS 


XL1 


83 


00015 




SDAFLB 


DS 


XL1 






83 00015 


SDAAX 


EQU 


SDAFLB 






00000080 


SDAAXM 


EQU 


X^O' 






83 00015 


SDAAM 


EQU 


SDAFLB 






00000040 


SDAAMM 


EQU 


X'40' 






83 00015 


SDAPP 


EQU 


SDAFLB 






00000020 


SDAPPM 


EQU 


X'20 - 






83 00015 


SDAVT 


EQU 


SDAFLB 






00000010 


SDAVTM 


EQU 


X'lO' 






83 00015 


SDALAB 


EQU 


SDAFLB 






00000008 


S DAL ABM 


EQU 


X f 08 f 






83 00015 


SDARNG 

* 


EQU 


SDAFLB 






00000004 


SDARNGM 

♦ 


EQU 


X i 04 i 


83 


00016 




SDADCE 


DS 


X 






00000001 


SDADC1 


EQU 


X f 01 f 






00000002 


SDADC2 


EQU 


X , 02' 






00000003 


SDADC3 


EQU 


X , 03 i 






00000004 


SDADC4 


EQU 


X , 04" 






00000005 


SDADC5 


EQU 


X'OS" 






83 00016 


SDAIREQ 


EQU 


SDADCE 






83 00016 


SDAIOR 


EQU 


SDAIREQ 






00000008 


SDAIOM 


EQU 


X f 08 f 


83 


00017 




SDADM4 


DS 


XL1 






83 00017 


SDAPF 


EQU 


SD ADM4 






00000080 


SDAPFM 


EQU 


x'so* 






83 00017 


SDASF 


EQU 


SDADM4 






00000040 


SDASFM 


EQU 


X^O' 


83 


00018 




SDAUID 


DS 


CL8 


83 


00020 




SDATAP 


DS 


H 


83 


00022 




SDAVID 


- DS 


XL6 


83 


00028 




SDATAM 


DS 


0CL3 


83 


00028 




SDATM1 


DS 


0XL1 






83 00029 


SDATM2 


EQU 


SDATM1+1 






83 0002A 


SDATM3 


EQU 


SDATM1+2 






00000001 


SDATM4 


EQU 


X , 01 f 






00000002 


SDATM5 


EQU 


X , 02 f 


83 


00028 




SDADM2 


DS 


CL2 






83 00028 




(ORG) 


SDADM2 


83 


00028 




SDAPLM 


DS 


XL2 






83 00028 




|ORG| 


SDADM2 


83 


00028 




SDASPC 


DS 


H 


(Listing 


of CHASDA 


continued 


on page 368) 



COMMENT 

SAD TWO MASK - TAM 

SAD THREE MASK - TAM 

PUNCH FEED READ 

CARD IMAGE 

UNIVERSAL CHARACTER SET - 

(PTR) 

SCAN - D/h 

TRACK OVERFLOW - D/h 

SCAN AND TRACK OVERFLOW - 

D/A 

7-TRACK WITH DATA 

CONVERSION 

7-TRACK WITHOUT DATA 

CONVERSION 

9 -TRACK TAPE 

9 -TRACK TAPE 

TASK ID 

MAX NUMBER OF IORCB'S 

USER COUNT 

SECOND FLAG BYTE 

STORAGE FLAG 0=AUXILIARY 

1 = EXTERNAL 

V/S FLAG 0=VAM; 1=SAM 

1 = SAM 

PUBLIC AND PRIVATE 

= PRIVATE) 1= PUBLIC 

LOW VTOC COUNT l=COW 

LABELLED TAPE INDICATOR 

N373** 
LABELLED TAPE MASK 

N373** 
FILE PROTECT RING IN FOR 
WRITING N373** 

FILE PROTECT RING IN MASK 

N373** 
KEYBOARD TYPE 
1050 PTTC/8 (FOLDED) 
2741 CORRESPONDENCE 
(FOLDED) 

2741 PTTC/B (FOLDED) 
TTY35 ASCII (FOLDED) 
1052-7 EBCDIC 
IOREQ FLAG BYTE 
IOREQ ALLOWED FLAG 
IOREQ ALLOWED MASK 
THIRD FLAG BYTE 
STATUS OF 
V-CON f l# PRIVILEGED 

ASYNC INTERRUPT SUPPRESS 1= 
YES 

USER ID 

TAPE POSITION CODE 

VOLUME ID 

TAM WORK AREA 

TAM DCB COUNT 

TAM ACTIVE IORCB COUNT 

OPERATION CODE 

READ OP CODE 

WRITE OP CODE 



PAT TABLE LOCK BIT MASK 
ONE BIT FOR EACH PAT PAGE 

TOTAL SPACE CAPACITY OF 



CHASDA 367 



(Listing of CHASDA continued from page 367) 





LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 




83 0002A 






SDANLC 

* 


DS 


H 




83 0002C 






SDALC3 

* 


DS 


H 




83 0002E 






SDATRL 


DS 


H 




83 00030 






SDAOHI 


DS 


XL1 




83 00031 






SDAOHL 

* 


DS 


XL1 






83 


0002C 


)ORG| 


SDALCS 




83 0002C 






SDAPST 


DS 


A 




83 00030 






* 
SDAPID 

4 s 


DS 


XL2 




83 00032 






SDAOHK 


DS 


XL1 




83 00033 






SDADFL 


DS 


XL1 






83 


00033 


SDAX05 


EQU 


SDADFL 






00000004 


SDAM05 


EQU 


X , 04 f 






83 


00033 


SDAX06 


EQU 


SDADFL 






00000002 


SDAM06 


EQU 


X'02' 






83 


00033 


SDAX07 


EQU 


SDADFL 






00000001 


SDAM07 


EQU 


X f 01 f 




83 00034 






SDATOL 

* 


DS 


H 




83 00036 






* 
SDADPT 


DS 


XL1 




83 00037 






SDADBT 


DS 


XL1 




83 00038 






SD AVTC 


DS 


XL 5 






83 


00038 




|ORG| 


SDAVTC 




83 00038 






SDAPTO 


DS 


H 




83 0003A 






SDAPVMA 

* 


DS 


XL3 




83 0003D 






* 
SDAPLO 


DS 


XL1 






83 


0003D 




|ORG| 


SDAPLO 




83 0003D 






SDAVLC 

* 

SDADN 


DS 


XL1 




83 0003E 






DS 


XL1 






00000003 


SDADN1 


EQU 


X , 03* 






00000043 


SDADN 2 


EQU 


X'43 f 






00000083 


SDADN3 


E£U 


X'83' 






83 


0003E 


SDAINV 


IQRGl 


SDADN 




83 0003E 






DS 


X 






00000080 


SDAINVM 

* 


EQU 


X'80' 




83 0003F 






SDAGSC 

* 


DS 


XL1 




83 00040 






* 
SDAGSR 


DS 


F 






83 


00040 


SDAGSA 


IQRGj 


*-4 




83 00040 






DS 


H 




83 00042 






SDAGSB 


DS 


H 






83 


00040 


* 


|ORG| 


SDAGSR 




83 00040 






SDAPSM 


DS 


F 




(Listing 


Qf 


CHASDA 


continued 


on page 369) 


368 CHASDA 















COMMENT 

VOLUME 

NO OF LOGICAL 

CYLINDERS/VOLUME 

VOLUME 

NO OF TRACK/LOGICAL 

CYLINDER 

CYLINDERS 

NO OF AVAILABLE BYTES/TRACK 

TRACK 

OVERHEAD FOR KEYED RECORD 

OVERHEAD FOR LAST KEYED 

RECORD ON TRACK 

PSECT ADDR OF MODULE WHICH 

N333.1 
REQUIRED LOCK SET 

N333.1 
TASKID WHICH SET SDAPLO 
LOCK N333.1 
OVERHEAD BYTES TO BE 
SUBTRACTED IF NO KEY 
FLAG FIELD 
CCHH IS USED AS IN 2301 

CCHH IS USED AS IN 2321 

TOLERANCE MUST BE APPLIED 

TOLERANCE/ 5 12 GIVES 

EFFECTIVE 

LENGTH OF RECORD 

DSCB/ TRACK 

DIRECTORY BLOCKS/TRACK 

VTOC ADDRESS 

VOL. PG. NO. OF 1ST PG. OF 

PAT TABLE 

CONTAINS THE HI-ORDER 24 

BITS OF 

THE 32-BIT V.M. ADDR. OF 

PAT TABLE 

PAT TABLE LOCK BYTE 

VTOC LOCK BYTE X'FF' - IN 

USE 

TAPE DENSITY 

200 BPI 

556 BPI 

800 BPI 

REDEFINE FIELD 

N472 
FLAG BYTE 

N472 
INVALID PAT ON THIS VOLUME 

N472 
GROSS AVAILABLE FLAG X'FF' 
IF 

GSA AND GSB ARE VALID 
FOR VAM-TOTAL NUMBER OF 
AVAILABLE PAGES 
FOR SAM-NUMBER OF COMPLETE 
CYLINDERS 
AVAILABLE 

FOR SAM NUMBER OF TRACKS 
AVAILABLE 
WITHIN INCOMPLETE CYLINDERS 

PAT SUMMARY MASK 



(Listing of CHASDA continued from page 36 8 > 



<. 



LOCATION 


INSTRUCTION 


SOURCE 

* 


INST 


OPER 






83 


00040 




|ORG| 


SDAPSM 


83 


00040 






S DAD AM 


DS 


H 


83 


00042 






SDAPAM 

* 


DS 


H 


83 


00044 






SDANPS 

* 

* 


DS 


F 






83 


00048 


* 
* 
* 
SDAEND 


EQU 


* 






83 


00028 




|ORG| 


SDATAM 


83 


00028 






SDAFORMN 


DS 


CLIO 


83 


00032 






SDACARRG 

* 


DS 


CL4 


83 


00036 






SDACHTRN 


DS 


CL4 


83 


0003A 






SDADEN 


DS 


CL1 






0O0O0OF6 


SDADEN6 


EQU 


C'6 1 






O00O00F8 


SDADEN8 


EQU 


C^' 


83 


0003B 






SDAURSKY 


DS 


CL6 


83 


00041 






SDAUCSKY 


DS 


?CL6 


83 


00047 






SDAFOLD 


DS 


CL1 






000000C6 


SDAFOLDF 


EQU 


C'F' 






O00000E4 


SDAFOLDU 


EQU 


C'U' 


83 


00048 






SDAND 

* 


DS 


OX 






00000040 


SDASZE 

* 


EQU 


SDAND- J 






00000048 


SDASIZ 


EQU 


SDAEND 


****** 


* * * * 


* * * * * 


* * 


* * * * 



COMMENT 

IF PAGE IS AVAILABLE 



BIT=0 



DSCB AVAILABILITY MASK 

PAGE AVAILABILITY MASK 

WITHIN INCOMPLETE CYLINDERS 

POINTER TO NEXT PUBLIC 

STORAGE 

ENTRY, IF THIS ENTRY IS 

NOT A 

PUBLIC DEVICE OR IF THIS IS 

THE LAST PUBLIC DEVICE, THIS 

FIELD IS EQUAL TO ZERO. 

REORIGIN FOR MSAM 

PUNCH OR PRINT FORM NUMBER 

PRINTER CARRIAGE TAPE 

NUMBER 

PRINTER CHAIN/TRAIN 

PRINT DENSITY 

6 LINES/INCH 

8 LINES/INCH 

SYSURS DATA SET KEY 

SYSUCS DATA SET KEY 

UCS FOLD OPTION 

FOLDED 

UNFOLDED 

END OF SDAT ENTRY 
15943 
SDATEN SDAT ENTRY SIZE 

15943 
-SDAHPS LENGTH OF SDAT TABLE 
*************** 

SDADEV DEVICE 

MODEL CODE 



* SDADEA 

* SDADEB 

* SDADEC 

* SDADED 

* SDADEA SDADEB 

* SDADED 

* 00 08=UNIT 

* BIT 0=1 CARD IMAGE 

* RECORD 

* BIT 0=1 CARD IMAGE 

* BIT 1=1 PUNCH FEED 

* READ 



********** 



* 
* 
* 

* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 

* * 



DEVICE CLASSES 
UNIT TYPE 
OPTIONAL FEATURES 
SDADEC 

01=2540 READER 

02=2540 PUNCH 



BIT 0=1 



* * * * 



08=1403 PRINTER 
UNIVERSAL 

10=2671 PPT READER NONE 
CHARACTER 
20=DIRECT 01=2311 
BIT 0=1 SCAN 

ACCESS 02=2301 

BIT 1=1 TRACK 
03=2321 
OVERFLOW 
08=2314 
80=MAGNETIC 01=2400 SERIES 
E0=7 TRACK WITH 
TAPE 

DATA CONVERSION 
A0=7 TRACK WITHOUT 
DATA CONVERSION 
00, CO, 80=9 TRACK 
**************** 
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Shared Data Set Table (CHASDS, CHASDM, & CHASDE) 

The Shared Data Set Table (SDST) , controls the use of shared data sets and shared 
data set members. The SDST consists of three sections. The first section, the con- 
trol entry and hashing table (SDS) , controls the available space in the SDST through 
links to data set entries, and deleted member entries. The second section of the 
SDST, the member entry (SDM) , related members of the shared partitioned data set to 
shared pages. The third section, the data set entry (SDE), locates shared data sets 
and relates these data sets to shared pages. 

The SDST occupies a minimum of 37 2 bytes of virtual storage, aligned on doubleword 
boundaries. 

< 4 bytes > j 

j. 4 

Control Entry (36 bytes > 



|. i 



CHASDS 



Hashing Table (256 bytes) 
j. ^ 



Member Entry (28 bytes) 



CHASDM 



j.- 

Data Set Entry (64 bytes) 



* 



CHASDE 



. . . . J 



Shared Data Set Table (CHASDS, CHASDM, CHASDE) 
CHASDS Storage map 



DEC HEX 


8 

16 



272 
280 
288 



0| SDS INT 

1 


|SDSLPN | 
1 1 


SDSSPT 






SDSAVA 




8| 

1 


SDSDE 








SDSDME 




10| 

1 


SDSDSE 












1 
1 

1 






SDS HAS 




110| 

1 


1 
1 


SDSPLK 


i 

1 


ONNAMED | 


118| 
1 






SDSPSN 









120 | 



Fields in CHASDS — by displacement 



DEC HEX FIELD 

0000 0000 SDSINT 

0000 0000 SDSCON 

0001 0001 SDSLPN 

0002 0002 SDSSPT 



DEC HEX FIELD 
0004 0004 SDSAVA 
0008 0008 SDSDE 
0012 000C SDSDME 
0016 0010 SDSDSE 



DEC HEX FIELD 
0020 0014 SDSHAS 
0276 0114 SDSPLK 
0280 0118 SDSPSN 
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Alphabetical list of fields in CHASDS 



V 



FIELD 
SDSAVA 


DEC 
0004 


HEX 
0004 


FIELD 
SDSDSE 


DEC HEX 
0016 0010 


FIELD 
SDSPLK 


DEC HEX 
0276 0114 


SDSCON 


0000 


0000 


SDSHAS 


0020 0014 


SDSPSN 


0280 0118 


SDSDE 


0008 


0008 


SDSINT 


0000 0000 


SDSSPT 


0002 0002 


SDSDME 


0012 


000C 


SDSLPN 


0001 0001 






stinq of 


CHASDS 












LOCATION 


INSTRUCTION 


SOURCE 


INST OPER 


COMMENT 






86 00000 


CHASDS 


DSECT 


SHARED DATA 


SET TABLE 


86 00000 








DS 


0D 






86 00000 






SDSCON 


DS 


0XL20 


SHARED DATA 
ENTRY 


SET CONTROL 


86 00000 






SDSINT 


DS 


XL1 


INTERLOCK CONTROL 


86 00001 






SDSLPN 


DS 


XL1 


LAST RELATIVE PAGE NUMBER 


86 00002 






SDSSPT 


DS 


XL2 


LAST ASSIGNED SPT NUMBER 


86 00004 






SDSAVA 


DS 


XL4 


NEXT AVAILABLE SDST SPACE 


86 00008 






SDSDE 


DS 


XL4 


FIRST DELETED DATA SET 








* 






ENTRY 




86 0000C 






SDSDME 


DS 


XL4 


FIRST DELETED MEMBER ENTRY 


86 00010 






SDSDSE 


DS 


XL4 


FIRST DATA SET ENTRY 


86 00014 






SDSHAS 


DS 


XL256 


MEMBER HASHING TABLE 


86 00114 






SDSPLK 

* 


DS 


XL2 


USERID OF TASK THAT HAS 
LOCKED M4171 








* 






THE SDST 










* 






M4171 




86 00116 






* 


DS 


XL2 


RESERVED 
M4171 




86 00118 






SDSPSN 

* 


DS 


3F 


RESERVED 
M4171 
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CHASDM Storage map 



DEC 


8 

16 

24 



HEX 

I 
8| 

I 
10| 

I 
181 



SDMCHN 


1 

1 


SDMNUR 


1 

1 


SDMSPT 


SDMHPT 


1 

1 




SDMLSD 




SDMNAM 



SDMFSB 



ORG SDMHPT 



I. 



SDMNSP 



SDMFSP 



Fields in CHASDM — by displacement 

DEC HEX FIELD 

0000 0000 SDMCHN 

000a 000a SDMNUR 

0006 0006 SDMSPT 

0008 0008 SDMNSP 

Alphabetical list of fields in CHASDM 



DEC HEX FIELD 
0008 0008 SDMHfT 
0010 000A SDMFSP 
0012 000C SDMLSD 
0016 0010 SDMNAM 



FIELD 
SDMCHN 
SDMCOD 
SDMFSB 



DEC HEX 
0000 0000 



FIELD 



SDMHPT 
002a 0018 CEQU) SDMLSD 



DEC HEX 
0008 0008 
0012 000C 



002M 0018 
SDMFSP 0010 0OOA 

Assembler listing of CHASDM 



SDMNAM 0016 0010 



SDMNSP 



0008 0008 



DEC HEX FIELD 
002^ 0018 SDMCOD 
0024 0018 SDMFSB 



FIELD DEC HEX 
SDMNUR oooa 0004 
SDMSPT 0006 0006 



(EQU) 



LOC 


:ation 


INSTRUCTION 
85 00000 


SOURCE 

CHASDM 


INST 
DSECT 


OPER 


COMMENT 




SHARED DATA SET MEMBER 










* 






ENTRY 


85 


00000 








DS 


0D 




85 


00000 






SDMCHN 


DS 


XL4 


MEMBER CHAIN ENTRY 


85 


ooooa 






SDMNUR 


DS 


XL2 


NUMBER USERS THIS MEMBER 


85 


Q00O6 






SDMSPT 

* 
* 

* 
* 
* 
* 
* 


DS 


XL2 


WHEN FFFF INDICATES TEMP 
LOCK M4171 
ON MEMBER. LATER IT 
CONTAINS Ma 171 
THE SHARED PAGE TABLE 
NUMBER Ma 171 
OF VMA ASSIGNED. 
M4171 


85 


00008 






SDMHPT 

* 


DS 


IF 


POINTER TO HOST SDST IF 
SYKBIONT ENTRY 






85 


00008 




IORGI 


SDMHPT 




85 


00008 






SDMNSP 

* 


DS 


HL2 


NUMBER OF SPT PGS OF HOST 
M4171 


85 


0000A 


v 


SDMFSP 


DS 


XL2 


TASKID THAT BUILT MEMBER 










♦ 






Mai71 


85 


0000C 






SDMLSD 


DS 


AL4 


LINK ADDR TO DATA SET ENTRY 
Mai71 


85 


00010 






SDMNAM 


DS 


CL8 


MEMBER NAME 


85 


00018 






SDMFSB 

* 


DS 


XLU 


BYTE ADDRESS RELATIVE TO 
BEGINNING 






85 


00018 


SDMCOD 


EQU 


SDMFSB 


HOST/SYMBIONT CODE (ONE 

BYTE) 






00000000 


SDMHST 


EQU 


X'OO' 


HOST CODE 






00000001 


SDMSYM 


EQU 


X'Ol' 


SYMBIONT CODE 






00000002 


SDMPAK 


EQU 


X'02" 


CSECT PACKING INDICATOR 










* 






M323a 
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CHASDE Storage map 



EC 



HEX 



8 


8 


16 


10 



56 



38 





SDECHN 




| SDEINW 
1 


|SDEINR 
1 


|SDEINN (SDEINI 
1 1 


| SDENUR 


I 

I 


SDESPT 


1 


SDENSP 




I SDEFSP 

1 


= 






- SDENAM 












1 
1 






SDESPR 



Fields in CHASDE — by displacement 

DEC HEX FIELD 
0000 0000 SDECHN 

0004 0004 SDEINW 

0005 0005 SDEINR 

0006 0006 SDEINN 

Alphabetical list of fields in CHASDE 



DEC HEX FIELD 

0007 0007 SDEINI 

0008 0008 SDENUR 
0010 OO0A SDESPT 
0012 000C SDENSP 



DEC HEX FIELD 
0014 000E SDEFSP 
0016 0010 SDENAM 
0060 003C SDESPR 



FIELD 

SDECHN 

SDEFSP 

SDEINI 

SDEINN 



DEC HEX 
0000 0000 
0014 000E 
0007 0007 
0006 0006 



FIELD 

SDEINR 

SDEINW 

SDENAM 

SDENSP 



DEC HEX 
0005 0005 
0004 0004 
0016 0010 
0012 000C 



FIELD DEC HEX 

SDENUR 0008 0008 

SDESPR 0060 003C 

SDESPT 0010 000A 



Assembler listing of CHASDE 



LOCATION INSTRUCTION 



84 00000 



SOURCE 
CHASDE 



84 00000 
84 00000 
84 00004 
84 00005 
84 00006 
84 00007 

84 00008 

84 OOOOA 



84 0000C 
84 O0O0E 



INST OPER 

DSECT 

DS 



OD 

XL4 

XL1 

XL1 

XL1 

XL1 



SDECHN DS 

SDEINW DS 

SDEINR DS 

SDEINN DS 

SDEINI DS 

* 

SDENUR DS XL2 

SDESPT DS XL2 

* 

* 
* 

* 

SDENSP DS XL2 

SDEFSP DS XL2 

* 

FOR PUBLIC DS ENTRY IF 
SDEFSP=USERID - LOCKED 



COMMENT 

SHARED DATA SET ENTRY 

DATA SET ENTRY CHAIN 

WRITE INTERLOCK FLAG 

READ INTERLOCK FLAG 

READ INTERLOCK COUNTER 

READ INTERLOCK CONTROL 

FLAG 

NUMBER OF USERS THIS DATA 

SET 

WHEN FFFF INDICATES TEMP 

LOCK M4171 

ON DATA SET ENTRY. IT 

NORMALLY M4171 

CONTAINS THE SPT OF VMA 

AREA M4171 

DATA SET IS IN, 

M4171 
NUMBER OF SHARED PAGE 
ENTRIES 

MAY HOLD USERID OR PRIV 
FLAG M4171 
SDESPT=FFFF THEN 

M4171 
IF SDESPT=SPT NO 
SDEFSP=USERID - UNLKD M4171 
SET WHEN FINALLY FILLED 



A NORMAL SHARED PUBLIC 
CONTAINS AN M4171 
SDESPT=SPT NO, SDENSP=NO OF SHARED PGS, 



84 00010 
84 0003C 



SDEFSP=1ST SHARED PG 
FOR PRIVATE DS ENTRY 
SDEFSP=FFFF - NORMAL 
SDENAM DS CL44 
SDESPR DS CL4 



M4171 
SDESPT=USERID AND 
M4171 

DATA SET NAME 
SPARE 
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I/O Statistical Data Table (CMASDT) 

The I/O Statistical Data Table (SDT) accumulates statistical data on outboard fai- 
lures of task I/O devices. 

The SDT contains one Statistical Data Record (SDR) entry for each task I/O device 
in the system. Each of these SDR entries consists of statistical data on outboard 
failures of the associated task symbolic I/O device. The SDR entries are sorted on 
the symbolic device address (SDTSDA) field. 

The SDT consists of an 8 byte header and from 10 to 200 SDR entries (72 bytes 
each! . 

The SDT occupies from 728 to 14,000 bytes of virtual storage; the header and each 
SDR entry are aligned on doubleword boundaries. 

Note 1 . Since the retry threshold depends upon the type of error condition and 
device, each byte of the SDTRTH field is assigned to a specific error condition as 
its retry threshold for the device. The assignment of the retry threshold bytes is 
device dependent. 

Note 2 . SDR save area (SDTSDB) contains a 4 bit frequency counter for each bit of 
sense data. An SDR field is incremented by 1 each time its associated sense bit 
registers 1 in the summary sense data, on a VMSDR call. If an SDT field overflow 
occurs, the SDR entry of a symbolic I/O device is written on the drum for preserva- 
tion recording. 

CHASDT Storage map 



EC 



HEX 



8 


8 


16 


10 


24 


18 


32 


20 


40 


28 


48 


30 



| SDTLSD 


|SDTSP (SDTLCK [ 
1 1 i 




SDTLBA 




| SDTSDA 


| SDTFB | 




UNNAMED 




| SDTLP 


| SDTEIC | 


SDTRET 


1 

I 


UNNAMED | 




SDTRT0 | 




SDTRT1 






SDTRT2 I 




UNNAMED 




| SDTTS | 


| SDTSDB I 



ORG SDTRT0 



24 18[SDTDA0 (SDTDAl | SDTDA2 (SDTDA3 | 
i I I I .1 

ORG SDTRT1 



28 



1C 



(SDTDA4 |SDTDA5 | SDTDA6 | SDTDA7 | 
I I I I I 



ORG SDTRT2 



32 20|SDTDA8 (SDTDA9 ISDTDA10 ( SDTDA11 | 
I I I I 1 
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Fields in CHASDT — by displacement 



DEC 

0000 

0002 

0003 

0004 

0008 

0008 

0010 

0010 

0016 

0018 

0020 

0024 

0024 

0024 

0024 

0024 

0024 

0024 

0024 

0024 

0024 

0025 

0025 



HEX 

0000 

0002 

0003 

0004 

0008 

0008 

OO0A 

000A 

0010 

0012 

0014 

0018 

0018 

0018 

0018 

0018 

0018 

0018 

0018 

0018 

0018 

0019 

0019 



FIELD 

SDTLSD 

SDTSP 

SDTLCK 

SDTLBA 

SDTSDA 

SDTHBDY 

SDTWTO 

SDTFB 

SDTLP 

SDTEIC 

SDTRET 

SDTDAO 

SDT27010 

SDTTO 

SDTPRO 

SDTPTO 

SDTPUO 

SDTCRO 

SDTMTO 

SDTRTO 

SDTRTH 

SDTDA1 

SDT27011 



(EQU) 



(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 



(EQU) 



DEC 

0025 

0025 

0025 

0025 

0025 

0025 

0026 

0026 

0026 

0026 

0026 

0026 

0026 

0027 

0027 

0027 

0027 

0027 

0027 

0027 

0028 

0028 

0028 



HEX 

0019 

0019 

0019 

0019 

0019 

0019 

00 1A 

001A 

001A 

001A 

001A 

001A 

001A 

001B 

001B 

001B 

001B 

001B 

001B 

001B 

001C 

001C 

001C 



FIELD 

SDTT1 

SDTPR1 

SDTPT1 

SDTPU1 

SDTCR1 

SDTMT1 

SDTDA2 

SDT27012 

SDTT2 

SDTPR2 

SDTPU2 

SDTCR2 

SDTMT2 

SDTDA3 

SDTPR3 

SDTPU3 

SDTCR3 

SDT27013 

SDTT3 

SDTMT3 

SDTDA4 

SDTPR4 

SDT27014 



Alphabetical list of fields in CHASDT 



FIELD 

SDTBDY 

SDTCRO 

SDTCR1 

SDTCR2 

SDTCR3 

SDTDAO 

SDTDA1 

SDTDA10 

SDTDA11 

SDTDA2 

SDTDA3 

SDTDA4 

SDTDA5 

SDTDA6 

SDTDA7 

SDTDA8 

SDTDA9 

SDTEIC 

SDTFB 

SDTHBDY 

SDTLBA 

SDTLCK 

SDTLP 



DEC 

0080 

0024 

0025 

0026 

0027 

0024 

0025 

0034 

0035 

0026 

0027 

0028 

0029 

0030 

0031 

0032 

0033 

0018 

0010 

0008 

0004 

0003 

0016 



HEX 
0050 

0018 (EQU) 

0019 (EQU) 
001A (EQU) 
001B (EQU) 
0018 

0019 
0022 
0023 
001A 
001B 
001C 
001D 
001E 
001F 
0020 
0021 
0012 
OOOA 
0008 
0004 
0003 
0010 



FIELD 

SDTLSD 

SDTMTO 

SDTMT1 

SDTMT2 

SDTMT3 

SDTMT4 

SDTMT5 

SDTPRO 

SDTPR1 

SDTPR2 

SDTPR3 

SDTPR4 

SDTPTO 

SDTPT1 

SDTPUO 

SDTPU1 

SDTPU2 

SDTPU3 

SDTRET 

SDTRTH 

SDTRTO 

SDTRT1 

SDTRT2 



DEC 

0000 

0024 

0025 

0026 

0027 

0028 

0029 

0024 

0025 

0026 

0027 

0028 

0024 

0025 

0024 

0025 

0026 

0027 

0020 

0024 

0024 

0028 

0032 



HEX 

0000 

0018 

0019 

001A 

001B 

001C 

001D 

0018 

0019 

001A 

001B 

00 1C 

0018 

0019 

0018 

0019 

001A 

001B 

0014 

0018 

0018 

001C 

0020 



(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 

(EQU) 

(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 

(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 

(EQU) 
(EQU) 



(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 



FIELD 

SDTT4 

SDTMT4 

SDTRT1 

SDTDA5 

SDT27015 

SDTT5 

SDTMT5 

SDTDA6 

SDTT6 

SDTDA7 

SDTT7 

SDTDA8 

SDTT8 

SDTRT2 

SDTDA9 

SDTT9 

SDTDA10 

SDTT10 

SDTDA11 

SDTT11 

SDTTS 

SDTSDB 

SDTBDY 



(EQU) 

(EQU) 



(EQU) 
(EQU) 
(EQU) 

(EQU) 

(EQU) 
(EQU) 

(EQU) 
(EQU) 

(EQU) 



FIELD 

SDTSDA 

SDTSDB 

SDTSP 

SDTTS 

SDTTO 

SDTT1 

SDTT10 

SDTT11 

SDTT2 

SDTT3 

SDTT4 

SDTT5 

SDTT6 

SDTT7 

SDTT8 

SDTT9 

SDTWTO 

SDT27010 

SDT27011 

SDT27012 

SDT27013 

SDT27014 

SDT27015 



DEC 

0008 

0048 

0002 

0040 

0024 

0025 

0034 

0035 

0026 

00 27 

0028 

0029 

0030 

0031 

0032 

0033 

0010 

0024 

0025 

0026 

0027 

0028 

0029 



HEX 

0008 

0030 

0002 

0028 

0018 

0019 

0022 

0023 

001A 

001B 

001C 

001D 

001E 

001F 

0020 

0021 

OOOA 

0018 

0019 

001A 

001B 

001C 

001D 



(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 



Assembler listing of CHASDT 



LOCATION INSTRUCTION SOURCE 



INST OPER 





87 


00000 


CHASDT 


DSECT 










**** I/O STA' 


FISTIC 


87 00000 








DS 


OD 


87 00000 






SDTLSD 


DS 


H 


87 00002 






SDTSP 


DS 


XL1 


87 00003 






SDTLCK 


DS 


XL1 


87 00004 






SDTLBA 


DS 


XL4 


87 00008 






SDTHBDY 

♦ 


DS 


OX 


(Listing 


of 


CHASDT 


continued 


on page 376) 



COMMENT 



♦ *** 



LENGTH OF SDR ENTRY (72 
BYTES) 
SPARE 

TABLE LOCK BYTE 
LAST BYTE ADDRESS OF SDT 
END OF IO STATISTICAL DATA 
15943 



CHASDT 375 



(Listing 
LOCATION 



of CHASDT continued from page 375) 
INSTRUCTION SOURCE INST OPER 



COMMENT 



00000008 



87 00008 
87 0000A 



87 0000A 
00000080 



SDTHDSZ EQU 

* 

* 

* 

SDTSDA DS 

SDTFB DS 

SDTWTO EQU 

* 

SDTIRM 



87 0000C 
87 00010 

87 00012 
87 00014 
87 00016 
87 00018 
87 00018 

87 00018 



SDTLP 

SDTEIC 
SDTRET 

SDTRTH 
SDTRT0 



87 00018 



SDTDA0 
* 

87 00018 SDTMTO EQU SDTDAO 

87 00018 SDTCRO EQU SDTDAO 

87 00018 SDTPUO EQU SDTDAO 

87 00018 SDTPTO EQU SDTDAO 

* 

87 00018 SDTPRO EQU SDTDAO 

87 00018 SDTTO EQU SDTDAO 

87 00018 SDT27010 EQU SDTDAO 
* 

87 00019 SDTDA1 DS X 

87 00019 SDTMT1 EQU SDTDA1 

* 

87 00019 SDTCR1 EQU SDTDA1 

87 00019 SDTPU1 EQU SDTDA1 

87 00019 SDTPT1 EQU SDTDA1 

87 00019 SDTPR1 EQU SDTDA1 

87 00019 SDTT1 EQU SDTDA1 

87 00019 SDT27011 EQU SDTDA1 

* 

87 00 01 A SDTDA2 DS X 

87 0001A SDTMT2 EQU SDTDA2 

87 0001A SDTCR2 EQU SDTDA2 

87 0001A SDTPU2 EQU SDTDA2 

87 0001A SDTPR2 EQU SDTDA2 

87 0001A SDTT2 EQU SDTDA2 

87 0001A SDT27012 EQU SDTDA2 

87 0001B SDTDA3 DS X 

* 

87 0001B SDTMT3 EQU SDTDA3 
* 

(Listing of CHASDT continued on page 377) 



TABLE HEADER 
15943 
SDTHBDY-SDTLSD 10 STATISTICAL DATA 
TABLE 15943 
HEADER SIZE 
15943 
XL2 SYMBOLIC DEVICE ADDRESS 
XL2 FLAG BYTES 

SDTFB WRITE TO OPERATOR FLAF (1 
IF IMMEDIATE) 
EQU X'80' 
DS 2H 

DS XL2 

DS H 

DS H 

DS H 

DS 0XLL2 

DS XL4 

| ORG I SDTRTO 

DS X 



SPARE 

PATH LAST USED (ACTUAL I/O 

ADDRESS) 

TOTAL ERROR INCIDENT COUNT 

TOTAL RETRY COUNT 

SPARE 

ERROR RETRY THRESHOLDS 

RETRY THRESHOLD BYTES 0-3 

D/A "SEEK CHECK" RETRY 

VALUE 

MAG TAPE"DATA CHECK (WRITE) " 

RETRY VALUE 

CARD READER "CHAN DATA CK" 

RETRY VALUE 

CARD PUNCH "CHAN DATA CK" 

RETRY VALUE 

PAPER TPE" EQUIP CHECK" RETRY 

VALUE 

PRINTER "CHAN DATA CK" 

RETRY VALUE 

TERM. ' EQUIP CHECK' RETRY 

VALUE 

CHANNEL/I NTERF ACE CONTROL 

CHECK 

D/A "OVERRUN" RETRY VALUE 

MAG TAPE "OVERRUN" RETRY 

VALUE 

CARD READER "BUS OUT CK" 

RETRY VALUE 

CARD PUNCH "BUS OUT CK" 

RETRY VALUE 

PAPER TAPE" BUS OUT 

CHECK" RETRY VALUE 

PRINTER "BUS OUT CK" RETRY 

VALUE 

TERM." BUS OUT CHECK* RETRY 

VALUE 

CHANNEL DATA CHECK/BUS OUT 

CHECK 

D/A"NO RECORD FOUND"RETRY 

VALUE 

MAG TAPE" DATA 

CHK (CONTROL) "RETRY VALUE 

CARD READER "EQUIPMENT CK" 

RETRY VALUE 

CARD PUNCH "EQUIPMENT CK" 

RETRY VALUE 

PRINTER "EQUIPMENT CK" 

RETRY VALUE 

TERM. 'COMMAND REJECT' RETRY 

VALUE 

UC/LD, UC/TO, IL 

D/A" MISSING ADDRESS 

MARKERS "RETRY VALUE 

MAG TAPE" CHAINING CHK"RETRY 

VALUE 
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(Listing of CHASDT continued from page 376) 



LOCATION 


INSTRUCTION 
87 OOOIB 
87 OOOIB 


SOURCE 

SDTT3 

SDT27013 

♦ 


INST 

EQU 

EQU 


OPER 
S DTD A3 
SDTDA3 






87 


OOOIB 


SDTCR3 


EQU 


SDTDA3 






87 


OOOIB 


SDTPU3 


EQU 


SDTDA3 






87 


OOOIB 


SDTPR3 


EQU 


SDTDA3 


87 
87 


0001C 
0001C 


87 


0001C 


SDTRT1 
SDTDA4 
SDTMT4 


DS 

|ORG| 

DS 


XL4 

SDTRT1 
X 






87 


0001C 


EQU 


SDTDA4 






87 


0001C 


SDTT4 


EQU 


SDTDA4 






87 

87 


0001C 
0001C 


SDT27014 

SDTPR4 

* 

SDTDA5 

SDTMT5 


EQU 
EQU 


SDTDA4 
SDTDA4 


87 


0001D 


87 


0001D 


DS 
EQU 


X 

SDTDA5 


87 


0001E 


87 
87 


0001D 
0001D 


SDTT5 

SDT27015 

SDTDA6 

♦ 


EQU 
EQU 
DS 


SDTDA5 
SDTDA5 
X 






87 


0001E 


SDTT6 

♦ 


EQU 


SDTDA6 


87 


0001F 






SDTDA7 


DS 


X 






87 


0001F 


SDTT7 


EQU 


SDTDA7 


87 
87 


00020 
00020 


87 


00020 


SDTRT2 
SDTDA8 


DS 
(ORG| 
DS 


XL4 

SDTRT2 

X 






87 


00020 


SDTT8 


EQU 


SDTDA8 


87 


00021 


87 


00021 


SDTDA9 
SDTT9 


DS 
EQU 


X 

SDTDA9 


87 


00022 


87 


00022 


SDTDA10 
SDTT10 


DS 

EQU 


X 

SDTDA10 


87 


00023 


87 


00023 


* 

SDTDA11 

SDTT11 

♦ 


DS 
EQU 


X 

SDTDA11 


87 
87 


00024 
00028 






SDTTS 

* 


DS 
DS 


F 

2F 


87 
87 


00030 
00050 






* 

SDTSDB 

SDTBDY 

* 


DS 
DS 


8XL4 
OX 






00000048 


SDTSZ 

* 
* 


EQU 


SDTBDY- 



COMMENT 

TERM. •OVERRUN" RETRY VALUE 
UC/IR, UC/TO, UC/DT, UC/OV, 
IL 

CARD READER "DATA CHECK" 
RETRY VALUE 

CARD PUNCH "DATA CHECK- 
RETRY VALUE 

PRINTER "DATA CHECK" RETRY 
VALUE 
RETRY THRESHOLD BYTES 4-7 

D/A "CHAINING CHK" RETRY 

VALUE 

MAG TAPE' DATA CHK 

RE- READ' RETRY VALUE 

TERM. 'INTERVENTION 

REQUIRED' RETRY VALUE 

'SHOULD NOT OCCUR' ERRORS 

PRINTER "CODE GEN STORAGE 

P" RETRY VALUE 

D/A 'DATA CHK' RETRY VALUE 

MAG TAPE 'BUS OUT 

CHECK' RETRY VALUE 

TERM. 'TIME OUT' RETRY VALUE 

•0' FOR ERRORS NOT RETRIED 

D/A 'NO REC. FOUND OF MISS 

ADD MARK. 'RETRY VALUE 

TERM. 'DATA CHECK' RETRY 

VALUE 

D/A 'BUS OUT CHECK' RETRY 

VALUE 

TERM. 'RECEIVING CHECK' 

RETRY VALUE 

RETRY THRESHOLD BYTES 8-11 

D/A'CHNL DATA CHK 'RETRY 

VALUE 

TERM. 'ILLEGAL UNIT 

EXCEPTION' RETRY VALUE 

UNUSED LABEL 

TERM. 'INBOARD ERROR COUNT' 

RETRY VALUE 

UNUSED LABEL 

TERM.' MASTER CONSECUTIVE 

ERROR COUNT' 

RETRY VALUE 

UNUSED LABEL 

TERM. 'MACHINE CHECK RETRY' 

RETRY VALUE 

SPARE 

DATE TIME STAMP OF FIRST 

SDR ERROR 

IN MICRO-SECONDS 

SDR BUCKETS (642 1/2 BYTES) 

END OF 10 STATISTICAL DATA 

15943 
TABLE ENTRY 

15943 
SDTSDA 10 STATISTICAL DATA 
TABLE 1594 3 
ENTRY SIZE 

15943 
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OLTS Section Control Table (CHASKT) 



Provides the OLTS section with all of the information required to perform 
the test. 



t 



CHASKT Storage map 



DEC HEX 

























Of SKTRND 
1 


1 
I 


SKTSP1 (SKTOPT 

I 


I SKTRTE 


1 

» 


SKTSP2 


1 
1 


8 


8 | SKTSYM 
1 


i 

1 


* 


SKTFLG 


| SKTIDX 


I 

I 


SKTDAD 


1 

1 


16 


101 

1 




SKTCHR 






I 










Fields in 


CHASKT — by displacement 












DEC HEX 


FIELD 




DEC 


HEX 


FIELD 




DEC HEX 


FIELD 






0000 oooc 


) SKTRND 




0006 


0006 


SKTSP2 




0012 OOOC 


SKTIDX 






0000 OOOC 


> SKTBEG 




0008 


0008 


SKTSYM 




0014 000E 


SKTDAD 






0002 0002 


SKTSP1 




0010 


000A 


SKTLSB 


(EQU) 


0016 0010 


SKTMODC 


(EQU) 




0003 0003 


1 SKTERR 


CEQU) 


0010 


O0OA 


SKTAFL 


(EQU) 


0016 0010 


SKTCHR 






0003 0003 


SKTLPE 


(EQU) 


0010 


000A 


SKTTFL 


(EQU) 


0017 0011 


SKTFEAT 


(EQU) 




0003 0003 


i SKTELP 


(EQU) 


0010 


000A 


SKTPRV 


(EQU) 


0018 0012 


SKTCLAS 


(EQU) 




0003 0003 


SKTNEP 


(EQU) 


0010 


000A 


SKTLDV 


(EQU) 


0019 0013 


SKTTYPE 


(EQU) 




0003 0003 


\ SKTNPR 


(EQU) 


0010 


000A 


SKTSIN 


(EQU) 


0020 0014 


SKTDE 






0003 0003 


► SKTOPT 




0010 


000A 


SKTINH 


(EQU) 










000*1 0004 


SKTRTE 




0010 


000A 


SKTFLG 










Alphabetical list of 


fields in 


CHASKT 
















FIELD 


DEC 


HEX 




FIELD 


DEC HEX 




FIELD 


DEC HEX 






SKTAFL 


0010 


000A 


(EQU) 


SKTIDX 


0012 OOOC 




SKTRND 


0000 0000 






SKTBEG 


0000 


0000 




SKTINH 


0010 O00A 


(EQU) 


SKTRTE 


0004 0004 






SKTCHR 


0016 


0010 




SKTLDV 


0010 000A 


(EQU) 


SKTSIN 


0010 000A 


(EQU) 




SKTCLAS 


0018 


0012 


(EQU) 


SKTLPE 


0003 0003 


(EQU) 


SKTSP1 


0002 0002 






SKTDAD 


0014 


000E 




SKTLSB 


0010 O00A 


(EQU) 


SKTSP2 


0006 0006 






SKTDE 


0020 


0014 




SKTMODC 


0016 0010 


(EQU) 


SKTSYM 


0008 0008 






SKTELP 


0003 


0003 


(EQU) 


SKTNEP 


0003 0003 


(EQU) 


SKTTFL 


0010 000A 


(EQU) 




SKTERR 


0003 


0003 


(EQU) 


SKTNPR 


0003 0003 


(EQU) 


SKTTYPE 


0019 0013 


(EQU) 




SKTFEAT 


0017 


0011 


{EQU) 


SKTOPT 


0003 0003 












SKTFLG 


0010 


000A 




SKTPRV 


0010 000A 


(EQU) 








Assembler 


listinq of 


CHASKT 




















LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 


COMMENT 










8B 00000 


CHASKT 


DSECT 


















* 








OLTS SECTION 


CONTROL TABLE 




8B 00000 






SKTBEG 


DS 


OF 


FULL WORD ALIGN 






8B 00000 






SKTRND 


DS 


H 


RANDOM NUMBER 








8B 00002 






SKTSP1 


DS 


XL1 


SPARE 








8B 00003 






SKTOPT 


DS 


XL1 


JOBOOPTIONS 








8B 00004 






SKTRTE 


DS 


XL2 


ROUTINE SELECTION 






8B 00006 






SKTSP2 


DS 


H 


SPARE 










00000008 


SKTDVCT 


EQU 


♦-SKTBEG DEFINE START 


OF DEVICE 












# 








TABLE 








8B 00008 






SKTSYM 


DS 


XL2 


SYSTEM SYMBOLIC DEVICE 


NAME 




8B 0000A 






SKTFLG 


DS 


XL2 


FLAGS 








8B 0000C 






SKTIDX 


DS 


XL2 


INDEX INTO TERMINAL TABLE 




8B 0000E 






SKTDAD 


DS 


XL2 


PHYSICAL PATH 


TO DEVICE 




8B 00010 






SKTCHR 


DS 


XL4 


DEVICE CHARACTERISTICS 






8B 00014 






SKTDE 


DS 


OC 


DEVICE FIELD 


END 








oooooooc 


SKTINC 


EQU 


SKTDE-SKTSYM 
















* 




BIT 


DEFINITIONS FOR 


JOB OPTION BYTE 








8B 00003 


SKTNPR 


EQU 


SKTOPT 


DEFINE BYTE LOCATION FOR NO 










♦ 








CONTROL PRINT 


FLAG 








8B 00003 


SKTNEP 


EQU 


SKTOPT 


DEFINE BYTE LOCATION FOR NO 




(Listing 


of CHASKT 


continued < 


on page 379) 
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(Listing of CHASKT continued from page 378) 



LOCATION INSTRUCTION 


SOURCE 


INST 


OPER 


8B 00003 


SKTELP 


EQU 


SKTOPT 


8B 00003 


SKTLPE 

♦ 


EQU 


SKTOPT 


8B 00003 


SKTERR 


EQU 


SKTOPT 


00000008 


SKTNPRM 


EQU 


x'08' 


00000004 


SKTNEPM 


EQU 


X , 04' 


00000002 


SKTELPM 


EQU 


X , 02 i 


00000001 


SKTLPEM 


EQU 


X § 01 f 


00000080 


SKTERRM 


EQU 


X^O 1 


8B 0000A 


* 
SKTINH 


EQU 


SKTFLG 


8B 0O00A 


SKTSIN 


EQU 


SKTFLG 


8B 0OOOA 


SKTLDV 


EQU 


SKTFLG 


8B 0OOOA 


SKTPRV 


EQU 


SKTFLG 


8B 0000A 


SKTTFL 


EQU 


SKTFLG 


8B 0000A 


SKTAFL 


EQU 


SKTFLG 


8B 0000A 


SKTLSB 


EQU 


SKTFLG 


00000040 


SKTINHM 


EQU 


X , 40 i 


00000020 


SKTSINM 


EQU 


X f 20 f 


00000010 


SKTLDVM 


EQU 


X , 10 t 


00000008 


SKTPRVM 

4 s 


EQU 


X f 08' 


00000004 
00000002 


SKTTFLM 
SKTAFLM 

* 


EQU 
EQU 


x'04 f 

X , 02 < 


00000001 


SKTLSBM 


EQU 


X'01 1 


8B 00010 


* 
SKTMCDC 


EQU 


DEVICE C 
SKTCHR4-0 


8B 00011 


SKTFEAT 


EQU 


SKTCHR+1 


8B 00012 


SKTCLAS 


EQU 


SKTCHR+ 2 


8B 00013 


SKTTYPE 

* 


EQU 


SKTCHR+ 3 



COMMENT 

ERROR PRINT FLAG 

DEFINE BYTE LOCATION FOR 

ERROR LOOP FLAG 

DEFINE BYTE LOCATION FOR 

JOB LOOP FLAG 

DEFINE BYTE LOCATION FOR 

ERROR DETECTED FLAG 

DEFINE BIT POSITION FOR NO 

CONTROL PRINT FLAG 

DEFINE BIT POSITION FOR NO 

ERROR PRINT FLAG 

DEFINE BIT POSITION FOR 

ERROR LOOP FLAG 

DEFINE BIT POSITION FOR JOB 

LOOP FLAG 

DEFINE BIT POSITION FOR 

ERROR DETECTED FLAG 

SCT FLAG DEFINITION 

DEFINE BYTE LOCATION FOR 

•NO WRITING' FLAG 

DEFINE BYTE LOCATION FOR 

•THIS IS SYSIN f FLAG 

DEFINE BYTE LOCATION FOR 

LAST DVC IN SUBSYS FLAG 

DEFINE BYTE LOCATION FOR 

PREVIOUSLY DEFINED FLAG 

DEFINE BYTE LOCATION FOR 

TERMINAL FLAG 

DEFINE BYTE LOCATION FOR 

PATH PRESENT FLAG 

DEFINE BYTE LOCATION FOR 

LAST DVC LAST SUBS FLAG 

DEFINE BIT POSITION FOR "NO 

WRITING 1 FLAG 

DEFINE BIT POSITION FOR 

•THIS IS YSSIN' FLAG 

DEFINE BIT POSITION FOR 

LAST DVC IN SUBSYS FLAG 

DEFINE BIT POSITION FOR 

PREVIOUSLY DEFINED FLAG 

DEFINE BIT POSITION FOR 
PATH PRESENT FLAG 
DEFINE BIT POSITION FOR 
LAST DVC LAST SUBSYS FLAG 
DEVICE CHARACTERISTICS DEFINITIONS 
DEFINE BYTE LOCATION FOR 
MODEL CODE 

DEFINE BYTE LOCATION FOR 
FEATURES 

DEFINE BYTE LOCATION FOR 
DEVICE CLASS 

DEFINE BYTE LOCATION FOR 
DEVICE TYPE 
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Source List (CHASLP, CHASLH, CHASLM) 

The Source List contains data which is used by the command system controller to 
direct the activities of a task. The Source List consists of: 

1. Source List Page Header (CHASLP) 

2. Sublist Header (CHASLH) 

3. Source List Markers (CHASLM) 

There is one CHASLP, for each page in the Source List, which points to the sub- 
lists on that page. Each sublist is headed by one CHASLH, and contains a variable 
length string of Source List Markers (CHASLM) . - 
The Source List resides in virtual storage. 

CHASLP Storage map 

DEC HEX 



0| SLPNXT I SLPCSL | 

I I I 

8 8 J SLPG1P | SLPAVL 1 



Fields in CHASLP — by displacement 

DEC HEX FIELD DEC HEX FIELD DEC HEX FIELD 

0000 0000 SLPNXT 0004 0004 SLPCSL 0008 0008 SLPGIP 

0012 000C SLPAVL 

Alphabetical list of fields in CHASLP 

FIELD DEC HEX FIELD DEC HEX FIELD DEC HEX 
SLPAVL 0012 000C SLPCSL 0004 0004 SLPGIP 0008 0008 

SLPNXT 0000 0000 

Assembler listing of CHASLP 

LOCATION INSTRUCTION SOURCE INST OPER COMMENT 

8E 00000 CHASLP DSECT , SOURCE LIST 

* PAGE HEADER. 

8E 00000 SLPNXT DS A POINTER TO NEXT PAGE. 

8E 00004 SLPCSL DS A POINTER TO CURRENT SUBLIST. 

8E 00008 SLPGIP DS A POINTER TO CURRENT G 

* SUBLIST. 

8E 0000 C SLPAVL DS H AVAILABLE BYTES ON CURRENT 

* PAGE 
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CHASLfl Storage map 



DEC 




80 
88 

104 
112 



HEX 




50 
58 

68 
70 



SLHSAV 






. SLHNAM 




| SLHKES 


| SLHCSA 




i 
1 


SLHEND 


| SLHGEN | 
1 i 



ORG SLHGEN + 1 



113 



71 



|SLHTYP |SLHPTR | 



Fields in CHASLH — by displacement 

DEC HEX FIELD 

0000 0000 SLHSAV 

0080 0050 SLHNAM 

0088 0058 SLHRliS 

Alphabetical list of fields in CHASLH 



DEC HEX FIELD 
01C4 0068 SLHCSA 
0108 006C SLHEND 
0112 0070 SLHGEN 



DEC HEX FIELD 

0113 0071 SLHTYP 

0114 0072 SLHPTR 

0118 0076 SLHALL (EQU) 



( . 



FIELD 


DEC HEX 


FIELD DEC HEX 


FIELD 


DEC HEX 


SLHALL 


0118 0076 


(EQU) SLHGEN 0112 0070 


SLHRES 


0088 0058 


SLHCSA 


0104 0068 


SLHNAM 0080 0050 


SLHSAV 


0000 0000 


SLHEND 


0108 006C 


SLHPTR 0114 0072 


SLHTYP 


0113 0071 


Assembler listinq of 


CHASLH 










LOCATION 


INSTRUCTION SOURCE 


INST OPER 


COMMENT 








8C 00000 


CHASLH 

* 


DSECT 


HEADER - 


SUBLIST 


8C 


00000 




SLHSAV 


DS 20A 


REGISTER SAVE AREA 


8C 


00050 




SLHNAM 


DS CL8 


CURRENT MODULE NAME 


8C 


00058 




SLHRES 


DS 4A 


COMMUNICATION AREA 


8C 


00068 




SLHCSA 


DS A 


CURRENT STARTING ADDRESS 


8C 


0006C 




SLHEND 


DS A 


END POINTER. 




8C 


00070 




SLHGEN 


DS CL6 


GENERATION MARKER. 






8C 00076 


SLHALL 


EQU * 


SUB LI ST TEXT 


BEGINNING 






8C 00071 




IORG1 SLHGEN* 1 






8C 


00071 




SLHTYP 


DS CL1 


MARKER TYPE 


FIELD 


8C 


00072 




SLHPTR 


DS CL1 


MARKER POINTER FIELD 


CHASLM Storaqe 


map 












DEC HEX 














0|SLMEB 
1 


| SLMTY | 
1 1 




SLMADD 


1 

i 
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Fields in CHASLM — by displacement 



DEC HEX FIELD 
0000 0000 SLMEB 



DEC HEX FIELD 
0001 0001 SLMTY 



DEC HEX FIELD 
0002 0002 SLMADD 



Alphabetical list of fields in CHASLM 



FIELD 


DEC HEX 


FIELD 


DEC HEX 


FIELD 


DEC HEX 


SLMADD 


0002 0002 


SLMEB 


0000 0000 


SLMTY 


0001 0001 



Assembler listing of CHASLM 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 


COMMENT 




8D 00000 


CHASLM 


DSECT 




, SOURCE LIST 
MARKER, 


8D 00000 




SLMEB 


DS 


CL1 


EOB CHARACTER POSITION . 




00000026 


SLMEBM 


EQU 


X'26' 


EOB HEX VALUE 


8D 00001 




SLMTY 


DS 


CL1 


MARKER TYPE POSITION. 




O0O00OC7 


SLMTYG 


EQU 


C'G' 


G MARKER. 




O0000OE3 


SLMTYT 


EQU 


C'T' 


T MARKER. 




OOOO00E4 


SLMTYU 


EQU 


C'U' 


U MARKER. 




O00OO0C5 


SLMTY E 


EQU 


C'E* 


E MARKER. 




000000D7 


SLMTYP 


EQU 


C'P' 


P MARKER. 




O00000E2 


SLMTYS 


EQU 


C'S 1 


S MARKER. 


8D 00002 




SLMADD 


DS 


xm 


MARKER ADDRESS 
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Symbolic Library Index (CHASLX) 

The Symbolic Library Index (SLX) is used by the symbolic library search routine to 
retrieve information (a macro definition, for example) from the symbolic library. 

The SLX consists of a header and as many index entries as there are parcels and 
aliases in the associated library. The entries appear in ascending order correspond- 
ing to the EBCDIC collating sequence of the parcel names. 

The SLX occupies from 21 to 1,048,675 bytes of virtual storage, aligned on word 
boundaries. 



CHASLX Storage map 



DEC HEX 










I SLXDMY | 
I i 


SLXNLN | 


SLXLEN 


8 81 
1 


SLXSSP 




SLXRLN 


16 10 1 

1 


SLXRLN 


(CONT) 






Fields in CHASLX — by displacement 






DEC HEX 
0000 0000 


FIELD 
SLXDMY 


DEC 
0008 


HEX FIELD 
0008 SLXSSP 


DEC HEX FIELD 
0020 0014 SLXNAMA 


0002 0002 


SLXNLN 


0012 


000C SLXRLN 




0004 000^ 


^ SLXLEN 


0012 


000C SLXNAM 




Alphabetical list of 


fields in 


CHASLX 






FIELD 
SI^CDMY 


DEC HEX 
0000 0000 


FIELD DEC HEX 
SLXNAMA 0020 0014 


FIELD DEC HEX 
SLXSSP 0008 0008 


SLXLEN 


0004 0004 


SLXNLN 0002 0002 




SLX NAM 


0012 000C 


SLXRLN 0012 000C 




Assembler listinq of 


CHASLX 








LOCATION 


INSTRUCTION SOURCE 


INST OPER 


COMMENT 






* CHASLX 


MACRO AND COPY 


LIBRARY INDEX DSECT 




8F 00000 


CHASLX 

* 


DSECT 


INDEX HEADER 


8F 00000 




SLXDMY 


DS H 


NOT USED 


8F 00002 




SLXNLN 


DS H 


PARCEL NAME LENGTH 


8F 00004 




SLXLEN 


DS F 


INDEX LENGTH 


8F 00008 




SLXSSP 

* 
* 


DS F 


BINARY SEARCH STARTING 

POINT 

INDEX ENTRY 


8F 0000C 




SLXNAM 

* 


DS 0C 


PARCEL NAME (VARIABLE 
LENGTH) 


8F 0000C 




SLXRLN 


DS CL8 


RETRIEVAL LINE NO (INDEXED 


8F 00014 




SLXNAMA 


DS 0C 


NEXT PARCEL NAME 
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Scan Master Control Table (CHASMC and C HAS ME) 



The Scan Master Control Table CSTMCT) provides data to facilitate the Queue Scan- 
ner's search of the Scan Table CCHASCN) . 

SCTMCT consists of a set of Device Interaction Groups (DIGs) . A DIG is a subset 
of entries in the Scan Table containing one queue processor, or a collection of I/O 
devices having a coiwnon device controller (s ) . CHASMC is a header, having information 
concerning the DIG entries in the table. The fields for each DIG are defined by a 
separate DSECT (CHASME) . 

The STMCT resides in core storage, aligned on a doubleword boundary. CHASMC is 16 
bytes, as is each CHASME in the chain. 



p 



CHASMC Storage map 



DEC 




HEX 



I SMCMLB (UNNAMED | 

I I L 

8| 



SMCMCT 



SMCDCT 



SMCCMF 



_L 



UNNAMED 



Fields in CHASMC — by displacement 



DEC HEX FIELD 
0000 0000 SMCMLB 
0002 0002 SMCMCT 



DEC HEX FIEL; 



EX?T 



0004 0004 SMCE 
0006 0006 SMCCMF 



DEC HEX FIELD 
0016 0010 SMCEND 



Alphabetical list of fields in CHASMC 



FIELD 

SMCCMF 

SMCDCT 



DEC HEX 
0006 0006 
0004 0004 



FIELD 

SMCEND 

SMCMCT 



DEC HEX 
0016 0010 
0002 0002 



FIELD 
SMCMLB 



DEC HEX 
0000 0000 



Assembler listing of CHASMC 



LOCATION INSTRUCTION 



90 00000 



90 00000 
90 00000 
90 00001 
90 00002 
90 00004 
90 00006 

90 00006 
90 00010 



00000010 



91 00000 



91 00000 
91 00000 
91 00001 



00000080 
0000007F 



91 00002 
91 00004 
91 00008 
91 O0OOC 
91 00010 



00000010 



SOURCE 
CHASMC 

SMCMLB 

SMCMCT 
SMCDCT 
SMCCMF 

* 

SMCEND 
SMCSZ 

CHASME 

SMEDLB 

SMEBFG 

SMEBFM 

SMEBFMC 

SMECMF 

SMEFEA 

SMECEA 

SMELEA 

SMEEND 

SMESZ 

* 



INST OPER 

DSECT 

DS 

DS 

DS 

DS 

DS 

DS 



COMMENT 

SCAN MASTER CONTROL TABLE 



0D 

CL1 

CL1 

H 

H 

H 



DS 
DS 



EQU 



MASTER LOCK BYTE 
SPARE 

MASTER COUNT OF GQE'S 
COUNT OF DIGS 
MASTER COUNT OF MATCHED 
FACILITIES 
2F UNUSED 

OX END OF SCAN MASTER CONTROL 
15943 
TABLE HEADER 
15943 
SMCEND-SMCMLB SCAN MASTER CONTROL 
TABLE 15943 
HEADER SIZE 
15943 
DSECT 

DS 0D DSECT FOR ONE DIG ENTRY 
DS CL1 DIG LOCK BYTE 
DS XL1 FLAG BYTE 
EQU X^G* BUSY FLAG MASK 
EQU X'7F' BUSY FLAG COMPLEMENT 
DS H COUNT OF MATCHED FACILITIES 

DS F FIRST ENTRY ADDRESS 

DS F CURRENT ENTRY ADDRESS 

DS F LAST ENTRY ADDRESS 

DS OX END OF DIG ENTRY 

15943 
EQU SMEEND-SMEDLB DIG ENTRY SIZE 

15943 
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CHASME Storage map 



DEC 




HEX 



| SMEDLB 

i 

81 



[ SMEBFG 



SMECMF 



SMEFEA 



SMECEA 



SMELEA 



Fields in CHASME — by displacement 

DEC HEX FIELD 

0000 0000 SMEDI£ 

0001 0001 SMEBFG 

0002 0002 SMECMF 



DEC HEX FIELD 
0004 0004 SMEFEA 
0008 0008 SMECEA 
0012 000C SMELEA 



DEC HEX FIELD 
0016 0010 SMEEND 



Alphabetical list of fields in CHASME 



FIELD 


DEC 


HEX 


FIELD 


DEC 


HEX 


FIELD 


DEC HEX 


SMEBFG 


0001 


0001 


SMEDLB 


0000 


0000 


SMELEA 


0012 000C 


SMECEA 


0008 


0008 


SMEEND 


0016 


0010 






SMECMF 


0002 


0002 


SMEFEA 


0004 


0004 







( . 
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System Operator ID Table (CHASOT) and CHASOT Entry (CHASID) 

The System Operators ID Table (SOT) and the CHASOT Entries (SID> identify the main 
operator in the system. 

SOT resides in shared virtual storage, with privileged access. The main operator 
control program (MOCP) has read-only access to SOT. 
The SOT resides in virtual storage aligned on word boundaries. 

CHASOT Storage map 



DEC 


8 

16 



HEX 

of 
L 

8| 

L 

101 

I. 



SOTLNG 



SOTBCK 



SOTUID 



± 



SOTUID (CONT) 



SOTSIN 



| SOTDES | SOTLOG | 
J i L 



J 



SOTTID 



Fields in CHASOT — by displacement 



DEC HEX FIELD 

0000 0000 SOTLNG 

0002 0002 SOTBCK 

0004 0004 SOTUID 



DEC HEX FIELD 

0012 000C SOTDES 

0013 000D SOTLOG 

0014 000E SOTTID 



DEC HEX FIELD 
0016 0010 SOTSIN 



Alphabetical list of fields in CHASOT 



FIELD 
SOTBCK 
SOTDES 
SOTLNG 



DEC HEX 
0002 0002 
0012 000C 
0000 0000 



FIELD 
SOTLOG 
SOTSIN 
SOTTID 



DEC HEX 

0013 000D 
0016 0010 

0014 000E 



FIELD 
SOTUID 



DEC HEX 
0004 0004 



Assembler listing of CHASOT 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 




92 00000 


CHASOT 


DSECT 




92 00000 






DS 


OF 


92 00000 




SOTLNG 


DS 


H 


92 00002 




SOTBCK 


DS 


H 


92 00004 




* 
SOTUID 


DS 


CL8 


92 0000C 




SOTDES 


DS 


XL1 




00000000 


SO TDM 


EQU 


X f 00 f 




00000001 


SOTD1 


EQU 


X'01 f 




00000002 


SOTD2 


EQU 


X , 02 i 




00000004 


SOTD3 


EQU 


X , 04« 


92 0000D 




SOTLOG 


DS 


XL1 


92 0000E 




SOTTID 


DS 


H 


92 00010 




SOTSIN 


DS 


H 



COMMENT 

SYSTEM OPERATOR ID TABLE 

NUMBER OF TABLE 
ENTRIES-BINARY 
SYMBOLIC DEVICE ADDRESS OF 
BACKUP TER 
MINAL 

USER IDENTIFICATION-EBCDIC 
DESTINATION FLAG-BINARY 
#0 MAIN 
#1 TAPE 
#2 DISC 

#4 UNIT RECORD EQUIPMENT 
LOGON FLAG-BINARY 
#0 NOT LOGGED ON #1 LOGGED ON 
TASKID-BINARY 
CONSOLE SYMBOLIC DEVICE 
ADDRESS 



38 6 CHASOT 



CHASID Storage map 



DEC 




HEX 
01 



SIDUID 



I 

8|SIDDES |SIDLOG | 



SIDTID 



SIDSIN 



Fields in CHASID — by displacement 



DEC HEX FIELD 
0000 0000 SIDUID 
0008 0008 SIDD4 
0008 0008 SIDD2 
0008 0008 SIDD1 



DEC HEX FIELD 

0008 0008 SIDDO 

(EQU) 0008 0008 SIDDES 

(EQU) 0009 0009 SIDLOG 

(EQU) 0010 000A SIDTID 



DEC HEX FIELD 
(EQU) 0012 000C SIDSIN 
0014 000E SIDEND 



Alphabetical list of fields in CHASID 



FIELD 

SIDDES 

SIDDO 

SIDD1 

SIDD2 



DEC HEX 
0008 0008 



FIELD 



SIDD4 

0008 0008 (EQU) SIDEND 
0008 0008 (EQU) SIDLOG 
0008 0008 (EQU) SIDSIN 



DEC HEX FIELD DEC HEX 

0008 0008 (EQU) SIDTID 0010 000A 
0014 000E SIDUID 0000 0000 

0009 0009 
0012 OOOC 



Assembler listing of CHASID 



LOCATION INSTRUCTION SOURCE 



8A 00000 



8A 00000 

8A 00000 
8A 00008 



8A 00008 
00000000 
8A 00008 
00000001 
8A 00008 
00000002 
8A 00008 
00000004 



8A O0OQ9 

8A 0000A 
8A 0000C 

8A 0000E 



000O0O0E 



CHASID 

* 

SIDUID 

SIDDES 

SIDDO 

SIDDOM 

SIDD1 

SIDD1M 

SIDD2 

SIDD2M 

SIDD4 

SIDD4M 

SIDLOG 

SIDTID 
SIDSIN 

* 

SIDEND 
SIDSZE 



INST OPER 

DSECT 

DS 



DS 
DS 

EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
DS 

DS 
DS 

DS 

EQU 



OD 

CL8 

XL1 

SIDDES 

X'OO' 

SIDDES 

X'Ol' 

SIDDES 

X f 02' 

SIDDES 

X f 04 i 

XL1 



COMMENT 

DSECT FOR TABLE ENTRY 

ALLIGN TO DOUBLE WORD 

BOUNDRY 

USER ID - PADDED WITH ZEROS 

DESTINATION FLAG - BINARY 

MAIN SYSTEM OPERATOR 

TAPE SUB- OPERATOR 

DISK SUB-OPERATOR 

UNIT RECORD SUB-OPERATOR 



LOGON FLAG - BINARY 
1 = LOGGED ON 
H TASK ID - BINARY 

H TERMINAL SYMBOLIC DEVICE 

ADDRESS 
OX END OF TABLE ENTRY 

15943 
SIDEND-SIDUID TABLE ENTRY SIZE 
15943 
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SERR/Reconfiguration Path Table (CHASPP) 

The SERR/Recon figuration Path Table (SPP) lists one entry for each path to the 
paging drum(s) containing the SERR and reconfiguration modules. 

SPP entries are contiguous in core storage and aligned on word boundaries, 

CHASPP Storage map 



DEC 





HEX 



01 SPPLOK 



I SPP API 



SPPATH 



J. 



Fields in CHASPP — by displacement 



DEC HEX FIELD 
0000 0000 SPPLOK 



DEC HEX FIELD 
0001 0001 SPPAP1 



DEC HEX FIELD 
0002 0002 SPPATH 



Alphabetical list of fields in CHASPP 



FIELD 
SPP API 



DEC HEX 
0001 0001 



FIELD 
SPPATH 



DEC HEX 
0002 0002 



FIELD DEC HEX 
SPPLOK 0000 0000 



Assembler listing of CHASPP 



LOCATION INSTRUCTION SOURCE 



93 00000 



93 00000 
93 00000 
93 00001 
93 00002 



00000004 



CHASPP 

SPPLOK 
SPPAP1 
SPPATH 
SPPSZE 



INST OPER 
DSECT 

DS OF 

DS C 

DS C 

DS H 



COMMENT 



LOCK BYTE 
SDA+1 OF DRUM 
PATH ADDRESS 



EQU 



♦-SPPLOK SIZE OF TABLE ENTRY 
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Shared Page Table (CHASPT) and External Shared Page Table (CHAXSP) 

The Shared Page Table (SPT) contains a list of entries representing shared pages. 
The SPT is identical to the page table (CHAPGT). The 2-byte SPT resides in core 
storage aligned on half word boundaries. 

The External Shared Page Table CXSPT) contains control information required by the 
Supervisor for proper paging of shared virtual storage pages. The XSPT roust immedi- 
ately follow its SPT. The XSPT (12-3072 bytes) resides in core storage aligned on 
fullword boundaries. 

CHASPT Storage map 



DEC HEX 



( 



0[ SPTCBA | 
I I 

Fields in CHASPT — by displacement 

DEC HEX FIELD DEC HEX FIELD DEC HEX FIELD 

0000 0000 SPTCBA 0001 0001 SPTPA (EQU) 

Alphabetical list of fields in CHASPT ^ 

FIELD DEC HEX FIELD DEC HEX FIELD DEC HEX 
SPTCBA 0000 0000 SPTPA 0001 0001 (EQU) 

Assembler listing of CHASPT 

LOCATION INSTRUCTION SOURCE INST OPER COMMENT 

94 00000 CHASPT DSECT SHARED PAGE TABLE ENTRY 

94 00000 DS OH 

94 00000 SPTCBA DS H 12 BIT CORE BLOCK ADDRESS 

94 00001 SPTPA EQU SPTCBA+1 PAGE AVAILABILITY FLAG 

00000008 SPTPAM EQU 8 PAGE AVAILABILITY MASK 



( 
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CHAXSP Storage map 



DEC HEX 
















0| 

i 


XSPXL 




I XSPF1 
1 


|XSPF2 | UNNAMED | XSPFLG | 
III! 


8 8| 
1 


XSPGQE 




I 
1 








Fields in CHAXSP — by displacement 








DEC HEX 


FIELD 


DEC 


HEX 


FIELD 




DEC HEX FIELD 




0000 0000 XSPXL 


0004 


0004 


XSPUP 


(EQU) 


0007 0007 XSPGQ 


(EQU) 


0004 0004 XSPPU 


(EQU) 0004 


0004 


XSPF1 




0007 0007 XSPIO 


(EQU) 


0004 0004 XSPSP 


(EQU) 0005 


0005 


XSPPC 


(EQU) 


0007 0007 XSPII 


(EQU) 


0004 0004 XSPPA 


(EQU) 0005 


0005 


XSPAX 


(EQU) 


0007 0007 XSPPH 


(EQU) 


0004 0004 XSPRS 


(EQU) 0005 


0005 


XSPBV 


(EQU) 


0007 0007 XSPFLG 




0004 0004 XSPCP 


(EQU) 0005 


0005 


XSPIV 


(EQU) 


0008 0008 XSPGQE 




0004 0004 XSPTP 


(EQU) 0005 


0005 


XSPTA 


(EQU) 






0004 0004 XSPPD 


(EQU) 0005 


0005 


XSPF2 








Alphabetical list of 


fields in 


CHAXSP 












FIELD 


DEC HEX 


FIELD 


DEC HEX 




FIELD DEC HEX 




XSPAX 


0005 0005 


(EQU) XSPII 


0007 0007 


(EQU) 


XSPRS 0004 0004 


(EQU) 


XSPBV 


0005 0005 


(EQU) XSPIO 


0007 0007 


(EQU) 


XSPSP 0004 0004 


(EQU) 


XSPCP 


0004 0004 


(EQU) XSPIV 


0005 0005 


(EQU) 


XSPTA 0005 0005 


(EQU) 


XSPFLG 


0007 0007 


XSPPA 


0004 0004 


(EQU) 


XSPTP 0004 0004 


(EQU) 


XSPF1 


0004 0004 


XSPPC 


0005 0005 


(EQU) 


XSPUP 0004 0004 


(EQU) 


XSPF2 


0005 0005 


XSPPD 


0004 0004 


(EQU) 


XSPXL 0000 0000 




XSPGQ 


0007 0007 


(EQU) XSPPH 


0007 0007 


(EQU) 






XSPGQE 


0008 0008 


XSPPU 


0004 0004 


(EQU) 






Assembler listinq of 


CHAXSP 














LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 


COMMENT 






BB 00000 


CHAXSP 


DSECT 


EXTERNAL SHARED PAGE 






* 






TABLE 




BB 00000 






DS 


OF 








BB 00000 




XSPXL 


DS 


F 


EXTERNAL LOCATION OF PAGE 


BB 00004 




XSPF1 


DS 


XL1 


FLAG BYTE 1 






BB 00004 


XSPUP 


EQU 


XSPF1 


UPDATE IN PLACE FLAG 






00000080 


XSPUPM 


EQU 


x'so 1 










BB 00004 


XSPPD 

* 


EQU 


XSPF1 


PREFERED PAGING DEVICE 
1=DRUM 






00000040 


XSPPDM 


EQU 


X^O* 










BB 00004 


XSPTP 

♦ 


EQU 


XSPF1 


TYPE PROGRAM OR DATA 






00000020 


XSPTPM 


EQU 


X , 20 f 










BB 00004 


XSPCP 


EQU 


XSPF1 


CHANGED PAGE BIT FLAG 






00000010 


XSPCPM 


EQU 


X'lO' 


CHANGED PAGE BIT MASK 






BB 00004 


XSPRS 


EQU 


XSPF1 


RSS 


PAGE FLAG 






00000008 


XSPRS M 


EQU 


x'08 1 


RSS 


PAGE MASK 






BB 00004 


XSPPA 


EQU 


XSPF1 


PAGE ASSIGNED 
1= ASSIGN 






00000004 


XSPPAM 


EQU 


X , 04 i 










BB 00004 


XSPSP 


EQU 


XSPF1 


SHARED PAGE FLAG 






00000002 


XSPSPM 


EQU 


X'02 1 










BB 00004 


XSPPU 


EQU 


XSPF1 


PAGE UNPROCESSED BY LOADER 






♦ 






l=UNPROCESSED 






00000001 


XSPPUM 


EQU 


X , 01 i 








BB 00005 




XSPF2 


DS 


XL1 


FLAG BYTE 2 






BB 00005 


XSPTA 


EQU 


XSPF2 


TEMPORARY EXTERNAL ADDRESS 




00000080 


XSPTAM 


EQU 


X^O* 










BB 00005 


XSPIV 


EQU 


XSPF2 


IVM 


PAGE NON DELETEABLE 






* 






FLAG 






00000040 


XSPIVM 


EQU 


X^O 1 


IVM 


PAGE NON DELETEABLE 






* 






MASK 






BB 00005 


XSPBV 


EQU 


XSPF2 


SETXP ALLOWED AGAINST : 
PAGE 


tVM 


(Listing 


of CHAXSP 


continued < 


on page 391) 
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(Listing of CHAXSP continued from page 390) 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 


COMMENT 






00000020 


XSPBVM 

* 


EQU 


X'20' 


SETXP ALLOWED AGAINST PAGE 
MASK 






BB 00005 


XSPAX 


EQU 


XSPF2 


AUXILIARY STORAGE FLAG 






00000010 


XSPAXM 


EQU 


X'lO 1 








BB 00005 


XSPPC 

* 


EQU 


XSPF2 


PROTECT CLASS 
4 BITS 


BB 


00006 




* 


DS 


X 


RESERVED 
N405.1 


BB 


00007 




XSPFLG 


DS 


XL1 


FLAG BYTE 






BB 00007 


XSPPH 


EQU 


XSPFLG 


PAGE HOLD COUNT FIELD 






OO0OO0F0 


XSPPHM 


EQU 


X'FO 1 








00000008 


XSPPH1 

* 


EQU 


x'os' 


SVC PAGE HOLD FLAG 
N405.1 






BB 00007 


XSPII 


EQU 


XSPFLG 


INCOMING IN-TRANSIT FLAG 






00000004 


XSPIIM 


EQU 


X , 04 i 


INCOMING IN-TRANSIT MASK 






BB 00007 


XSPIO 


EQU 


XSPFLG 


OUTGOING IN-TRANSIT FLAG 






00000002 


XSPIOM 


EQU 


X , 02' 


OUTGOING IN-TRANSIT MASK 






BB 00007 


XSPGQ 


EQU 


XSPFLG 


GQE CHAIN FLAG 






00000001 


XSPGQM 


EQU 


X'Ol 1 


GQE CHAIN MASK 


BB 


00008 






DS 


OF 




BB 


00008 




XSPGQE 


DS 


F 


GQE CHAIN POINTER 



CHAXSP 391 



System Statistics Table (CHASST) 

CHASST maintains system statistics information which is collected and stored by 
the STATSAVE macro instruction. The collection of these statistics permits measure- 
ments of TSS while the system is in operation. 
The 664- byte CHASST is aligned on word boundaries. 

CHASST Storage map 



DEC 



8 
16 
24 
32 
40 
48 
56 
64 
72 



HEX 



0| 

1 


SSTLHT 


1 

1 


SSTLH1 | 


8| 

1 


SSTLH2 


1 

1 


SSTLH3 | 


10| 

1 




SSTZET 




18 | 

1 


SSTPLT 


1 

1 


SSTQLT | 


20| 

1 


SSTLCT 


1 

1 


SSTTWT | 


28 | 

1 


SSTTST 


1 

1 


SSTALT | 


30| 

1 


SSTMIP 


1 

1 


SSTDCP | 


38 | 

i 


SSTCCP 


1 
1 


SSTSCP | 


40| 

1 


SSTPCP 


1 

1 


SSTXCP | 


48| 

1 


SSTAWT 


1 

1 


UNNAMED | 



ORG SSTLHT 



0| 



SSTDRRS 



SSTDRRP 



SSTDRWS 



SSTDRWP 



ORG SSTLHT 



SSTDSRS 



SSTDSRP 



8[ 

L 



SSTDSWS 



SSTDSWP 



Fields in CHASST — by displacement 



DEC 


HEX 


FIELD 


DEC 


HEX 


FIELD 


DEC 


HEX 


FIELD 


0000 


0000 


SSTDSRS 


0012 


oooc 


SSTDSWP 


0044 


002C 


SSTALT 


0000 


0000 


SSTDRRS 


0012 


oooc 


SSTDRWP 


0048 


0030 


SSTMIP 


0000 


0000 


SSTLHT 


0012 


oooc 


SSTLH3 


0052 


0034 


SSTDCP 


0004 


0004 


SSTDSRP 


0016 


0010 


SSTZET 


0056 


0038 


SSTCCP 


0004 


0004 


SSTDRRP 


0024 


0018 


SSTPLT 


0060 


003C 


SSTSCP 


0004 


0004 


SSTLH1 


0028 


001C 


SSTQLT 


0064 


0040 


SSTPCP 


0008 


0008 


SSTDSWS 


0032 


0020 


SSTLCT 


0068 


0044 


SSTXCP 


0008 


0008 


SSTDRWS 


0036 


0024 


SSTTWT 


0072 


0048 


SSTAWT 


0008 


0008 


SSTLH2 


0040 


0028 


SSTTST 


0080 


0050 


SSTLST 
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Alphabetical list of fields in CHASST 



FIELD 
SSTALT 


DEC 
0044 


HEX 
002C 


SSTAWT 


0072 


0048 


SSTCCP 


0056 


0038 


SSTDCP 


0052 


0034 


SSTDRRP 


0004 


0004 


SSTDRRS 


0000 


0000 


SSTDRWP 


0012 


OOOC 


SSTDRWS 


0008 


0008 


SSTDSRP 


0004 


0004 



FIELD 

SSTDSRS 

SSTDSWP 

SSTDSWS 

SSTLCT 

SSTLHT 

SSTLH1 

SSTLH2 - 

SSTLH3 

SSTLST 



DEC 

0000 

0012 

0008 

0032 

0000 

0004 

0008 

0012 

0080 



HEX 

0000 

OOOC 

0008 

0020 

0000 

0004 

0008 

OOOC 

0050 



Assembler listing of CHASST 



LOCATION INSTRUCTION SOURCE 



INST OPER 





95 


00000 


CHASST 


DSECT 




95 00000 






SSTLHT 


DS 


F 


95 00004 






SSTLH1 


DS 


F 


95 00008 






SSTLH2 


DS 


F 


95 0000C 






SSTLH3 


DS 


F 


95 00010 






SSTZET 


DS 


D 


95 00018 






SSTPLT 


DS 


F 


95 0001C 






SSTQLT 


DS 


F 


95 00020 






SSTLCT 


DS 


F 


95 00024 






SSTTWT 


DS 


F 


95 00028 






SSTTST 


DS 


F 


95 0002C 






SSTALT 

* 
* 


DS 


F 


95 00030 






* 

SSTMIP 


DS 


F 


95 00034 






SSTDCP 


DS 


F 


95 00038 






SSTCCP 


DS 


F 


95 0003C 






SSTSCP 


DS 


F 


95 00040 






SSTPCP 


DS 


F 


95 00044 






SSTXCP 


DS 


F 


95 00048 






SSTAWT 


DS 


F 




00000010 


SSTLEN 


EQU 


16 




95 


00000 




|ORG| 


SSTLHT 


95 00000 






SSTDRRS 


DS 


F 


95 00004 






SSTDRRP 


DS 


F 


95 00008 






SSTDRWS 


DS 


F 


95 0000C 






SSTDRWP 


DS 


F 




95 


00000 




|ORG| 


SSTLHT 


95 00000 






SSTDSRS 


DS 


F 


95 00004 






SSTDSRP 


DS 


F 


95 00008 






SSTDSWS 


DS 


F 


95 0000C 






SSTDSWP 


DS 


F 




95 


0004C 




|ORGJ 




95 0004C 








DS 


F 


95 00050 






SSTLST 


DS 


OF 




00000050 


SSTFSL 


EQU 


SSTLST 



FIELD 


DEC 


HEX 


SSTMIP 


0048 


0030 


SSTPCP 


0064 


0040 


SSTPLT 


0024 


0018 


SSTQLT 


0028 


001C 


SSTSCP 


0060 


003C 


SSTTST 


0040 


0028 


SSTTWT 


0036 


0024 


SSTXCP 


0068 


0044 


SSTZET 


0016 


0010 


COMMENT 







SYSTEM STATISTICS TABLE 

SST TOTAL LENGTH-BYTES 

SST AREA 1 -BYTES 

SST AREA 2- BYTES 

SST AREA 3 -BYTES 

ZERO SST PSAETM TIME 

NR. TSE-PAGE LIMIT 

NR. TSE-QUANTA LIMIT 

NR. TSE-LO-CORE 

NR. TSE-TWAIT 

NR. TSE-TSEND SVC 

NR TSE-ALL 

SSTALT INCLUDES TYPES OF TSES 

NOT INDIVIDUALLY SUMMARIZED IN 

SST 

NR MIGRATED PAGES 

NR DELETED CORE PAGES 

NR CREATED CORE PAGES 

NR RECLAIMED SHARED PAGES 

NR RECLAIMED PRIVATE PAGES 

NR RELOCATION EXCEPTIONS 

NR. TSE-AWAIT 

TABLE ENTRY LENGTH=16 BYTES 

NR DRUM READS SHARED 
NR DRUM READS PRIVATE 
NR DRUM WRITES AHARED 
NR DRUM WRITES PRIVATE 

NR DISK READS SHARED 
NR DISK READS PRIVATE 
NR DISK WRITES SHARED 
NR DISK WRITES PRIVATE 



•CHASST 



( 
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Station Identification and Features (CHASTA) 



CHASTA contains information about the hardware features of an RJE work 
station, and about which funtional options requested at the work station. 



CHASTA Storage map 



DEC 




24 



HEX 



0| 




STANAM | 


8 | STATYP | 
I I 


STARS1 


1 1 
1 1 


I 
I 




STAFET | 


8| 

I 


1 

1 




I 

1 




STAFON | 



ORG STAFET 



12 
16 

24 



10| 

I 

181 



ORG STAFUN 



|STAMRF |STATAB (STAPUN | STARES 2 | 



STARES 3 



X 



X 



26 



1A 



I STABRK 



I STAREC 



STARES4 



Fields in CHASTA — by displacement 



DEC HEX FIELD 
0000 0000 STANAM 
0000 0000 STAORG 

0008 0008 STATYP 

0009 0009 STARS1 
0012 000C STAMRF 



DEC HEX FIELD 

0012 000C STAFET 

0013 000D STATAB 

0014 000E STAPUN 

0015 000F STARES2 

0016 0010 STARES3 



DEC HEX FIELD 
0026 001A STABRK 

0026 001A STAFUN 

0027 001B STAREC 

0028 001C STARES4 



Alphabetical list of fields in CHASTA 



FIELD 

STABRK 

STAFET 

STAFUN 

STAMRF 

STANAM 



DEC HEX 
0026 001A 
0012 0O0C 
0026 001A 
0012 000C 
0000 0000 



FIELD 
STAORG 
STAPUN 
STAREC 
STARES 2 
STARES 3 



DEC HEX 
0000 0000 

0014 000E 
0027 001B 

0015 O00F 

0016 0010 



FIELD 
STARES 4 
STARS1 
STATAB 
STATYP 



DEC HEX 
0028 001C 
0009 0009 
0013 000D 
0008 0008 
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Assembler listing of CHASTA 



LOC 


: AT ION 


INSTRUCTION 
96 00000 


SOURCE 
CHASTA 


INST 


OPER 




DSECT 




********************************************* 


* 




CHASTA - DSECT FOR STATION 


ID'S AND ■ 


********************************************* 


96 


00000 




STAORG 


DS 


OD 


96 


00000 




STAN AM 


DS 


CL8 


96 


00008 




STATYP 


DS 


X 






00000001 


STA278 


EQU 


X'Ol' 


96 


00009 




STARS1 


DS 


XL3 


96 


ooooc 




STAFET 


DS 


14X 






96 OOOOC 




|ORG| 


STAFET 


96 


ooooc 




STAMRF 

* 

STAMRFM 

* 


DS 


XL1 






00000001 


EQU 


X f 0l f 


96 


0000D 




STATAB 


DS 


XL1 






00000001 


STATABM 


EQU 


X'Ol 1 


96 


0000E 




STAPUN 


DS 


XL1 






00000001 


STAPUNM 


EQU 


X'Ol' 


96 


OOOOF 




STARES 2 


DS 


XL1 


96 


00010 




STARES 3 


DS 


XL10 


96 


0001A 




STAFUN 


DS 


14X 






96 0001A 




|ORG| 


STAFUN 


96 


0001A 




STABRK 


DS 


XL1 






00000001 


STABRKM 


EQU 


X'Ol' 


96 


0001B 




STAREC 


DS 


XL1 






00000001 


STARECM 


EQU 


X'Ol' 


96 


0001C 




STARES 4 


DS 


3XL4 






00000028 


STALEN 


EQU 


*- STAORG 



COMMENT 

NSRB 412.2 
************************** 

THEIR FEATURES * 

************************** 

START OF STATION DSECT 
STATION NAME OR KEY 
STATION TYPE (CODE) 
INDICATES 278 
RESERVED 
STATION FEATURES 

MULTIPLE RECORD FEATURE 

FLAG 

MULTIPLE RECORD FEATURE 

MASK 

2? 80 TABBING INDICATOR 

2780 TABBING PRESENT 

2780 PUNCH INDICATOR 

2780 PUNCH PRESENT 

RESERVED 

RESERVED 

FUNCTIONAL REQUESTS 

PRINT BREAK CHARS DESIRED 

BREAK CHARS DESIRED 

RECIEVE FROM OTHER STATIONS 

YES 

RESERVED 

LENGTH OF STATION FEATURE 

DSECT 
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Schedule Table Entry (CHASTE) 

The Schedule Table Entry CSTE) contains all scheduling parameters established by 
the system administrator at SYSG£2*/STARTUP. &ach STE controls the priority of a task 
and the time allowed a task before time slice end. 
The 28-byte STE resides in read-only core storage, aligned on word boundaries. 

CHASTE Storage map 



i 



DEC 


8 

16 

24 



HEX 



| STELEVEL | STEPRIOR | STETS VAL 
1 1 1 


ST EQU ANT | S T EDELT A | STEMRQ | 
III 1 


8| STEMAXCR | STEMAXRD 
1 1 


|STEST |STEPULSE| STEAWTEX | 
III 1 


1 | STETSEND | STEMPRE | STEAWAIT | STETWAIT 
1 1 1 1 


| STEFLAGS | STEHLCK | STELCHL | STEWLCK | 
II 1 1 1 


18|STECWO | STELCF |STEMBS | STENSL 
1 1 1 1 


| STEDSH | STERESV | 
1 1 1 



Fields in CHASTE — by displacement 



DEC 
0000 


HEX 
0000 


FIELD 
STELEVEL 


DEC 
0014 


HEX FIELD 
000E STEAfTEX 




DEC 
0021 


HEX 
0015 


FIELD 
STEHLCK 


0001 


0001 


STEPRIOR 


0016 


0010 


STETSEND 




0022 


0016 


STELCHL 


0002 


0002 


STETSVAL 


0017 


0011 


STEMPRE 




0023 


0017 


STEWLCK 


0004 


0004 


STEQUANT 


0018 


0012 


STEAWAIT 




0024 


0018 


STECWO 


0005 


0005 


STEDELTA 


0019 


0013 


STETWAIT 




0025 


0019 


STELCF 


0006 


0006 


STEMRQ 


0020 


0014 


STESDTR 


(EQU) 


0026 


001A 


STEMBS 


0008 


0008 


STEMAXCR 


0020 


0014 


STESRI 


(EQU) 


0027 


001B 


STENSL 


0010 


O0OA 


STEMAXRD 


0020 


0014 


STEPRMPT 


(EQU) 


0028 


001C 


STEDSH 


0012 


000C 


STEST 


0020 


0014 


STERCMP 


(EQU) 


0030 


001E 


STERESV 


0013 


000D 


STEPULSE 


0020 


0014 


STEFLAGS 











Alphabetical list of fields in CHASTE 



FIELD 


DEC 


HEX 


FIELD 


DEC 


HEX 


FIELD 


DEC 


HEX 




STEAWAIT 


0018 


0012 


STEMAXCR 


0008 


0008 


STERCMP 


0020 


0014 


(EQU) 


STEAWTEX 


0014 


000E 


STEMAXRD 


0010 


000A 


STERESV 


0030 


001E 




STECWO 


0024 


0018 


STEMBS 


0026 


001A 


STESDTR 


0020 


0014 


(EQU) 


STEDELTA 


0005 


0005 


STEMPRE 


0017 


0011 


STESRI 


0020 


0014 


(EQU) 


STEDSH 


0028 


001C 


STEMRQ 


0006 


0006 


STEST 


0012 


oooc 




STEFLAGS 


0020 


0014 


STENSL 


0027 


001B 


STETSEND 


0016 


0010 




STEHLCK 


0021 


0015 


STEPRIOR 


0001 


0001 


STETSVAL 


0002 


0002 




STELCF 


0025 


0019 


STEPRMPT 


0020 


0014 (EQU) 


STETWAIT 


0019 


0013 




STELCHL 


0022 


0016 


STEPULSE 


0013 


00OD 


STEWLCK 


0023 


0017 




STELEVEL 


0000 


0000 


STEQUANT 


0004 


0004 











Assembler listing of CHASTE 



LOCATION INSTRUCTION SOURCE INST OPER COMMENT 

97 00000 CHASTE DSECT SCHEDULE TABLE ENTRY 

************************************ 

* THE SCHEDULE TABLE ENTRY CONTROLS THE PRIORITY OF A TASK AND, ONCE * 

* IT GETS CONTROL, THE AMOUNT OF TIME IT CAN RUN BEFORE REACHING * 

* TIME SLICE END. * 

* FIELDS IN THE SCHEDULE TABLE ENTRY ALSO CONTROL THE DETERMINATION * 

* OF THE NEXT ENTRY TO BE USED WHEN ANY OF SEVERAL STIMULI OCCUR. * 
************************************ 

STELEVEL DS XLl RELATIVE ENTRY NUMBER IN 

* SCHED 
STEPRIOR DS XLl THIS FIELD GOVERNS 

* ALLOCATION 

* CPU RESOURCES TO COMPETING TASKS * 
97 00002 STETSVAL DS H LENGTH OF THE TIME SLICE IN 

* * 

* UNITS OF 3.33... MILLISECONDS * 
97 00004 STEQUANT DS XLl THE NUMBER OF TIME SLICES A 

* * 

* TASK IS TO BE GIVEN BEFORE * 
(Listing of CHASTE continued on page 397) 



97 00000 
97 00001 
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(Listing of CHASTE continued from page 396) 



LOCATION 
97 00005 



INSTRUCTION SOURCE 



INST OPER 



COMMENT 



TIME SLICE END OCCURS, 



97 00006 
97 00008 

* 

97 0000A 



97 OO0OC 
97 0000D 

97 0000E 

* 
* 
97 00010 

97 00011 
97 00012 
97 00013 



97 0001** 



STEDELTA DS X RELATIVE LENGTH OF THE 

* INTERVAL 

* WHICH TASK SHOULD BE 

* SCHEDULED TO 

* RECEIVE TIME SLICE, IN 

* UNITS OF 

* 8 53.3 MILLISECONDS. (256 

* TIMES UNIT) 

STEMRQ DS HL2 MAXIMUM RELOCATION/Q 

STEMAXCR DS HL2 THE MAXIMUM NUMBER OF PAGES 

* * 

ALLOWED IN CORE FOR THIS TASK * 

DURING A TIME SLICE. * 



STEMAXRD 

* 

STEST 

STEPULSE 



STEAWTEX 



STETSEND 
STEMPRE 



STEAWAIT 

* 



STETWAIT 

* 



DS H MAXIMUM NUMBER OF DISK 

READS OR WRITES 
A TASK MAY PERFORM DURING 
ONE TIME SLICE 
DS XL1 SCAN THRESHOLD 
DS XL1 THE SCHEDULE TABLE ENTRY TO 
BE * 

A PULSE CONDITION * 

A PULSE STE SVC. * 

MAX TIME, IN UNITS 3.33 
MILLISEC 
THAT A TASK ISSUING AWAIT IS ALLOWED * 
TO REMAIN IN DISP. LIST BEFORE BEING * 
TIME SLICE END * 

SCHEDULE TABLE ENTRY TO BE 
TIME SLICE END OCCURS * 
SCHEDULE TABLE ENTRY TO BE 
USED 
IF A TASK IS FORCED TO TIME SLICE * 



USED WHEN 
OCCURS ON 
DS H 



FORCED TO 
DS XL1 

USED WHEN 
DS XL1 



END BECAUSE OF MAX PAGE READS. 



DS XL1 THE SCHEDULE TABLE ENTRY TO 

BE 
USED WHEN A TASK LEAVES AWAIT * 

STATUS * 

DS XL1 THE SCHEDULE TABLE ENTRY TO 

BE * 

TASK LEAVES TWAIT * 



97 00014 



00000080 



* 
* 



STEFLAGS 
STERCMP 
* 
STERCMPM 

* 

TIME 



USED WHEN 

STATUS. 

DS XL1 

EQU STEFLAGS 



X'40 f 
STEFLAGS 
X'20' 
STEFLAGS 

X f 10 f 



97 00014 STEPRMPT EQU 
00000040 STEPRMPM EQU 
97 00014 STESRI EQU 
00000020 STESRIM EQU 
97 00014 STESDTR EQU 

* 
00000010 STESDTRM EQU 

* 

* 

* 

* 
97 00015 STEHLCK DS 

(Listing of CHASTE continued on page 398) 



FLAG BYTE 

IF THE FLAG IS ON, 

SCHEDULED 
EQU X'80 f STA TIME IS COMPUTED AS 

PRESENT 
THE DELTA TO RUN WHEN THE TASK LEAVES * 
THE INACTIVE LIST. IF FLAG IS OFF, * 
THE SCHEDULED START TIME IS COMPUTED * 
AS SCHEDULED START TIME PLUS THE * 
DELTA- TO- RUN PLUS THE TIME IN THE + 
INACTIVE LIST, AT EXIT INACTIVE LIST. * 
STEFLAGS PRE-EMPT FLAG 

PRE-EMPT MASK 

STEAL REQUEST FLAG 

STEAL REQUEST MASK 

STEDELTA SHOULD BE 

SUBTRACTED 

FROM THE SCHEDULED START 

TIME 

CALCULATION FOR THE TASK 

BEING 

PLACED INTO THE ELIGIBLE 

LIST 

RATHER THAN ADDED. 

HOLDING INTERLOCK CHANGE 

LEVEL 



XL1 
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(Lasting of CHASTE continued from page 397) 
LOCATION INSTRUCTION SOURCE INST OPER 



97 00016 


STELCHL 

* 


DS 


XL1 


97 00017 


STEWLCK 


DS 


XL1 


97 00018 


STECWO 

* 


DS 


XL1 


97 00019 


STELCF 


DS 


XL1 


97 0001A 


STEMBS 

* 


DS 


HL1 


97 0001B 


* 
STENSL 


DS 


XL1 


97 0001C 


STEDSH 

* 


DS 


H 


97 0001E 


STERESV 


DS 


XL2 


00000020 


STESIZE 

* 


EQU 


♦-CHASTE 



*********************** 



COMMENT 

LO CORE/HOLDING INTERLOCK 

LEVEL 

WAITING ON INTERLOCK CHANGE 

LVL 

CONVERSATIONAL WR ONLY EXIT 

HUB 

LOW CORE FTSE EXIT HUB 

MAXIMUM BEHIND SCHEDULE 

TIME M88 

IN UNITS OF 6,7 SECONDS 

N488 
NEXT STEALING LEVEL 
NUMBER OF DRUM PAGES FOR 
FAIR SHARE 

RESERVED M70.2 

SIZE OF SCHEDULE TABLE 
ENTRY 
************* 
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Stack Entry Table (CHASTK) 



CHASTK contains the status of interrupted user programs. The registers and 
PSW as they were at the time of the user interruption are saved in this table 
if the user causes another user program to be invoked instead of immediately 
resuming the interrupted program. 

CHASTK Storage map 



DEC 



HEX 




8 


8 


16 


10 


24 


18 



STKPRV 


STKAET 


STKSAV | 


STKPRG 


STKPRG CCONT) 


STKFL1 


| STKATN | 
f 1 


STKFL2 


STKRCN 









STKLS1 



144 



90 | 



Fields in CHASTK — by displacement 



DEC 


HEX 


FIELD 


0000 


0000 


STKPRV 


0004 


0004 


STKAET 


0008 


0008 


STKSAV 


0012 


oooc 


STKPRG 


0020 


0014 


STKVMM 


0020 


0014 


STKPSH 



DEC HEX FIELD 

0020 0014 STKEND 

0020 0014 STKSCN 

0020 0014 STKUST 

0020 0014 STKLPC 

(EQU) 0020 0014 STKACT 

(EQU) 0020 0014 STKFL1 



DEC HEX FIELD 
(EQU) 0021 0015 STKATN 
(EQU) 0022 0016 STKFL2 
(EQU) 0024 0018 STKRCN 
(EQU) 0028 001C STKLS1 
(EQU) 



Alphabetical list of fields in CHASTK 



FIELD 

STKACT 

STKAET 

STKATN 

STKEND 

STKFL1 

STKFL2 



DEC HEX FIELD 
0020 0014 (EQU) STKLPC 



0004 0004 
0021 0015 



STKLS1 
STKPRG 



0020 0014 (EQU) STKPRV 



0020 0014 
0022 0016 



STKPSH 
STKRCN 



DEC HEX 
0020 0014 
0028 001C 
0012 OOOC 
0000 0000 
0020 0014 
0024 0018 



FIELD 
(EQU) STKSAV 
STKSCN 
STKUST 
STKVMM 
(EQU) 



DEC HEX 
0008 0008 
0020 0014 (EQU) 
0020 0014 (EQU) 
0020 0014 (EQU) 



Assembler listing of CHASTK 



LOCATION INSTRUCTION SOURCE INST OPER COMMENT 

98 00000 CHASTK DSECT STACK ENTRY DSECT 

* N369.2 

*********************************************************************** 

* NSRB 369.2 * 

* THIS DSECT COVERS A SYSTEM TABLE IN WHICH IS SAVED THE STATUS * 

* (REGISTERS ANS PSW) OF INTERRUPTED USER PROGRAMS. STATUS IS SAVED * 

* IF THE USER CAUSES ANOTHER USER PROGRAM TO BE INVOKED INSTEAD OF * 

* IMMEDIATELY RESUMING THE. HALTED PROGRAM. * 
*********************************************************************** 



98 00000 

98 00004 
98 00008 

98 0000C 

98 00014 

(Listing of CHASTK continued on page 400) 



STKPRV 


DS 


A 


* 






* 






STKAET 


DS 


A 


* 






STKSAV 


DS 


A 


* 






* 






STKPRG 


DS 


c: 


* 






STKFL1 


DS 


X 



SAVE AREA POINTER TO CZAMZ1 

CALLER 

WHICH INITIATED PROGRAM 

ADDRESS OF AETD ISSUED BY 

PROGRAM 

CURRENT SOURCE LIST 

ADDRESS (SLPCSL) 

WHEN PROGRAM WAS INITIATED 

NAME BY WHICH PROGRAM WAS 

INVOKED 

FLAGS 
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(Listing of CHASTK continued from page 399) 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 






98 0001** 


STKACT 


EQU 


STKFL1 






00000060 


STKACTM 


EQU 


X'80' 






98 0001** 


STKLPC 


EQU 


STKFL1 






00000040 


STKLPCM 


EQU 


X'40' 






98 00014 


STKUST 


EQU 


STKFL1 






00000020 


STKUSTM 

+ 


EQU 


X^O' 






98 00014 


STKSCN 


EQU 


STKFL1 






00000010 


STKSCNM 


EQU 


X'10" 






98 00014 


STKEND 


EQU 


STKFL1 






00000008 


STKENDM 


EQU 


X^B' 






98 00014 


STKPSH 


EQU 


STKFL1 






00000004 


STKPSHM 


EQU 


X , 04 i 






98 00014 


STKVMM 


EQU 


STKFL1 






00000020 


STKVMMM 


EQU 


X'20' 


98 


00015 




STKATN 

* 


DS 


HL1 


98 


00016 




* 

STKFL2 


DS 


XL2 


98 


00018 




STKRCN 


DS 


A 


98 


0001C 




STKLS1 

* 


DS 


XL120 






00000094 


STKLEN 


EQU 


* -CHASTK 



COMMENT 

LEVEL ACTIVE FLAG 

1=IN USE AND NOT CANCELLED 

LPC FLAG 

1=LEVEL IS LPC OR LPC 

ROUTINE 

USATT FLAG 

1=USATT ACTIVE ON THIS 

LEVEL 

LPC SCAN ROUTINE FLAG 

1= PROGRAM IS LPC SCAN 

ROUTINE 

LPC END ROUTINE FLAG 

l=PROGRAM IS AN LPC END 

ROUTINE 

PUSH COMMAND FLAG 

1= ENTRY CREATED BY PUSH 

COMMAND 

RESERVED FLAG 

16353 
RESERVED MASK 

16353 
AETD LEVEL (ATTENTION COUNT) 
WHEN 

THIS ENTRY WAS CREATED 
RESERVED 

16717 
RCON VALUE OF STACK ENTRY 

16468 
ISALS1 WHEN THIS ENTRY WAS 
CREATED 
ENTRY LENGTH 



4 00 CHASTK 
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System Table (CHASYS) 

The System Table (SYS) maintains information used for accessing the task status 
index chain, and Resident Shared Page Index. SYS contains the time-of-day clock, low 
core thresholds, number of tasks within the wall and in each level, interruption 
information, and data used in time slice and calculations. Pointers to queues and to 
other system control blocks, and paging counts can also be found in the System table. 

CHASYS Storage map 



DEC 



HEX 



8 


8 


16 


10 


24 


18 


32 


20 


40 


28 


48 


30 


56 


38 


64 


40 


72 


48 


80 


50 


88 


58 


96 


60 


104 


68 


|112 


70 


120 


78 



152 
160 
168 
176 
184 
192 
200 
208 
216 



98 



A0 



A8 



B0 



B8 



CO 



C8 



DO 



D8 





SYSPEC 




| SYSLOW 


1 

1 


SYSHI | 


[SYSFLI | 
1 I 


RESERVED 




SYSRSP 




| SYSSPC 


(SYSZZZl 

I 


|SYSZZZ2 | 
1 i 


SYSKEL 






SYSFW 






SYSRT 




| SYSECB 


(SYSPDDLK 
» 


(UNNAMED | SYSXPG 


1 

1 


SYSMGPTP | 


| SYSPSW | 


| SYSfOD | 


| SYSYMD | 




SYSFIT 






SYSLIT 






SYSLT 






SYSPWP 






SYSRT1 






SYSRT 2 






SYSRT3 




1 SYSRT4 




SYSRT5 | 


I SYSRT6 


I 

1 


SYSPTN | SYSTCT 




SYSTLM | 


| SYSTID 


|SYSZZZ3 
1 


| SYSTSILK | SYSXMC | SYSTIMLK | 
11(1 


SYSBUF - | 


| SYSTSIAD | SYSSSKLK ( SYSF2L 
1 1 » 


| SYSCNT | SYSSFS 
1 i 


| SYSSCT | SYSSTL | 
1 1 1 


| SYSCCS | 


| SYSPLS | 


| SYSPLR | 




SYSSPP 






SYSSRP 




l| 


SYSODP 






SYSDPP 




| SYSSPL | SYSSRL | SYSODL 
1 I 1 


1 SYSDPL | SYSSRA 
I 1 


1 

1 


SYSODA | 


!| 


SYSRSV 




| SYSRSC 


(SYSMSK (SYSAMW | 
1 1 1 


| SYSMWX 


1 

1 


SYSMWT |SYSSHALK|SYSZZZ6 | SYSCCL | SYSITL | 
1 1 1 1 I 


) I SYSTWA 


1 

1 


SYSPCB | SYSIAX 


1 
1 


SYSFSV | 


| SYSMXD 


i 

! 


SYSMND (SYSFL2 | SYSNWK | SYSSCN (UNNAMED | 
i 1 I 1 1 



(CHASYS continued on page 402) 
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(CHASYS continued from page 401) 



DEC 


HEX 


224 


E0 


232 


E8 


240 


F0 


248 


F8 


256 


100 


264 


108 


272 


110 


280 


118 


288 


120 


296 


128 


304 


130 


312 


138 


320 


140 


328 


148 



352 


160 


360 


168 


368 


170 


376 


178 


384 


180 


392 


188 


400 


190 


408 


198 


416 


1A0 


424 


1A8 


432 


1B0 


440 


1B8 


448 


1C0 


456 


1C8 


464 


1D0 



(SYSTKSP |SYSTKTK | SYSTSKLK 
I I 1 


[ SYSFL3 | SYSTKID 


| SYSDATA | 

1 1 


1 SYSXTS 


|SYSMC 

1 


jSYSILK | SYSPSL 
1 1 


| SYSPSC | 
I I 




SYSCCAIV 






| SYSRSS | 
1 ! 


RESERVED | 




SYSRCT 








RESERVED | 


| SYSRS1 | 


1 SYSRS2 | 


| SYSRS3 | 


| SYSRS4 | 


| SYSRS5 | 


| SYSRS6 | 


| SYSRPP 


I 
I 


SYSRFL 


i 

I 


SYSRCB | 


| SYSRCS | 


| SYSRPS | 


| SYSRI02 | 


| SYSAST 


i 

1 


SYSAPT 




SYSAAC | 


| UNNAMED 


i 
1 


SYSSHP 


I SYSMXS 


| SYSMNS | 
I I 




SYSSCH 








SYSLSST | 




SYSNTSI 








SYSIDL | 


| 


SYSCTP 








SYSDLY | 


|SYSDTRL |SYSTSEM |SYSPMT 
1 1 1 


| SYSTCR | 
1 i 


SYSTSILG | 


J 


SYSTIMLG 








SYSTSIAG | 




SYSF2G 








SYSSHALG | 




SYSTKSG 








SYSTKTG I 




SYSTSKLG 








SYSPT1 J 


| 


SYSPT2 








SYSPT3 | 




SYSELG 








SYS IN A | 


| 


SYSVMB 






| SYSBLK 


| SYSBLK2 | 
1 1 


|SYSPF (UNNAMED ( 
I t I 


SYSLOQ 




SYSDIP | 


| UNNAMED | 



$ 



(CHASYS continued on page 403) 
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(CHASYS continued from page 402 > 



DEC 
472 



4096 
4104 
4112 
4120 
4128 
4136 
4144 



HEX 
1D8 



1000 
1008 
1010 
1018 
1020 
1028 
1030 



4168 1048 

4176 1050 

4184 1058 

4192 1060 



4320 10E0 
4328 10E8 
4336 10F0 



4464 1170 

4472 1178 

4480 1180 

4488 1188 

4496 1190 



4752 1290 
4760 1298 
4768 12A0 



= 


RESERVED 


= 




SYSPEB | 

1 


SYSUC | 


| SYSSYM 


| SYSPTH | 
1 I 


SYSSLT 1SYSLOW1 | SYSLOW2 | 
1 1 1 


|SYSHI1 (SYSHI2 | 
1 1 I 


RESERVED | 


| SYSKEY | 
i 1 


SYSDAD (SYSSTD [SYSSTC | SYSRCN | 
III 1 


| SYSSCP | 


[SYSD0 |SYSD1 |SYSD2 | SYSD3 | SYSD4 
11111 


\ |SYSD5 |SYSD6 | SYSD7 | 
fill 


(SYS89LK (SYSRTCT | UNNAMED | 
111 1 






UNNAMED 




| SYSLOG (SYSZZZ9 | SYSN1 | RESERVED | 
1 1111 


| SYSBIN 


| SYSCYL | 
1 1 


SYSHED ISYSREC | SYSFLG | 
1 1 1 




SYSPCIOR | 


SYSGQE | 


UNNAMED 


| SYSBINR 


| SYSCYLR | 
1 1 


SYSHEDR |SYSRECR | SYSFLGR | 
1 1 1 




SYSPCIR | 

1 


SYSGQER | 


UNNAMED 


| SYSSEEK1 | 


\\ SYSSRCH1 | 


| SYSTIC1 | 


| SYSRWR1 | 


| 


UNNAMED 


= 


| SYSNOP1 | 


S| SYSSEEK2 | 


| SYSSRCH2 | 



(CHASYS continued on page 404) 
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DEC HEX 

4776 12A8 

4784 12B0 

4792 12B8 



(CHASYS continued from page 40 3) 



5048 



13B8 



SYSTIC2 



SYSRW2 



UNNAMED 



SYSNOP2 



ORG SYSZZZ2 



19 



13 



ISYSRAN 



Fields in CHASYS — by displacement 



DEC 


HEX 


FIELD 




DEC 


HEX 


FIELD 


DEC 


HEX 


FIELD 


0000 


0000 


SYSPEC 




0115 


0073 


SYSCNT 


0235 


OOEB 


SYSILK 


0004 


0004 


SYSLOW 




0116 


0074 


SYSSFS 


0236 


OOEC 


SYSPSL 


0006 


0006 


SYSHI 




0118 


0076 


SYSSCT 


0238 


OOEE 


SYSPSC 


0008 


0008 


SYSSMG 


(EQU) 


0119 


0077 


SYSSTL 


0240 


00F0 


SYSCCAIV 


0008 


0008 


SYSLC 


(EQU) 


0120 


0078 


SYSCCS 


0244 


00F4 


SYSRSS 


0008 


0008 


SYSWE 


(EQU) 


0152 


0098 


SYSPLS 


0248 


00F8 


SYSRCT 


0008 


0008 


SYSWA 


(EQU) 


0160 


00A0 


SYSPLR 


0256 


0100 


SYSRS1 


0008 


0008 


SYSTI 


(EQU) 


0168 


00A8 


SYSSPP 


0264 


0108 


SYSRS2 


0008 


0008 


SYSPC 


(EQU) 


0172 


00 AC 


SYSRAS 


(EQU) 0272 


0110 


SYSRS3 


0008 


0008 


SYSPS 


(EQU) 


0172 


00 AC 


SYSSRP 


0280 


0118 


SYSRS4 


0008 


0008 


SYSFLI 




0176 


00B0 


SYSODP 


0288 


0120 


SYSRSS 


0012 


oooc 


SYSRSP 




0180 


00B4 


SYSDPP 


0296 


0128 


SYSRS6 


0016 


0010 


SYSSPC 




0184 


00B8 


SYSSPL 


0304 


0130 


SYSRPP 


0018 


0012 


SYSZZZ1 




0185 


00B9 


SYSSRL 


0304 


0130 


SYSRIO 


0019 


0013 


SYSRAN 




0186 


00BA 


SYSODL 


0306 


0132 


SYSSR (EQU) 


0019 


0013 


SYSZZZ2 




0187 


00BB 


SYSDPL 


0306 


0132 


SYSSE (EQU) 


0020 


0014 


SYSKEL 




0188 


00BC 


SYSSRA 


0306 


0132 


SYSAR (EQU) 


0024 


0018 


SYSFW 




0190 


00BE 


SYSODA 


0306 


0132 


SYSIR (EQU) 


0028 


001C 


SYSRT 




0192 


OOCO 


SYSRSV 


0306 


0132 


SYSAI (EQU) 


0032 


0020 


SYSECB 




0196 


00C4 


SYSRSC 


0306 


0132 


SYSII (EQU) 


0034 


0022 


SYSPDDLK 




0198 


00C6 


SYSMSK 


0306 


0132 


SYSRFL 


0036 


0024 


SYSXPG 




0199 


00C7 


SYSAMW 


0308 


0134 


SYSRCB 


0038 


0026 


SYSMGPTP 




0200 


00C8 


SYSMWX 


0312 


0138 


SYSRCS 


0040 


0028 


SYSPSW 




0202 


OOCA 


SYSMWT 


0320 


0140 


SYSRPS 


0048 


0030 


SYSTOD 




0204 


OOCC 


SYSSHALK 


0328 


0148 


SYSRI02 


0056 


0038 


SYSYMD 




0205 


OOCD 


SYSZZZ6 


0352 


0160 


SYSAST 


0064 


0040 


SYS FIT 




0206 


OOCE 


SYSCCL 


0354 


0162 


SYSAPT 


0068 


0044 


SYSLIT 




0207 


OOCF 


SYSITL 


0356 


0164 


SYSAAC 


0072 


0048 


SYSLT 




0208 


00D0 


SYSTWA 


0362 


01 6A 


SYSSHP 


0076 


004C 


SYSPWP 




0210 


O0D2 


SYSPCB 


0364 


016C 


SYSMXS 


0080 


0050 


SYSRT1 




0212 


00D4 


SYSIAX 


0366 


016E 


SYSMNS 


0084 


0054 


SYSRT2 




0214 


00D6 


SYSFSV 


0368 


0170 


SYSSCH 


0088 


0058 


SYSRT3 




0216 


00D8 


SYSMXD 


0372 


0174 


SYSLSST 


0092 


005C 


SYSRT4 




0218 


OODA 


SYSMND 


0376 


0178 


SYSNTSI 


0094 


005E 


SYSRT5 




0220 


OODC 


SYSLOCO 


(EQU) 0380 


017C 


SYSIDL 


0096 


0060 


SYSRT6 




0220 


OODC 


SYSRCRD 


(EQU) 0384 


0180 


SYSCTP 


0098 


0062 


SYSPTN 




0220 


OODC 


SYSFL2 


0388 


0184 


SYSDLY 


0100 


0064 


SYSTCT 




0221 


OODD 


SYSNWK 


0392 


0188 


SYSDTRL 


0102 


0066 


SYSTLM 




0222 


OODE 


SYSSCN 


0393 


0189 


SYSTSEM 


0104 


0068 


SYSTID 




0224 


00E0 


SYSTKSP 


0394 


018A 


SYSPMT 


0106 


006A 


SYSZZZ3 




0225 


OOEl 


SYSTKTK 


0395 


018B 


SYSTCR 


0107 


006B 


SYSTSILK 




0226 


00E2 


SYSTSKLK 


0396 


018C 


SYSTSILG 


0108 


006C 


SYSXMC 




0227 


00E3 


SYSASM 


(EQU) 0400 


0190 


SYSTIMLG 


0109 


006D 


SYSTIMLK 




0227 


00E3 


SYSFL3 


0404 


0194 


SYSTSIAG 


0110 


006E 


SYSBUF 




0228 


00E4 


SYSTKID 


0408 


0198 


SYSF2G 


0112 


0070 


SYSTSIAD 




0230 


00E6 


SYSDATA 


0412 


019C 


SYSSHALG 


|0113 


0071 


SYSSSKLK 




0232 


O0E8 


SYSXTS 


0416 


01A0 


SYSTKSG 


0114 


0072 


SYSF2L 




0234 


OOEA 


SYSMC 


0420 


01A4 


SYSTKTG 


(Continued on page 
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DEC 

0424 

0428 

0432 

0436 

0440 

0444 

0448 

0452 

0454 

0456 

0456 

0456 

0458 

0460 

4096 

4096 

4100 

4104 

4106 

4108 

4110 

4111 

4112 

4113 

4120 

4120 

4121 

4124 

4125 

4126 

4128 



HEX 

01A8 
01AC 
01B0 
01B4 
01 B8 
01BC 
01C0 
01C4 
01C6 
01C8 
01 C8 
01C8 
01CA 
01CC 
1000 
1000 
1004 
1008 
100A 
100C 
100E 
100F 
1010 
1011 
1018 
1018 
1019 
101C 
101D 
101E 
1020 



FIELD 

SYSTSKLG 

SYSPT1 

SYSPT2 

SYSPT3 

SYSELG 

SYSINA 

SYSVMB 

SYSBLK 

SYSBLK2 

SYSLP 

SYSPF 

SYSPDD 

SYSLOQ 

SYSDIP 

SYSPEB 

SYSDIC 

SYSUC 

SYSSYM 

SYSPTH 

SYSSLT 

SYSLOW1 

SYSLOW2 

SYSHI1 

SYSHI2 

SYSKEY 

SYSCSW 

SYS DAD 

SYSSTD 

SYSSTC 

SYSRCN 

SYSSCP 



DEC 
4136 
4136 
4137 
4138 
4139 
4140 
4141 
4142 
4143 
(EQU) 4144 
4145 
4168 
4172 
4172 
4172 
4172 
4172 
4172 
4172 
4172 
4172 
4172 
4173 
4173 
4173 
4173 
4173 
4173 
4173 
4173 
4173 



HEX FIELD DEC HEX FIELD 

1028 SYSDO 4176 1050 SYSBIN 

1028 SYSSDA 4176 1050 SYSARG 

1029 SYSD1 4178 1052 SYSCYL 
102A SYSD2 4180 1054 SYSHED 
102B SYSD3 4182 1056 SYSREC 

102C SYSD4 418 3 1057 SYSACT (EQU) 

102D SYSD5 4183 1057 SYSFLG1 (EQU) 

X02E SYSD6 4183 1057 SYSFLG 

102F SYSD7 4184 1058 SYSPCIOR 

1030 SYS89LK 4188 105C SYSGQE 

1031 SYSRTCT 4320 10E0 SYSBINR 
1048 SYSLOG 4320 10E0 SYSARGR 
104C SYSSIX (EQU) 4322 10E2 SYSCYLR 
104C SYSFVE (EQU) 4324 10E4 SYSHEDR 
104C SYSFOR (EQU) 4326 10E6 SYSRECR 

104C SYSTHR (EQU) 4327 10E7 SYSACR (EQU) 

104C SYSTWO (EQU) 4327 10E7 SYSFLGS (EQU) 

104C SYSONE (EQU) 4 327 10E7 SYSFLGR 

104C SYSTON (EQU) 4328 10E8 SYSPCIR 

104C SYSOON (EQU) 4332 10EC SYSGQER 

104C SYSLK (EQU) 4464 1170 SYSSEEK1 
104C SYSZZZ9 4472 1178 SYSSRCH1 

104D SYSRAC (EQU) 4480 1180 SYSTICl 

104D SYSBY (EQU) 4488 1188 SYSRWRl 

104D SYSPE (EQU) 4752 1290 SYSNOP1 

104D SYSSFL (EQU) 4760 1298 SYSSEEK2 

104D SYSDR (EQU) 4768 12A0 SYSSRCH2 

104D SYSPCI (EQU) 4776 12A8 SYSTIC2 

104D SYSWC (EQU) 4784 12B0 SYSRW2 

104D SYSSN (EQU) 5048 13B8 SYSNOP2 
104D SYSN1 



Alphabetical list of fields in CHASYS 



( 



FIELD 



SYSAAC 

SYSACR 

SYSACT 

SYSAI 

SYSAMW 

SYSAPT 

SYSAR 

SYSARG 

SYSARGR 

SYS ASM 

SYSAST 

SYSBIN 

SYSBINR 

SYSBLK 

SYSBLK2 

SYSBUF 

SYSBY 

SYSCCAIV 0240 

SYSCCL 0206 



DEC 

0356 

4327 

4183 

0306 

0199 

0354 

0306 

4176 

4320 

0227 

0352 

4176 

4320 

0452 

0454 

0110 

4173 



SYS CCS 

SYSCNT 

SYSCSW 

SYSCTP 

SYSCYL 

SYSCYLR 

SYS DAD 

SYSDATA 

SYSDIC 

SYSDIP 

SYSDLY 

SYSDPL 

SYS DPP 

SYSDR 

SYSDTRL 



0120 
0115 
4120 
0384 
4178 
4322 
4121 
0230 
4096 
0460 
0388 
0187 
0180 
4173 
0392 



(Continued on 



HEX 

0164 

10 E7 

1057 

0132 

00C7 

0162 

0132 

1050 

10E0 

00E3 

0160 

1050 

10E0 

01C4 

01C6 

006E 

104D 

00 FO 

OOCE 

0078 

0073 

1018 

0180 

1052 

10E2 

1019 

00E6 

1000 

01CC 

0184 

OOBB 

00B4 

104D 

0188 

page 



(EQU) 
(EQU) 
(EQU) 



(EQU) 
(EQU) 



(EQU) 



(EQU) 
406) 



FIELD DEC HEX FIELD DEC HEX 

SYSDO 4136 1028 SYSILK 0235 OOEB 

SYSD1 4137 1029 SYSINA 0444 01BC 

SYSD2 4138 102A SYSIR 0306 0132 (EQU) 

SYSD3 4139 102B SYSITL 0207 OOCF 

SYSD4 4140 102C SYSKEL 0020 0014 

SYSD5 4141 102D SYSKEY 4120 1018 

SYSD6 4142 102E SYSLC 0008 0008 (EQU) 

SYSD7 4143 102F SYSLIT 0068 0044 

SYSECB 0032 0020 SYSLK 4172 104C (EQU) 

SYSELG 0440 01B8 SYSLOCO 0220 OODC (EQU) 

SYSFIT 0064 0040 SYSLOG 4168 1048 

SYSFLG 4183 1057 SYSLOQ 0458 01CA 

SYSFLGR 4327 10E7 SYSLOW 0004 0004 

SYSFLGS 4327 10E7 (EQU) SYSLOW1 4110 100E 

SYSFLG1 4183 1057 (EQU) SYSLOW2 4111 100F 

SYSFLI 0008 0008 SYSLP 0456 01C8 (EQU) 

SYSFL2 0220 OODC SYSLSST 0372 0174 

SYSFL3 0227 00E3 SYSLT 0072 0048 

SYSFOR 4172 104C (EQU) SYSMC 0234 OOEA 

SYSFSV 0214 O0D6 SYSMGPTP 0038 0026 

SYSFVE 4172 104C (EQU) SYSMND 0218 OODA 

SYSFW 0024 0018 SYSMNS 0366 016E 

SYSF2G 0408 0198 SYSMSK 0198 00C6 

SYSF2L 0114 0072 SYSMWT 0202 OOCA 

SYSGQE 4188 105C SYSMWX 0200 00C8 

SYSGQER 4332 10EC SYSMXD 0216 00D8 

SYSHED 4180 1054 SYSMXS 0364 016C 

SYSHEDR 4324 10E4 SYSNOP1 4752 1290 

SYSHI 0006 0006 SYSNOP2 5048 13B8 

SYSHI1 4112 1010 SYSNTSI 0376 0178 

SYSHI2 4113 1011 SYSNWK 0221 OODD 

SYSIAX 0212 00D4 SYSN1 4173 104D 

SYSIDL 0380 017C SYSODA 0190 OOBE 

SYSII 0306 0132 (EQU) SYSODL 0186 OOBA 
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FIELD 


DEC 


HEX 




FIELD 


DEC 


HEX 




FIELD 


DEC 


HEX 






SYSODP 


0176 


O0B0 




SYSRSV 


0192 


ooco 




SYSSSKLK 


0113 


0071 






SYS ONE 


4172 


104C 


(EQU) 


SYSRS1 


0256 


0100 




SYSSTL 


0119 


0077 






SYSOON 


4172 


104C 


(EQU) 


SYSRS2 


0264 


0108 




SYSSYM 


4104 


1008 






SYS PC 


0008 


0008 


(EQU) 


SYSRS3 


0272 


0110 




SYSTCR 


0395 


018B 






SYSPCB 


0210 


00D2 




SYSRS4 


0280 


0118 




SYSTCT 


0100 


0064 






SYS PCI 


4173 


104D 


(EQU) 


SYSRS5 


0288 


0120 




SYSTHR 


4172 


10 4C 


(EQU) 




SYSPCIOR 


4184 


1058 




SYSRS6 


0296 


0128 




SYSTI 


0008 


0008 


(EQU) 




SYSPCIR 


4328 


10E8 




SYSRT 


0028 


001C 




SYSTIC1 


4480 


1180 






SYSPDD 


0456 


01C8 




SYSRTCT 


4145 


1031 




SYSTIC2 


4776 


12A8 






SYSPDDLK 


0034 


0022 




SYSRT1 


0080 


0050 




SYSTID 


0104 


0068 






SYSPE 


4173 


104D 


(EQU) 


SYSRT2 


0084 


0054 




SYSTIMLG 


0400 


0190 






SYSPEB 


4096 


1000 




SYSRT3 


0088 


0058 




SYSTIMLK 


0109 


006D 






SYSPEC 


0000 


0000 




SYSRT4 


0092 


005C 




SYSTKID 


0228 


00E4 






SYSPF 


0456 


01C8 




SYSRT5 


0094 


005E 




SYSTKSG 


0416 


O1A0 






SYSPLR 


0160 


00A0 




SYSRT6 


0096 


0060 




SYSTKSP 


0224 


00E0 






SYSPLS 


0152 


0098 




SYSRWR1 


4488 


1188 




SYSTKTG 


0420 


01A4 






SYSPMT 


0394 


01 8 A 




SYSRW2 


4784 


12B0 




SYSTKTK 


0225 


00E1 






SYS PS 


0008 


0008 


(EQU) 


SYSSCH 


0368 


0170 




SYSTLM 


0102 


0066 






SYSPSC 


0238 


00EE 




SYSSCN 


0222 


OODE 




SYSTOD 


0048 


0030 






SYSPSL 


0236 


00 EC 




SYSSCP 


4128 


1020 




SYSTON 


4172 


104C 


(EQU) 




SYSPSW 


0040 


0028 




SYSSCT 


0118 


0076 




SYSTSEM 


0393 


0189 






SYSPTH 


4106 


100A 




SYSSDA 


4136 


1028 




SYSTSIAD 


0112 


0070 






SYSPTN 


0098 


0062 




SYSSE 


0306 


0132 


(EQU) 


SYSTSIAG 


0404 


0194 






SYSPT1 


0428 


01 AC 




SYSSEEK1 


4464 


1170 




SYSTSILG 


0396 


018C 






SYSPT2 


0432 


01B0 




SYSSEEK2 


4760 


1298 




SYSTSILK 


0107 


006B 






SYSPT3 


0436 


01B4 




SYSSFL 


4173 


104D 


(EQU) 


SYSTSKLG 


0424 


01A8 






SYSPWP 


0076 


004C 




SYSSFS 


0116 


0074 




SYSTSKLK 


0226 


00E2 






SYSRAC 


4173 


104D 


(EQU) 


SYSSHALG 


0412 


01 9C 




SYSTWA 


0208 


00D0 






SYSRAN 


0019 


0013 




SYSSHALK 


0204 


OOCC 




SYSTWO 


4172 


104C 


(EQU) 




SYSRAS 


0172 


O0AC 


(EQU) 


SYSSHP 


0362 


016A 




SYSUC 


4100 


1004 






SYSRCB 


0308 


0134 




SYSSIX 


4172 


104C 


(EQU) 


SYSVMB 


0448 


01C0 






SYSRCN 


4126 


101E 




SYSSLT 


4108 


100C 




SYSWA 


0008 


0008 


(EQU) 




SYSRCRD 


0220 


00DC 


(EQU) 


SYSSMG 


0008 


0008 


(EQU) 


SYSWC 


4173 


104D 


(EQU) 




SYSRCS 


0312 


0138 




SYSSN 


4173 


104D 


(EQU) 


SYSWE 


0008 


0008 


(EQU) 




SYSRCT 


0248 


00F8 




SYSSPC 


0016 


0010 




SYSXMC 


0108 


006C 






SYSREC 


4182 


1056 




SYSSPL 


0184 


00B8 




SYSXPG 


0036 


0024 






SYSRECR 


4326 


10E6 




SYSSPP 


0168 


00A8 




SYSXTS 


0232 


00E8 






SYSRFL 


0306 


0132 




SYSSR 


0306 


0132 


(EQU) 


SYSYMD 


0056 


0038 






SYSRIO 


0304 


0130 




SYSSRA 


0188 


OOBC 




SYSZZZ1 


0018 


0012 






SYSRI02 


0328 


0148 




SYSSRCH1 


4472 


1178 




SYSZZZ2 


0019 


0013 






SYSRPP 


0304 


0130 




SYSSRCH2 


4768 


12A0 


i 


. SYSZZZ3 
'SYSZZZ6 


0106 


006A 






SYSRPS 


0320 


0140 




SYSSRL 


0185 


00 B9 


1 


0205 


00CD 






SYSRSC 


0196 


00C4 




SYSSRP 


0172 


00 AC 




SYSZZZ9 


4172 


104C 






SYSRSP 


0012 


oooc 




SYSSTC 


4125 


101D 




SYS89LK 


4144 


1030 






SYSRSS 


0244 


00F4 




SYSSTD 


4124 


101C 












Assembler 


listinq of 


CHASYS 






















LOCATION 


INSTRUCTION SOURCE INST OPER 


COMMENT 












99 00000 


CHASYS DSECT 




SYSTEM TABLE 








99 00000 






SYSPEC DS 


F 




PTR 


TO START 


DISPATCHABLE £ 










* 








ACTIVE LIST 










99 00004 






SYSLOW DS 


H 




LOW 


CORE THRESHOLD (LOW) 




99 00006 






SYSHI DS 


H 




LOW 


CORE THRESHOLD (HIGH) 




99 00008 






SYSFLI DS 


XL1 


FLAGS 












99 00008 


SYSPS EQU 


SYSFLI 


PUBLIC SEGMENT INDICATOR 






00000080 


SYSPSM EQU 


X f 1 


BO 1 
















99 00008 


SYSPC EQU 


SYSFLI 


PACKING INDICATOR 










00000040 


SYSPCM EQU 


X' J 


40" 
















99 00008 


SYSTI EQU 


SYSFLI 


TASK INITIATION INHIBITION 






00000020 


SYSTIM EQU 


XV 


20' 
















99 00008 


SYSWA EQU 


SYSFLI 


WRITE CHECK 


OPTION FOR 












* 








PAGING TO AUX. 










00000010 


SYSWAM EQU 


x f : 


L0 f 
















99 00008 


SYSWE EQU 


SYSFLI 


WRITE CHECK 


OPTION FOR 












* 








PAGING TO EXT 










00000008 


SYSWH4 EQU 


X f < 


38' 
















99 00008 


SYSLC EQU 


SYSFLI 


LOW 


CORE INDICATOR 






(Listing 


of CHASYS 


continued on page 407) 
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LOCATION 

99 0000C 
99 0000C 
99 00010 
99 00012 

99 00013 

99 00013 

99 00014 

99 00018 

99 0001C 
99 00020 

99 00022 

99 00023 

99 00024 

99 00026 



99 00028 
99 00028 
99 00030 
99 00038 

99 00040 

99 00044 

99 00048 
99 0004C 

99 00050 
99 00054 



99 00058 
99 0005C 
99 0005E 
99 00060 

99 00062 

99 00064 
99 00066 
99 00068 

99 0006A 
(Listing 



INSTRUCTION SOURCE 
00000002 SYSLCM 
99 00008 SYSSMG 
00000001 SYSSMGM 

SYSRSP 
SYSSPC 
SYSZZZ1 

SYSZZZ2 



INST OPER 




99 00013 

SYSRAN 

SYSKEL DS F 

SYSFW DS F 

* 

SYSRT DS F 

SYSECB DS H 

SYSPDDLK DS X 

DS X 

SYSXPG DS H 

SYSMGPTP DS H 

* 

* 

* 

DS 0D 
SYSPSW DS D 
SYSTOD DS D 
SYSYMD DS D 
* 

SYSFIT DS F 
* 

SYSLIT DS F 
* 

SYSLT DS F 
SYSPWP DS F 

SYSRT 1 DS F 

* 

* 

SYSRT2 DS F 

* 

* 

* 

SYSRT3 DS F 

SYSRT4 DS H 

* 

* 

SYSRT5 DS H 

* 

* 

SYSRT6 DS H 

* 

* 

* 

SYSPTN DS H 

SYSTCT DS H 

SYSTLM DS H 

SYSTID DS H 

* 

SYSZZZ3 DS XL1 
of CHASYS continued on page 40 8) 



COMMENT 

SHARED PAGE MIGRATION FLAG 
SHARED PAGE MIGRATION MASK 

RSPI POINTER 

RSPI COUNT 

FOR STATISTICAL GATHERING 

PURPOSES 

UNUSED 

CURRENT REL APPLICATION 

NUMBER N386 

AUX/EXT LOCATION OF 

SKELETON XTSI 

PTR TO START OF ELIGIBLE 

LIST 

RUN TIME TO DATE 

ESTIMATED CORE BLOCKS 

AVAILABLE 

LOCK ON SYSTEM PDD COUNT 

M4138 
RESERVED 
N470 
COUNT TO TRIGGER XTSI 
PAGING N470 
COUNT OF PAGE TABLE PAGES 
FOR N470 
MIGRATION 
N470 

LOW CORE PSW SAVE AREA 
TIME-OF-DAY CLOCK 
DAY-MONTH-YEAR IN SERIAL 
DAYS 

POINTER TO FIRST INACTIVE 
TSI 

POINTER TO LAST INACTIVE 
TSI 

PTR TO END OF ACTIVE LIST 
NUMBER OF PAGE WRITES 
PENDING 

STARTING ADDRESS OF REAL 
TIME INTERVAL 
QUEUE CORE BLOCK 
START ADDRESS OF FIRST 
VALID ENTRY 
IN REAL TIME INTERVAL 
PENDING QUEUE 

ADDRESS PAST LAST ENTRY IN 
REAL TIME 

INTERVAL PENDING QUEUE 
TOTAL NUMBER BYTES IN 
CURRENT REAL TIME 
INTERVAL QUEUE CORE BLOCK 
NUMBER OF BYTES USED IN 
CURRENT REAL 

TIME INTERVAL PENDING QUEUE 
NUMBER BYTES RELEASED FROM 
CURRENT REAL- 
TIME INTERVAL QUEUE CORE 
BLOCK 

NEXT AVAILABLE SHARED PAGE 
TABLE NUMBER 
SYSTEM TSI COUNT 
SYSTEM TSI LIMIT 
LAST TASK ID NUMBER 
ASSIGNED 
UNUSED 
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LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 




w 


0006B 






SYSTSILK 

* 


DS 


XL1 




99 


0006C 






SYSXMC 


DS 


XL1 




99 


0006D 






SYSTIMLK 


DS 


XL1 




99 


0006E 






SYSBUF 


DS 


H 




99 


00070 






SYSTSIAD 

* 


DS 


XL1 




|99 


00071 






SYSSSKLK 

* 


DS 


X 




99 


00072 






SYSF2L 


DS 


XL1 




99 


00073 






SYSCNT 


DS 


XL1 




99 


00074 






SYSSFS 

* 


DS 


H 




99 


00076 






* 
SYSSCT 

* 

SYSSTL 


DS 


XL1 




99 


00077 






DS 


XL1 




99 


00078 






^ 


DS 


OD 




99 


00078 






SYSCCS 

* 

SYSPLS 


DS 


8F 




99 


00098 






DS 


D 




99 


000A0 






SYSPLR 


DS 


D 




99 


000A8 






SYSSPP 

* 

SYSSRP 

♦ 


DS 


F 




99 


000AC 






DS 


F 








99 


000AC 


SYSRAS 


EQU 


SYSSRP 








00000080 


SYSRASM 


EQU 


X - 80' 




99 


000B0 






* 
SYSODP 


DS 


F 




99 


000B4 






SYSDPP 


DS 


F 


• 


99 


000B8 






SYSSPL 


DS 


XL1 




99 


000B9 






SYSSRL 


DS 


XL1 




99 


000BA 






SYSODL 


DS 


XL1 




99 


000BB 






SYSDPL 
SYSSRA 


DS 


XL1 




99 


000BC 






DS 


H 




99 


000BE 






SYSODA 


DS 


H 




99 


OOOCO 






♦ 


DS 


OF 




99 


00OC0 






SYSRSV 


DS 


F 




99 


000C4 






SYSRSC 


DS 


H 




99 


000C6 






SYSMSK 


DS 


XL1 








00000080 


SYSMSKM 


EQU 


x'so' 




99 


000C7 






SYSAMW 

* 


DS 


XL1 




99 


000C8 






DS 


OF 




99 


000C8 






SYSMWX 

* 
SYSMWT 


DS 


H 




99 


00 OCA 






DS 


H 




99 


00OCC 






SYSSHALK 


DS 


XL1 




99 


000CD 






SYSZZZ6 


DS 


XL1 




99 


000CE 






SYSCCL 


DS 


XL1 




99 


000CF 






SYSITL 


DS 


XL1 




99 


000D0 






j|t 


DS 


OF 




99 


000D0 






SYSTWA 


DS 


H 




(Listing 


of 


CHASYS 


continued 
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408 CHASYS 

















COMMENT 

LOCK BYTE FOR SCHEDULING 

ALGORITHM 

EXTERNAL MACHINE CHECK BYTE 

REAL TIME LOCK BYTE 

BUFFER SIZE ON DRUM 

ACTIVATE/DEACTIVATE 

ROUTINES LOCKBYTE 

LOCK FOR SSK INSTRUCTIONS 

17128 

LOCK FOR F2 COUNT 

F2 PENDING COUNT 

SUM OF SPECIFIED FAIR SHARE 

VALUES FOR SPECIAL TASKS 

(MT/T) 
NUMBER OF SPECIAL TASKS 
WITH 

SPECIFIED FAIR SHARE 
VALUES CMT/T) 

ACTUAL MAXIMUM SCHEDULE 
TABLE LEVEL (MT/T) 
ALLIGN TO A DOUBLE WORD 
BOUNDARY 

CONFIGURATION CONSOLE 
SWITCH SETTINGS 
PAGE LOC OF SERR 
PAGE LOC OF RECONFIGURATION 
POINTER TO SERR/RECON PATH 
TBL 

POINTER TO SYS RES PATH 
TABLE 
STATUS OF I PL VOLUME 

* 1=IPL VOLUME REMOVED 
AFTER STARTUP 

* 0=IPL VOLUME MOUNTED 
POINTER TO OPER DEV PATH 
TBL 

POINTER TO PAGING DRUM ADDR 

TBL 

LENGTH OF SERR/RECON PATH 

TBL 

LENGTH OF SYS RES PATH TBL 

LENGTH OF OPER DEV PATH TBL 

LENGTH OF PAGING DRUM ADDR 

TBL 

SYS RES DEV ADDR 

OPER DEV ADDR 

ALLIGN TO A FULL WORD 

BOUNDARY 

POINTER TO SUPERVISOR 

CORE'S RESERVE LIST. 

COUNT OF PAGES IN ABOVE 

LIST. 

SYSTEM MASK 

MAJOR OR MINOR ERROR FLAG 

ASCII, MACH CK MASKS. 

WAIT/PROB STATE 

ALLIGN TO A FULL WORD 

BOUNDARY 

MAXIMUM SHARED PAGES TO 

PURGE 

SCAN SHARED PAGES THRESHOLD 

LOCK BYTE FOR SHARED PAGE 

TABLE CHAINS 

UNUSED 

CONFIGURATION CONSOLE LOCK 

INITIAL TASK LEVEL 

ALLIGN TO A FULL WORD 

BOUNDARY 

AVERAGE CORE USED FOR 



t 



(Listing of CHASYS continued from page 408) 



LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 


99 000D2 






SYSPCB 


DS 


H 


99 000D4 






SYSIAX 


DS 


H 


99 000D6 






SYSFSV 


DS 


H 


99 000D8 






SYSMXD 

at 


DS 


H 


99 OOODA 






SYSMND 


DS 


H 


99 000DC 






SYSFL2 


DS 


XL1 




99 


000DC 


SYSRCRD 


EQU 


SY3FL2 




00000080 


SYSRCRDM 


EQU 


X'80' 




99 


OOODC 


SYSLOCO 


EQU 


SYSFL2 




00000010 


SYSLOCOM 


EQU 


X^O' 


99 OOODD 






SYSNWK 


DS 


XL1 




00000080 


SYSNWKM 


EQU 


X'80' 


99 000DE 






SYSSCN 


DS 


XL1 




00000040 


SYSSCNM 


EQU 


X^O' 


99 OOODF 








DS 


XL1 


99 000E0 






* 


DS 


OF 


99 OO0E0 






SYSTKSP 


DS 


XL1 


99 000E1 






SYSTKTK 


DS 


XL1 


99 000E2 






SYSTSKLK 


DS 


XL1 


99 000E3 






SYSFL3 


DS 


XL1 




99 


000E3 


SYSASM 


EQU 


SYSFL3 




00000080 


SYSASMM 


EQU 


X'80 i 


99 0O0E4 






SYSTKID 


DS 


H 


99 000E6 






SYS DATA 

* 


DS 


H 


99 000E8 






SYSXTS 


DS 


H 


99 OOOEA 






SYSMC 


DS 


XL1 


99 OOOEB 






SYSILK 


DS 


XL1 


99 OOOEC 






SYSPSL 

* 


DS 


H 


99 OOOEE 






SYSPSC 


DS 


H 


99 O0OF0 






SYSCCAIV 


DS 


F 


99 O00F4 






SYSRSS 


DS 


C 




00000080 


SYSRSM 


EQU 


X^O' 


99 000F8 






SYSRCT 

♦ 


DS 


F 


99 00100 






SYSRS1 


DS 


D 


99 00108 






SYSRS2 


DS 


D 


99 00110 






SYSRS3 


DS 


D 


99 00118 






SYSRS4 


DS 


D 


99 00120 






SYSRS5 


DS 


D 


99 00128 






SYSRS6 


DS 


D 


99 00130 






SYSRIO 


DS 


OD 


99 00130 






SYSRPP 


DS 


H 


99 00132 






SYSRFL 


DS 


H 




OOOOOOCO 


SYSRFM 


EQU 


X'CO' 




99 


00132 


SYSII 


EQU 


SYSRFL 




00000080 


SYSIIF 


„EQU 


X' 80' 


(Listing 


of 


CHASYS 


continued 


on page 410) 



COMMENT 

MIGRATION 

NUMBER OF PCB'S TO 

MIGRATION 

MAXIMUM PAGES PER CYLINDER 

FAIR SHARE VALUE, PARTIAL 

DRUM MIGRATION 

UPPER SHARED PAGE DRUM 

THRESHOLD 

LOWER SHARED PAGE DRUM 

THRESHOLD 

FLAGS 

UNUSED 

LOW CORE FLAG 

N447S 
LOW CORE MASK 

N447S 
NO INT SCHED WORK FLAG 
NO INT SCHED WORK MASK 
SCAN FLAG FOR WRITE SHARED 
PAGES 

ON=SCAN ONLY; OFF= PURGE 
ALSO 
UNUSED 

ALLIGN TO A FULL WORD 
BOUNDARY 

TASK TO SUPERVISOR LOCK 
TASK TO TASK LOCK BYTE 
LOCK ON SYSTEM TSI COUNT 
FLAG BYTE 

AUXILIARY SHUTDOWN MESSAGE 
FLAG 

AUXILIARY SHUTDOWN MESSAGE 
MASK 

TASK ID FOR DRAM 
NO. OF ENTRIES TO EXPAND 
PAGE TABLE 
XTSI SIZE LIMIT 
MIGRATION COUNT 
CPU INTERCOMMUNICATION LOCK 
BYTE 

MAX. NO. OF PUBLIC SEGMENTS 
ALLOWED 

COUNT OF PUBLIC SEGMENTS 
INTERRUPTION TIMER VALUE 
RSS ACTIVE 
RSS ACTIVE MASK 
RSS COMMUNICATION TABLE 
ADDR 

LPSW TO ENTER RSS VIA 
PROGRAM INT 

LPSW TO ENTER RSS VIA SVC 
INT 

LPSW TO ENTER RSS VIA INT 
KEY. 

LPSW TO ENTER RSS VIA I/O 
INT. 

LPSW TO ENTER RSS VIA 
CHANNEL INT PROC 
LPSW TO ENTER RSS VIA Q GQE 
ON TSI 

RSS I/O DEVICE TABLE ENTRY 
PHYSICAL PATH 
FLAGS 

I/O OR ATTENTION INTERRUPT 
EXPECTED MASK 
I/O INTERRUPT EXPECTED 
I/O INTERRUPT EXPECTED MASK 
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(Listing of CHASYS continued from page 409 > 



LOCATION INSTRUCTION SOURCE 
99 00132 



00000040 

99 00132 
00000020 
99 00132 

00000010 

99 00132 
00000008 

99 00132 
00000004 



99 00134 
99 00138 
99 00140 
99 00148 
99 00160 

99 00162 

99 00164 

99 00168 
99 0016A 

99 0016C 

99 0016E 

99 00170 
99 00174 

99 00178 
99 0017C 
99 00180 
99 00184 
99 00188 
99 00189 
99 0018A 

99 0018B 

99 0018C 

99 00190 

99 00194 

99 00198 

99 0019C 

99 001A0 

99 001A4 

99 001A8 

99 001AC 

99 001B0 

99 001B4 

(Listing 



SYSAI 

SYSAIF 

* 

SYSIR 

SYSIRM 

SYSAR 

SYSARM 

SYSSE 
SYSSEM 

SYSSR 
SYSSRM 

SYSRCB 

SYSRCS 

SYSRPS 

SYSRI02 

SYSAST 

* 

SYSAPT 

SYSAAC 

* 



INST OPER 
EQU SYSRFL 



EQU 

EQU 
EQU 
EQU 

EQU 

EQU 
EQU 

EQU 
EQU 

DS 
DS 
DS 
DS 
DS 

DS 

DS 

DS 
DS 



X^O' 

SYSRFL 

X^O' 
SYSRFL 

XUO 1 

SYSRFL 
X f 08' 

SYSRFL 
X , 04 t 

F 
D 
D 

3D 
H 

H 



H 

H 



SYSSHP 

* 

SYSMXS DS H 

* 

SYSMNS DS H 

SYSSCH DS F 

SYSLSST DS F 

* 

SYSNTSI DS F 

SYSIDL DS F 

SYSCTP DS F 

SYSDLY DS F 

SYSDTRL DS XL1 

SYSTSEM DS XLl 

SYSPMT DS XLl 

* 

SYSTCR DS XLl 

* 

SYSTSILG DS F 

SYSTIMLG DS F 

SYSTSIAG DS F 

SYSF2G DS F 

* 

SYSSHALG DS F 

SYSTKSG DS . F 

* 

SYSTKTG DS F 

* 

SYSTSKLG DS F 

SYSPT1 DS F 

SYSPT2 DS F 

SYSPT3 DS F 
of CHASYS continued on page 411) 



COMMENT 

ATTENTION INTERRUPT 

EXPECTED 

ATTENTION INTERRUPT 

EXPECTED MASK 

I/O INTERRUPT RECEIVED 

I/O INTERRUPT RECEIVED MASK 

ATTENTION INTERRUPT 

RECEIVED 

ATTENTION INTERRUPT 

RECEIVED MASK 

CSW STORED ON SIO EXPECTED 

CSW STORED ON SIO EXPECTED 

MASK 

CSW STORED ON SIO RECEIVED 

CSW STORED ON SIO RECEIVED 

MASK 

POINTER TO SIORCB 

CSW 

PSW 

SECOND RSS I/O DEVICE ENTRY 

AUXILIARY STOP THRESHOLD 

PARAMETER 

AUXILIARY PRIMARY THRESHOLD 

PARAMETER 

ASSIGNED AUXILIARY COUNT 

FIELD 

UNUSED 

COUNT OF SHARED PAGES IN 

CORE 

MAXIMUM NUMBER OF SHARED 

PAGES 

MINIMUM NUMBER OF SHARED 

PAGES 

SVC CHARGE VALUE 

LOWEST SST AHEAD OF 

SCHEDULED SST VALUE 

NEXT ELIGIBLE TASK TO CHECK 

IDLE TIMER SETTING 

CHANGE TASK SCHEDULE ENTRY 

TSEND DELAY TIME 

DELTA LENGTH 

TSE MAXIMUM COUNT 

COUNT OF PERMITTED TSI'S IN 

DISP. LIST 

TASK CORE 

REQUIREMENT (INITIAL VALUE=64) 

ROUTINE TO LAST ACCESS 

SYSTSILK 

ROUTINE TO LAST ACCESS 

SYSTIMLK 

ROUTINE TO LAST ACCESS 

SYSTSIAD 

ROUTINE TO LAST ACCESS 

SYSF2L 

ROUTINE TO LAST ACCESS 

SYSSHALK 

ROUTINE TO LAST ACCESS 

SYSTKSP 

ROUTINE TO LAST ACCESS 

SYSTKTK 

ROUTINE TO LAST ACCESS 

SYSTSKLK 

POINTER TO FIXED AREA OF 

CHASST 

POINTER TO DRUM AREA OF 

CHASST 

POINTER TO DISK AREA OF 

CHASST 
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(Listing of CHASYS continued from page 410) 



LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 


COMMENT 


99 001B3 






SYSELG 


DS 


F 


NUMBER OF ELIGIBLE TASKS 


99 001BC 






SYSINA 


DS 


F 


NUMBER OF INACTIVE TASKS 


99 001C0 






SYSVMB 


DS 


F 


NUMBER OF TIME IN TICKS 


99 001C4 






SYSBLK 


DS 


H 


MAX PAGES BLOCKED TO DRUM 


99 001C6 






SYSBLK2 

* 


DS 


H 


MAX PAGES BLOCKED TO DRUM 
AND DISK 




000001C8 


SYSIZE 


EQU 


♦-CHASYS 


SIZE OF FIXED LENGTH 








* 






SECTION OF TABLE 


99 001C8 






SYSPDD 


DS 


OD 


DOUBLE WORD ALIGNMENT 








♦ 




***** (SEE NOTE 1) ***** 


99 001C8 






SYSPF 


DS 


XL1 


PAGING DRUM DIRECTORY FLAGS 




99 


O01C8 


SYS LP 


EQU 


SYSPF 


LAST PDD ENTRY FLAG 




00000080 


SYSLPM 


EQU 


X'80 1 


LAST PDD ENTRY MASK 


99 001C9 








DS 


C 


UNUSED 


99 001CA 






SYSLOQ 


DS 


H 


LOCATION ON QUEUE VALUE 


99 001CC 






SYSDIP 

* 


DS 


F 


POINTER TO DRUM INTERFACE 
CONTROL BLOCK 


99 001D0 








DS 


D 


DRUM QUEUE PROCESSOR ENTRY 




99 


01000 




|ORG| 


CHASYS+4096 


99 01000 






SYSDIC 


DS 


OD 


DOUBLE WORD ALIGNMENT 


99 01000 






SYSPEB 

* 


DS 


F 


POINTER TO PAGING ERROR 
CONTROL BLOCK 


99 01004 






SYSUC 

* 


DS 


F 


TOTAL COUNT OF UNPROCESSED 
OPERATIONS 


99 01008 






SYSSYM 

* 


DS 


H 


DRUM SYMBOLIC DEVICE 
ADDRESS 


99 0100A 






SYSPTH 

* 


DS 


H 


LAST PATH USED TO ADDRESS 
DRUM 


99 0100C 






SYSSLT 


DS 


H 


DICE SLOT MASK 


99 0100E 






SYSLOW1 


DS 


XL1 


LOWEST SLOT USED-CHAIN 1 


99 0100F 






SYSLOW2 


DS 


XL1 


LOWEST SLOT USED-CHAIN 2 


99 01010 






SYSHI1 


DS 


XL1 


HIGHEST SLOT USED-CHAIN 1 


99 01011 






SYSHI2 


DS 


XL1 


HIGHEST SLOT USED-CHAIN 2 


99 01018 






SYSCSW 


DS 


OD 


CHANNEL STATUS WORD 


99 01018 






SYSKEY 


DS 


XL1 


KEY FIELD 


99 01019 






SYSDAD 


DS 


3C 


COMMAND ADDRESS 


99 0101C 






SYSSTD 


DS 


XL1 


DEVICE STATUS 


99 0101D 






SYSSTC 


DS 


XL1 


CHANNEL STATUS 


99 0101E 






SYSRCN 


DS 


H 


BYTE COUNT 


99 01020 






SYSSCP 


DS 


D 


PAGING DRUM SENSE CHANNEL 
PROGRAM 


99 01028 






SYSSDA 


DS 


OD 


SENSE DATA AREA 


99 01028 






SYSDO 


DS 


XL1 


SENSE BYTE ONE 


99 01029 






SYSD1 


DS 


XL1 


SENSE BYTE TWO 


99 0102A 






SYSD2 


DS 


XL1 


SENSE BYTE THREE 


99 0102B 






SYSD3 


DS 


XLl 


SENSE BYTE FOUR 


99 0102C 






SYSD4 


DS 


XL1 


SENSE BYTE FIVE 


99 0102D 






SYSD5 


DS 


XL1 


SENSE BYTE SIX 


99 0102E 






SYSD6 


DS 


XL1 


SENSE BYTE SEVEN 


99 0102F 






SYSD7 


DS 


XL1 


SENSE BYTE EIGHT 


99 01030 






SYS8 9LK 

* 
* 

* 


DS 


XL1 


LOCK BYTE PROHIBITS 
INTERACTION BETWEEN 
CEAA8 AND CEAA9 FOR A 
PARTICULAR DRUM 


99 01031 






SYSRTCT 

* 


DS 


X 


SIO RETRY COUNT 
M4244 


99 01032 






* 


DS 


XL2 


RESERVED 
M4244 


99 01034 








DS 


5F 


UNUSED 


99 01048 






SYSLOG 

4= 


DS 


F 


POINTER TO CHANNEL LOGOUT 
GQE 


99 0104C 






SYSZZZ9 


DS 


XL1 


UNUSED 




99 


0104C 


SYSLK 


EQU 


SYSZZZ9 


CURRENT CHAIN STATUS 




99 


0104C 


SYSOON 


EQU 


SYSLK 


CHAIN 1 CAN BE WORKED ON 




00000080 


SYSOONM 


EQU 


X'80' 






99 


0104C 


SYSTON 


EQU 


SYSLK 


CHAIN 2 CAN BE WORKED ON 




00000040 


SYSTONM 


EQU 


X^O - 






99 


0104C 


SYSONE 


EQU 


SYSLK 


CHAIN 1 HAS BEEN POSTED 


(Listing 


of 


CHASYS 


continued 


on page 412) 
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(Listing of CHASYS continued from page 411) 



LOCATION INSTRUCTION SOURCE INST OPER 



99 0104D 



00000020 
99 0104C 
00000010 
99 0104C 
00000008 
99 0104C 
00000004 
99 0104C 
00000002 
99 0104C 
00000001 

99 0104D 
00000080 
99 0104D 
00000040 
99 0104D 
00000020 
99 0104D 
00000010 
99 0104D 
00000008 
99 0104D 

00000004 
99 0104D 

00000002 
99 0104D 
00000001 



99 01050 
99 01050 
99 01052 
99 01054 
99 01056 
99 01057 



99 01057 

00000080 
99 01057 
00000040 



99 01058 
99 0105C 
99 01060 
99 010E0 
99 010E0 
99 010E2 
99 010E4 
99 010E6 
99 010E7 



99 010E7 
00000080 
99 010E7 
00000040 



99 010E8 
99 010EC 
99 010F0 

99 01170 
99 01178 
99 01180 
99 01188 
99 01190 
99 01290 

99 01298 
99 012A0 
99 012A8 
( Listing 



SYSONEM EQU X^O' 

SYSTWO EQU 

SYSTWOM EQU 

SYSTHR EQU 

SYSTHRM EQU 

SYSFOR EQU 

SYSFORM EQU 

SYSFVE EQU 

SYSFVEM EQU 

SYSSIX EQU 

SYSSIXM EQU 

SYSN1 DS 

SYSSN EQU 

SYSSNM EQU 

SYSWC EQU 

SYSWCM EQU 

SYSPCI EQU 

SYS PCI M EQU 

SYSDR EQU 

SYSDRM EQU 

SYSSFL EQU 

SYSSFLM EQU 

SYSPE EQU 

SYSPEM EQU 
SYSBY EQU 

SYSBYM EQU 
SYSRAC EQU 
SYSRACM EQU 

SYSARG DS 
SYSBIN DS 
SYSCYL DS 
SYSHED DS 
SYSREC DS 
SYSFLG DS 
SYSFLG1 EQU 
SYSFLGM EQU 
SYSACT EQU 
SYSACTM EQU 
SYSPCIOR DS 
SYSGQE DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

EQU 



SYSARGR 
SYSBINR 
SYSCYLR 
SYSHEDR 
SYSRECR 
SYSFLGR 
SYSFLGS 
SYSFLGSM EQU 
SYSACR EQU 
SYSACRM EQU 
SYSPCIR DS 
SYSGQER DS 

DS 
* 

SYSSEEK1 DS 
SYSSRCH1 DS 
SYSTIC1 DS 
SYSRWR1 DS 

DS 
SYSNOP1 DS 

SYSSEEK2 DS 
SYSSRCH2 DS 
SYSTIC2 DS 



SYSLK 

X f 10' 

SYSLK 

X'08 f 

SYSLK 

X i 04 t 

SYSLK 

X , 02 f 

SYSLK 

X'01 f 

XL1 

SYSN1 

X f 80' 

SYSN1 

X'40' 

SYSN1 

X^O* 

SYSN1 

X'10' 

SYSN1 

X f 08' 

SYSN1 

X'04' 
SYSN1 

X , 02 i 

SYSN1 
X^l' 

OD 

H 

H 

H 

C 

XL1 

SYSFLG 

X'80 f 

SYSFLG 

X^O 1 

F 

F 

16D 

OD 

H 

H 

H 

C 

XLL 

SYSFLGR 

X'80 f 

SYSFLGR 

X'40 1 

F 

F 

16D 

D 

D 
D 
D 

3 2D 
D 

D 
D 
D 



COMMENT 

CHAIN 2 HAS BEEN POSTED 

1 IS LINKED TO 2 

2 IS LINKED TO 1 
CHAIN 1 IS RUNNING 
CHAIN 2 IS RUNNING 

WAITING ON SENSE OPERATION 

WRITE CHECK OPTION SELECTED 

PCI PENDING 

UNUSED 

SENSE FAIL FLAG 

SENSE FAIL MASK 

PAGING ERROR RECOVERY IN 

PROGRESS 

ERROR RECOVERY ALTERNATE 
PATH BUSY 

REACTIVATION FLAG 
REACTIVATION MASK 
CHAIN SEEK ARGUMENTS 

BB 
CC 

HH 

R 

FLAGS 

DRAM OPERATION 

THIS ARG IS ACTIVE 

PCB/IORCB ADDRESS 

GQE ADDRESS 

REMAINING SEEK ARGUMENTS 

BB 

CC 

HH 

R 

FLAGS 

DRAM OPERATION 

THIS ARG IS ACTIVE 

PCB/IORCB ADDRESS 

GQE ADDRESS 

REMAINING SEEK ARGUMENTS 

CHAIN CHANNEL PROGRAMS 

SEEK CCW-CHAIN 1 

SEARCH CCW-CHAIN 1 

TIC CCW-CHAIN 1 

READ/WRITE CCW-CHAIN 1 

8 CCW PROGRAMS AS ABOVE 

TIC/NOP CCW BETWEEN CHAIN 1 

AND 2 

SEEK CCW-CHAIN 2 

SEARCH CCW-CHAIN 2 

TIC CCW-CHAIN 2 



of CHASYS continued on page 413) 
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(lasting of CHASYS continued from page 412) 

LOCATION INSTRUCTION SOURCE INST OPER COMMENT 

99 012B0 SYSRW2 DS D READ/WRITE CCW-CHAIN 2 

99 012B8 DS 32D 8 CCW PROGRAMS AS ABOVE 

99 013B8 SYSNOP2 DS D TIC/NOP CCW BETWEEN CHAIN 

* AND 1 

* NOTE 1- THE PAGING DRUM DIRECTORY SECTION OF 

* CHASYS (LABELS SYSPF 

* TO SYSDIP) IS VARIABLE IN LENGTH. THERE 

* WILL BE ONE 16 

* BYTE ENTRY FOR EACH PAGING DRUM IN THE 

* SYSTEM CONFIGURATION - 

* 8 BYTES FOR THE INTERRUPT PROCESSOR AND 

* 8 BYTES FOR THE QUEUE PROCESSOR 



CHASYS 413 



TBLOCKS (CHATBD, CHATBC, CHATBS, CHATBO) 

TBLOCKS are built by the LOCFQN function of LOCATE in reply to the ERASE, 
DELETE, DSS?, PC?, UPTDUSER, and QUIT commands. 

TBD is the main TBLOCK; one TBD is created for each dataset. Continuations 
of TBD are placed in TBCs, sharing information is contained in TBSs, and dataset 
owner sharing information is returned in TBOs. 

All TBLOCKS occupy 96 bytes of virtual storage, aligned on doubleword 
boundaries . 

TBLOCK Data Set Descriptor (CHATBD) 

The TBLOCK Data Set Descriptor (TBD) describes the sharing status, access status, 
device type, and volume number of a data set. 

The TBD is created by the LOCFQN function of LOCATE. LOCFQN obtains the infor- 
mation used in TBD from the catalog entry of the dataset. For a dataset residing 
on more than one private volume, LOCFQN creates a chain of continuation blocks 
(TBCs), as many as required. 

TBLOCK Continuation (CHATBC) 



The TBLOCK continuation (CHATBC) supplements the sharing status and volume 
information for a dataset by the TBLOCK dataset descriptors. 

One TBC, capable of describing seven private volumes, is created if a dataset resides 
on more than two private volumes; the first two private volumes being described in the TBD. 
If the dataset contains more than nine private volumes, LOCFQN creates two or more TBCs and 
joins them with pointers to form a chain. The LOCFQN routine obtains the infor- 
mation used in a TBC from the dataset catalog entry. 

TBLOCK Sharers (CHATBS) 

The TBLOCK Sharers (TBS) lists the users who may share a data set, and specifies 
their sharing level and access status. 

The TBS is created by the LOCFQN routine when a data set with sharers is being 
processed. If a data set has many sharers, LOCFQN may create two or more TBSs and 
join them together with pointers to form a chain. At the end of the chain 
TDBASH (or TBDASH if there is no chain) contains X'FFFFFFFF'. 

TBLOCK Owner Table (CHATBO) 



CHATBO contains the fully qualified name of the datset owner as established 
during SHARE command processing.' If the processing of the owner's catalog is 
inhibited by the input option or if the search into the owner's catalog is 
unsuccessful, the reason for the error is returned in the TBO. 

CHATBD Storage map 

DEC HEX 






0| 

1 


TBDADS 


1 

1 


TBDASH | 


8 


8 | TBDDES 

1 


1 
1 




TBDDSI 




16 


10| 

1 


1 
1 


TBDDSM 






1 
1 
1 
1 
1 
1 
30 | 

1 






48 


| TBDDSC | 
1 1 


56 


38 ITBDDSC 

1 


|TBDCNT 
1 


| TBDORG | 
1 1 


UNNAMED 


|TBDACC | TBDOWN | 
1 1 1 



(CHATBD continued on page 415) 



414 CHATBD 



CCHATBD continued from page 414) 



L 



C 



( 



DEC I 


IEX 


















64 


40[ 

1 




TBDOWN (CONT) 




(TBDVON | TBDDVF | 
1 1 1 


72 


H8| TBDDVF (CONT) 

1 


1 

I 




TBDVIF 






80 


501TBDVIF 


| TBDFSF 


i 

1 


TBDDVL 




[TBDVIL j 
1 1 


88 


58| 

I 


TBDVIL 


(CONT) 




1 
1 


TBDFSL 


I TBDFLL | 
1 1 


Fields in 


CHATBD — by displacement 
















DEC HEX 


FIELD 




DEC HEX 


FIELD 




DEC HEX 


FIELD 






0000 OOOC 


TBDADS 




0057 0039 


TBDCNT 




0083 0053 


TBDDVL 






0004 0004 


TBDASH 




0058 003A 


TBDORG 




0083 0053 


TBDVOL 






0008 0008 


TBD05 


(EQU) 


0061 003D 


TBD14 


(EQU) 


0087 0057 


TBDVIL 






0008 0008 


\ TBD03 


(EQU) 


0061 003D 


TBD13 


(EQti) 


0093 005D 


TBDFSL 






0008 0008 


TBD02 


(EQU) 


0061 003D 


TBD12 


(EQU) 


0095 005F 


TBDF8 


(EQU) 




0008 0008 


1 TBD01 


(EQU) 


0061 003D 


TBDACC 




0095 005F 


TBDF7 


(EQU) 




0008 0008 


TBDDES 




0062 003E 


TBDOWN 




0095 005F 


TBDF5 


(EQU) 




0008 000E 


1 TBDFLG 




0070 0046 


TBDVON 




0095 005F 


TBDF4 


(EQU) 




0009 0009 


TBDDSI 




0071 0047 


TBDDVF 




0095 005F 


TBDF3 


(EQU) 




0009 0009 


> TBDDSN 




0071 0047 


«^DVOF 




0095 005F 


TBDF2 


(EQU) 




0018 0012 


\ TBDDSM 




0075 004B 


TBDVIF 




0095 005F 


TBDF1 


(EQU) 




0053 0035 


> TBDDSC 




0081 0051 


TBDFSF 




0095 005F 


TBDFLL 




Alphabetical list of 


fields in 


CHATBD 














FIELD 


DEC HEX 




FIELD 


DEC HEX 




FIELD 


DEC HEX 






TBDACC 


0061 003D 




TBDFLL 


0095 005F 




TBDVIF 


0075 004B 






TBDADS 


0000 0000 




TBDFSF 


0081 0051 




TBDVIL 


0087 0057 






TBDASH 


0004 0004 




TBDFSL 


0093 005D 




TBDVOF 


0071 0047 






TBDCNT 


0057 0039 




TBDF1 


0095 005F 


(EQU) 


TBDVOL 


0083 0053 






TBDDES 


0008 0008 




TBDF2 


0095 005F 


(EQU) 


TBDVON 


0070 0046 






TBDDSC 


0053 0035 




TBDF3 


0095 005F 


(EQU) 


TBD01 


0008 0008 


(EQU) 




TBDDSI 


0009 0009 




TBDF4 


0095 005F 


(EQU) 


TBD02 


0008 0008 


(EQU) 




TBDDSM 


0018 0012 




TBDF5 


0095 005F 


(EQU) 


TBD03 


0008 0008 


(EQU) 




TBDDSN 


0009 0009 




TBDF7 


0095 005F 


(EQU) 


TBD05 


0008 0008 


(EQU) 




TBDDVF 


0071 0047 




TBDF8 


0095 005F 


(EQU) 


TBD12 


0061 003D 


(EQU) 




TBDDVL 


0083 0053 




TBDORG 


0058 003A 




TBD13 


0061 003D 


(EQU) 




TBDFLG 


0008 0008 




TBDOWN 


0062 003E 




TBD14 


0061 003D 


(EQU) 


Assembler 


listing of 


CHATBD 


















LOCATION 


INSTRUCTION SOURCE INST 


OPER 


COMMENT 










9B 00000 


CHATBD DSECT 


TBLOCK DATA SET DESCRIPTOR 




9B 00000 






DS 


0D 












9B 00000 






DS 


0XL96 












9B 00000 




TBDADS DS 


XL4 


POINTER TO NEXT CHATBD 


OR 








* 






CHATBC 








9B 00004 




TBDASH DS 


A 


ADDR OF CHATBS OR CHATBO 








♦ 








N466 








9B 00008 




TBDFLG DS 


0XL1 


FLAG 








9B 00008 




TBDDES DS 


XL1 














9B 00008 


TBD01 EQU 


TBDFLG 


TBLOCK DSD 










9B 00008 


TBD02 EQU 


TBDFLG 


TBLOCK CONTINUATION DSD 






9B 00008 


TBD03 EQU 


TBDFLG 


TBLOCK SHARING LIST 








9B 00008 


TBD05 EQU 


TBDFLG 


TBLOCK OWNER 


FLAG 










♦ 








N466 










00000010 


TBD01M EQU 


X'lO 1 


DSD 


MASK 










00000020 


TBD02M EQU 


X f 20 f 


CONTINUATION 


DSD MASK 








00000080 


TBD03M EQU 


X , 80 t 


SHARING LIST 


MASK 








00000008 


TBD05M EQU 


x'oe 1 


TBLOCK OWNER 


MASK 










* 








N466 








9B 00009 




TBDDSN DS 


0CL44 


DATA SET NAME 






9B 00009 




TBDDSI DS 


CL9 


DATA SET USER- ID AND DELIM 




9B 00012 




TBDDSM DS 


CL35 


DATA SET QUALIFIERS 






9B 00035 




TBDDSC DS 


CL4 


FORMAT "E" DSCB POINTER 




9B 00039 




TBDCNT DS 


XL1 


INDEX SHARING LEVEL 






9B 0003A 




TBDORG DS 


X 


DSORG FLAG 








(Listing 


Of CHATBD 


continued on page 416) 











CHATBD 415 



(Listing of CHATBD continued from page 4151 



LOCATION 


INSTRUCTION 


SOURCE 

* 

TBDSAM 


INST 


OPER 






00000001 


EQU 


X'Ol* 






00000004 


TBDVIM 


EQU 


X , 04 i 






00000005 


TBDVSM 


EQU 


X f 05 f 






00000006 


TBDVPM 


EQU 


X'06 f 


9B 


0003B 






TBDACC 


OS 


2X 


9B 


0003O 






DS 


XL1 






9B 


0003D 


TBD12 


EQU 


TBDACC 






9B 


0003D 


TBD13 


EQU 


TBDACC 






9B 


0003D 


TBD14 


EQU 


TBDACC 






00000000 


TBD12M 


EQU 


X^O^ 






00000001 


TBD13M 


EQU 


X^Ol^ 






00000002 


TB014M 


EQU 


X , 02 f 


9B 


0003E 






TBDOWN 


DS 


CL8 


9B 


00046 






TBDVON 


DS 


XL1 


9B 


00047 






TBDVOF 


DS 


0CL12 


9B 


00047 






TBDDVF 


DS 


XL4 


9B 


0004B 






TBDVIF 


DS 


CL6 


9B 


00051 






TBDFSF 


DS 


XL2 


9B 


00053 






TBDVOL 


DS 


0CL12 


9B 


00053 






TBDDVL 


DS 


XL4 


9B 


00057 






TBDVIL 


OS 


CL6 


9B 


0005D 






TBDFSL 


DS 


XL2 


9B 


0005F 






TBDFLL 


DS 


XL1 






9B 


0005F 


TBDF1 


EQU 


TBDFLL 






9B 


0005F 


TBDF2 


EQU 


TBDFLL 






9B 


0005F 


TBDF3 


EQU 


TBDFLL 






9B 


0005F 


TBDF4 


EQU 


TBDFLL 






9B 


0005F 


TBDF5 


EQU 


TBDFLL 






9B 


0005F 


TBDF7 


EQU 


TBDFLL 






9B 


0005F 


TBDF8 


EQU 


TBDFLL 






00000080 


TBDF1M 


EQU 


X , 80 t 






00000040 


TBDF2M 


EQU 


X^O' 






00000020 


TBDF3M 


EQU 


X 9 2Q 9 






00000010 


TBDF4M 


EQU 


X'10 1 






00000008 


TBDF5M 


EQU 


x^s' 






00000002 


TBDF7M 


EQU 


X f 02 f 






00000001 


TBDF8M 


EQU 


X^l' 



COMMENT 

N466 
SAM MASK 

N466 

VISAM MASK 

N466 
VSAM MASK 

N466 
VPAM MASK 

N466 
RESERVED 

N466 
ACCESS 

READ ONLY ACC 
READ WRITE ACC 
UNLIMITED ACC 
READ ONLY ACC MASK 
READ WRITE ACC MASK 
UNLIMITED ACC MASK 
OWNER ID IF SHARED 

N466 
NUMBER OF VOLUMES ON WHICH 
DS RESIDES 
FIRST VOLUME FIELD 
FIRST DEVICE CODE 
FIRST VOLUME ID 
FIRST FILE SEQUENCE NUMBER 
LAST VOLUME FIELD 
LAST DEVICE CODE 
LAST VOLUME ID 
LAST FILE SEQUENCE NUMBER 
FLAG FIELD 
PUBLIC VOLUME 
BULKIO PENDING 
ERASE AFTER BULKIO PENDING 
EMPTY INDEX 
TEMP. DATA SET FLAG 
SAM ORGANIZATION 
DELETE SHARED DS 
PUBLIC VOLUME MASK 
BULKIO PENDING MASK 
ERASE AFTER BULKIO PENDING 
MASK 

EMPTY INDEX MASK 
TEMP. DATA SET MASK 
SAM ORGANIZATION MASK 
DELETE SHARED DS MASK 



.S 



416 CHATBD 



c 



CHATBC Storage map 



DEC 


8 

16 



32 

40 

56 

64 

80 
88 



HEX 



0| 

1 




TBCADS 




1 

1 




UNNAMED | 


8 | TBCDES 

1 


1 

1 




TBCDVF 




1 
| 


TBCVIF | 


10 | 

1 


TBCVIF 


(CONT) 


1 

1 


TBCFSF 


1 

1 




1 
I 








TBCV02 




20 | 

1 


1 
1 






TBCV03 






28| 

1 


1 
1 




1 
1 








TBCVOU 




38) 

1 


1 
1 






TBCVOS 






40 | 

1 




1 
1 




1 
I 








TBCV06 




50 | 

1 


1 
1 






TBCV07 






58| 

1 




1 
1 


UNNAMED | 



f 



Fields in CHATBC — by displacement 

DEC HEX FIELD 

0000 0000 TBCADS 

0008 0008 TBC05 CBQU) 

0008 0008 TBC03 CEQU) 

0008 0008 TBC02 (EQU) 

0008 0008 TBC01 CEQU) 

0008 0008 TBCDES 



DEC HEX FIELD 

0008 0008 TBCFLG 

0009 0009 TBCDVF 
0009 0009 TBCVOF 
0013 000D TBCVIF 
0019 0013 TBCFSF 
0021 0015 TBCVQ2 



DEC HEX 
0033 0021 
0045 002D 
0057 0039 
0069 0045 
0081 0051 



FIELD 

TBCV03 

TBCV04 

TBCV05 

TBCV06 

TBCVQ7 



Alphabetical list of fields in CHATBC 



FIELD 

TBCADS 

TBCDES 

TBCDVF 

TBCFLG 

TBCFSF 

TBCVIF 



DEC HEX 
0000 0000 

0008 0008 

0009 0009 
0008 0008 
0019 0013 
0013 000D 



FIELD 

TBCVOF 

TBCV02 

TBCV03 

TBCV04 

TBCVOS 

TBCV06 



DEC HEX 
0009 0009 
0021 0015 
0033 0021 
0045 002D 
0057 0039 
0069 0045 



Assembler listing of CHATBC 



LOCATION INSTRUCTION SOURCE 
9A 00000 CHATBC 
9A 00000 
9A 00000 
9A 00000 



( 



9A 00004 

9A 00008 

9A 00008 

9A 00008 
9A 00008 
9A 00008 
9A 00008 

00000010 
00000020 
00000080 
00000008 

(Listing of CHATBC 



TBCADS 

♦ 

TBCFLG 

TBCDES 

TBC01 

TBC02 

TBC03 

TBC05 

* 

TBC01M 

TBC02M 

TBC03M 

TBC05M 

continued 



INST OPER 
DSECT 

DS 0D 

DS 0XL96 

DS F 

DS XL4 

DS 0XL1 

DS XL1 

EQU TBCFLG 

EQU TBCFLG 

EQU TBCFLG 

EQU TBCFLG 

EQU X^O 1 

EQU X^O* 

EQU X'SO 1 

equ x § ob 9 

on page 418) 



FIELD 


DEC 


HEX 




TBCV07 


0081 


0051 




TBC01 


0008 


0008 


CEQU) 


TBC02 


0008 


0008 


(EQU) 


TBC03 


0008 


0008 


(EQU) 


TBC05 


0008 


0008 


(EQU) 



COMMENT 

TBLOCK CONTINUATION 



POINTER TO NEXT CHATBC OR 

CHATBD 

UNUSED 

FLAG 

DESCRIBES THIS TBLOCK 

TBLOCK DSD 

TBLOCK CONTINUATION DSD 

TBLOCK SHARING LIST 

TBLOCK OWNER FLAG 

N466 
DSD MASK 

CONTINUATION MASK 
SHARING LIST MASK 
TBLOCK OWNER MASK 

N466 



CHATBC 417 



(Listing of CHATBC continued from page 417) 





LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 




COMMENT 




9A 


00009 


TBCVOF 


DS 


0CL12 




FIRST VOLUME FIELD 




9A 


00009 


TBCDVP 


DS 


XL4 




FIRST DEVICE CODE 




9A 


ooooo 


TBCVIF 


DS 


CL6 




FIRST VOLUME ID 




9A 


00013 


TBCFSF 


DS 


XL2 




FIRST FILE SEQUENCE NUMBER 




9A 


00015 


TBCV02 


DS 


CL12 




SECOND VOLUME FIELD 




9A 


00021 


TBCV03 


DS 


CL12 




THIRD VOLUME FIELD 




9A 


0002D 


TBCV04 


DS 


CL12 




FOURTH VOLUME FIELD 




9A 


00039 


TBCV05 


DS 


CL12 




FIFTH VOLUME FIELD 




9A 


00045 


TBCV06 


DS 


CL12 




SIXTH VOLUME FIELD 




9A 


00051 


TBCV07 


DS 


CL12 




SEVENTH VOLUME FIELD 




9A 


0005D 




DS 


CL3 




SPARE 


CHATBS 


Storaqe 


map 












DEC 


HEX 

















0| 

I 




TBSASH 




1 

» 


TBSSHN 1 UNNAMED 

1 


8 


8|TBSDES 


I 

1 




TBSUID 




16 


10ITBSUID 

1 


|TBSACC (TBSLVL ( 
1 t 1 








TBSSH2 


24 


181 
1 






i 


32 


20 | 
1 






TBSSH3 






i 




I 

1 

30| 

1 
38| 

I 
40) 

I 






TBSSH4 






48 


i 
.1 

1 

1 




TBSSH5 




56 








TBSSH6 


64 


1 

1 


72 


48) 
I 






TBSSH7 






I 

i 



TBSSH8 



88 



581 



UNNAMED 



Fields in CHATBS — by displacement 



DEC HEX FIELD 
0000 0000 TBSASH 
0004 0004 TBSSHN 
0008 0008 TBS05 
0008 0008 TBS03 
0008 0008 TBS02 
0008 0008 TBS01 
0008 0008 TBSDES 
0008 0008 TBSFLG 



CEQU) 
CEQU) 
(EQU) 4 
(EQU) 



DEC 

0009 

0009 

0017 

0017 

0017 

0017 

0018 

0019 



HEX 

0009 
0009 
0011 
0011 
0011 
0011 
0012 
0013 



FIELD 

TBSUID 

TBSSH1 

TBS14 

TBS13 

TBS12 

TBSACC 

TBSLVL 

TBSSH2 



DEC HEX FIELD 

0029 001D TBSSH3 

0039 0027 TBSSH4 

(EQU) 0049 0031 TBSSH5 

(EQU) 0059 003B TBSSH6 

(EQU) 0069 0045 TBSSH7 

0079 004F TBSSH8 



Alphabetical list of fields in CHATBS 



FIELD 


DEC 


HEX 


TBSACC 


0017 


0011 


TBSASH 


0000 


0000 


TBSDES 


0008 


0008 


TBSFLG 


0008 


0008 


TBSLVL 


0018 


0012 


TBSSHN 


0004 


0004 


TBSSH1 


0009 


0009 


TBSSH2 


0019 


0013 



FIELD 

TBSSH3 

TBSSH4 

TBSSH5 

TBSSH6 

TBSSH7 

TBSSH8 

TBSUID- 

TBS 01 



DEC 

0029 

0039 

0049 

0059 

0069 

0079 

0009 



HEX 

001D 

0027 

0031 

003B 

0045 

004F 

0009 



FIELD 


DEC 


HEX 




TBS02 


0008 


0008 


(EQU) 


TBS03 


0008 


0008 


(EQU) 


TBS05 


0008 


0008 


(EQU) 


TBS12 


0017 


0011 


(EQU) 


TBS13 


0017 


0011 


(EQU) 


TBS14 


0017 


0011 


(EQU) 



0008 0008 (EQU) 



^ 



418 CHATBS 



Assembler listing of CHATBS 



e 



c 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 


COMMENT 






9D 


00000 


CHATBS 


DSECT 




TBLOCK SHARERS 


9D 


00000 








DS 


0D 




9D 


00000 








DS 


0CL96 




9D 


00000 






TBSASH 


DS 


cm 


ADDRESS OF NEXT CHATBS 


9D 


00004 






TBSSHN 

* 


DS 


CL2 


NUMBER OF SHARERS FOR THIS 
CHATBS 


9D 


00006 








DS 


CL2 


SPARE 


9D 


00008 






TBSFLG 


DS 


0CL1 


FLAG 


9D 


00008 






TBSDES 


DS 


XL1 


DESCRIBES THIS TBLOCK 






9D 


00008 


TBS 01 


EQU 


TBSFLG 


TBLOCK DSD 






9D 


00008 


TBS 02 


EQU 


TBSFLG 


TBLOCK CONTINUATION DSD 






9D 


00008 


TBS03 


EQU 


TBSFLG 


TBLOCK SHARING LIST 






9D 


00008 


TBS05 


EQU 


TBSFLG 


TBLOCK OWNER FLAG 
N466 






00000010 


TBS01M 


EQU 


X'lO 1 


DSD MASK 






00000020 


TBS02M 


EQU 


X^O 1 


CONTINUATION DSD MASK 






00000080 


TBS03M 


EQU 


X'80* 


SHARING LIST MASK 






00000008 


TBS05M 


EQU 


x'os 1 


TBLOCK OWNER MASK 










* 






N466 


9D 


00009 






TBSSH1 


DS 


0CL10 


FIRST SHARER FIELD 


9D 


00009 






TBSUID 


DS 


CL8 


SHARER ID 


9D 


00011 






TBSACC 


DS 


CL1 


SHARER ACCESS 






9D 


00011 


TBS12 


EQU 


TBSACC 


READ ONLY ACC 






9D 


00011 


TBS 13 


EQU 


TBSACC 


READ WRITE ACC 






9D 


00011 


TBS14 


EQU 


TBSACC 


UNLIMITED ACC 






00000000 


TBS12M 


EQU 


X'OO* 


READ ONLY ACC MASK 






00000001 


TBS13M 


EQU 


X'Ol 1 


READ WRITE ACC MASK 






00000002 


TBS14M 


EQU 


X , 02 f 


UNLIMITED ACC MASK 


9D 


00012 






TBSLVL 


DS 


CL1 


LEVEL OF SHARING 


9D 


00013 






TBSSH2 


DS 


CLIO 


SECOND SHARER FIELD 


9D 


0001D 






TBSSH3 


DS 


CLIO 


THIRD SHARER FIELD 


9D 


00027 






TBSSH4 


DS 


CLIO 


FOURTH SHARER FIELD 


9D 


00031 






TBSSH5 


DS 


CLIO 


FIFTH SHARER FIELD 


9D 


0003B 






TBSSH6 


DS 


CLIO 


SIXTH SHARER FIELD 


9D 


00045 






TBSSH7 


DS 


CLIO 


SEVENTH SHARER FIELD 


9D 


0004F 






TBSSH8 


DS 


CLIO 


EIGHTH SHARER FIELD 


90 


00059 








DS 


CL7 


SPARE 


CHATBO Storage 


map 















DEC 




HEX 



48 



0) 






TBOFLD | 


8 | TBOFLG 


|TBOFLL 

1 


i 

I 








TBODSN 


01 


f 1 
I 1 








UNNAMED = 



( 



CHATBO 419 



Fields in CHATBO — by displacement 



DEC HEX FIELD 
0000 0000 TBOFID 
0008 0008 TBO05 
0008 0008 TBO04 
0008 0008 TBO03 
0008 0008 TBO02 



DEC 
0008 
(EQU) 0008 
(EQU) 0009 
(EQU) 0009 
(EQU) 0009 



HEX FIELD 
0008 TBO01 

0008 TBOFLG 

0009 TBOF4 
0009 TBOF3 
0009 TBOF2 



DEC HEX FIELD 
(EQU) 0009 0009 TBOFl 

0009 0009 TBOFLL 
(EQU) 0010 000A TBODSN 
(EQU) 
(EQU) 



(EQU) 



Alphabetical list of fields in CHATBO 



FIELD 

TBODSN 

TBOFLD 

TBOFLG 

TBOFLL 

TBOFl 



DEC HEX 

0010 000A 
0000 0000 

0008 0008 

0009 0009 



FIELD 
TBOF2 
TBOF3 
TBOF4 
TBO01 



0009 0009 (EQU) TBO02 



DEC HEX FIELD 

0009 0009 (EQU) TBO03 

0009 0009 (EQU) TBO04 

0009 0009 (EQU) TBO05 

0008 0008 (EQU) 

0008 0008 (EQU) 



DEC HEX 

0008 0008 (EQU) 

0008 0008 (EQU) 

0008 0008 (EQU) 



Assembler listing of CHATBO 



LOCATION INSTRUCTION SOURCE INST OPER COMMENT 

9C 00000 CHATBO DSECT TBLOCK OWNER DSECT 

*********************************************************************** 

* NSRB 466 * 

* THIS DSECT CONTAINS THE FULLY QUALIFIED NAME OF THE DATASET OWNER * 

* AS ESTABLISHED AT 'SHARE* TIME, IF THE PROCESSING OF THE OWNERS * 

* CATALOG IS INHIBITED BY THE THE INPUT OPTION OR THE SEARCH INTO THE * 

* OWNER'S CATALOG IS UNSUCCESSFUL. THE REASON FOR THE ERROR IS ALSO ♦ 

* GIVEN. * 
*********************************************************************** 

RESERVED 

FLAG TO DESCRIBE THIS BLOCK 

TBLOCK DSD FLAG 

TBLOCK DSD MASK 

TBLOCK CONTINUATION DSD 

FLAG 

TBLOCK CONTINUATION DSD 

MASK 

TBLOCK SHARERS MASK 

TBLOCK SHARERS FLAG 

TBLOCK VOLUME FLAG 

TBLOCK VOLUME MASK 

TBLOCK OWNER FLAG 

TBLOCK OWNER MASK 

FLAG TO DESCRIBE 

UNSUCCESSFUL SEARCH 

INTO THE OWNER'S CATALOG. 

NO FLAG IS 

SET IF OWNER 1 S CATALOG NOT 

PROCESSED 

OWNER ID NOT JOINED FLAG 

OWNER ID NOT JOINED MASK 

OWNER DSNAME NONEXISTANT 

FLAG 

OWNER DSNAME NONEXISTANT 

MASK 

SHARER ACCESS NOT 

AUTHORIZED FLAG 

SHARER ACCESS NOT 

AUTHORIZED MASK 

RESERVED FLAG 

RESERVED MASK 

OWNER FULLY QUALIFIED 

DSNAME AS 

EXTRACTED FROM SHARING 

DESCRIPTOR 

RESERVED 



9C 


00000 






DS 


0D 


9C 


00000 




TBOFLD 


DS 


8X 


9C 


00008 




TBOFLG 


DS 


X 






9C 00008 


TBO01 


EQU 


TBOFLG 






00000010 


TBO01M 


EQU 


X'lO' 






9C 00008 


TBO02 

* 


EQU 


TBOFLG 






00000020 


TBO02M 

* 


EQU 


X»20 f 






9C 00008 


TBO03 


EQU 


TBOFLG 






00000080 


TBO03M 


EQU 


X'80 1 






9C 00008 


TBO04 


EQU 


TBOFLG 






00000040 


TBO04M 


EQU 


X'40 f 






9C 00008 


TBO05 


EQU 


TBOFLG 






00000008 


TBO05M 


EQU 


X'OS^ 


9C 


00009 




TBOFLL 

* 


DS 


X 






9C 00009 


* 
* 
TBOFl 


EQU 


TBOFLL 






00000001 


TBOF1M 


EQU 


X'Ol' 






9C 00009 


TBOF2 

* 


EQU 


TBOFLL 






00000002 


TBOF2M 

* 


EQU 


X , 02 t 






9C 00009 


TBOF3 

* 


EQU 


TBOFLL 






00000004 


TBOF3M 

* 


EQU 


X'04 1 






9C 00009 


TBOF4 


EQU 


TBOFLL 






00000008 


TBOF4M 


- EQU 


X , 08 t 


9C 


0000A 




TBODSN 

* 


DS 


CL44 


9C 


00036 




* 


DS 


42X 



J 
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Task Common (CHAT CM) 

Task Common (TCM) provides a single area for those system values referenced in a 
single task by multiple Command Language object modules. 

TCM resides in virtual storage aligned on fullword boundaries. 

CHATCM Storage map 



C 



DEC 


8 

16 
2U 
32 
40 
H8 
56 
6<* 



1560 
1568 



HEX 



| TCfcCOV 
1 


|TCMCOF 

1 


|TCMOPT 


| TCMLVL | 
1 1 


TCMPRV 






8| 
I. 














TCMUID 








10 1 














TCMPWD 








18| 
1. 














TCfcCNO 








20| 

1 


TCMSIN 




1 

1 


TCMSOT 


| TCMTID |TCMUN1 
1 1 


ITCMEXP | 
1 1 


28|TCMPMT 
I 


| TCMUN3 

1 


|TCMLOK 

1 


| TCMRUN | TCMUFP 
1 1 


|TCMATT |TCMLOD 
1 1 


ITCMTMT | 
1 1 


30| 
1. 






TCMLNG 








TCMDDN 






38| 
1. 






TCMVLU 








TCMTDT 






no | 
[ 

1 
1 
1 














TCMINP 






= 


618) 
1. 


|TCMGRD 

1 


|TCMSFG | 
1 1 


TCMAUD | 


620| 
[ 

1 
1 
1. 














TCMDC1 






= 



( 



ORG TCMDC1 



1568 



1768 
1776 
178i» 
1792 
1800 
1808 
1816 



620| 
I 

J 

1 

r 




TCMDCU 


= 


6E8| 

1 


TCMBSN 




TCMBSM | 


6F0|TCMFIR 

1 


|TCMABN |TCMMTT 
1 I 


|TCMSPA | 
( ! 


TCMABV | 


6F8| 

1 


TCMABR 




TCMTOS | 


700 | 
i 


TCMTOS CCONT) 




TCMSTA | 


708| 


TCMSTA (CONT) 




TCMTCT | 


710 J 

1 


TCMAUX 




TCMCXD | 


718| 
1 


TCMAST 




TCMLST | 
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Fields in CHATCM — by displacement 



DEC 

0000 

0000 

0001 

0001 

0002 

0002 

0002 

0003 

0003 

0003 

0004 

0004 

0004 

0004 

0004 

0004 

0004 

0004 

0005 

0006 

0006 

0007 

0008 

0016 

0024 

0032 

0034 

0036 

0038 



HEX 

0000 

0000 

0001 

0001 

0002 

0002 

0002 

0003 

0003 

0003 

0004 

0004 

0004 

0004 

0004 

0004 

0004 

0004 

0005 

0006 

0006 

0007 

0008 

0010 

0018 

0020 

0022 

0024 

0026 



FIELD 

TCMCV1 

TCMCOV 

TCMCF1 

TCMCOF 

TCMOP2 

TCMOP1 

TCMOPT 

TCMLV2 

TCMLV1 

TCMLVL 

TCMPF 

TCMPE 

TCMPD 

TCMPC 

TCMPB 

TCMPA 

TCMPRO 

TCMPRV 

TCMPR1 

TCMPT 

TCMPR2 

TCMPR3 

TCMUID 

TCMPWD 

TCMCNO 

TCMSIN 

TCMSOT 

TCMTID 

TCMABS 



(EQU) 

(EQU) 

(EQU) 
(EQU) 

(EQU) 
(EQU) 

(EQU) 

(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 

(EQU) 
(EQU) 
(EQU) 
(EQU) 



(EQU) 



DEC 

0038 

0038 

0038 

0038 

0038 

0038 

0039 

0039 

0039 

0039 

0039 

0040 

0040 

0041 

0042 

0042 

0043 

0043 

0044 

0044 

0045 

0045 

0045 

0046 

0046 

0047 

0047 

0047 

0048 



HEX 

0026 

0026 

0026 

0026 

0026 

0026 

0027 

0027 

0027 

0027 

0027 

0028 

0028 

0029 

002A 

002A 

002B 

002B 

002C 

002C 

002D 

002D 

002D 

002E 

002E 

002F 

002F 

002F 

0030 



FIELD 

TCMDMRl 

TCMDMR 

TCMBACK 

TCMACR 

TCMBPW 

TCMUN1 

TCMEXP4 

TCMEXP 3 

TCMEXP2 

TCMEXP1 

TCMEXP 

TCMPN1 

TCMPNT 

TCMUN3 

TCMOK1 

TCMLOK 

TCMRN1 

TCMRUN 

TCMLP1 

TCMLFP 

TCMMT2 

TCMMT1 

TCMATT 

TCMLD1 

TCMLOD 

TCMTM2 

TCOTMl 

TCMTMT 

TCMLNG 



(EQU) 
(EQU) 
(EQU) 

(EQU) 
(EQU) 

(EQU) 

(EQU) 
(EQU) 
(EQU) 

(EQU) 



(EQU) 
(EQU) 

(EQU) 

(EQU) 
(EQU) 

(EQU) 

(EQU) 
(EQU) 



DEC 

0052 

0056 

0060 

0064 

1564 

1564 

1564 

1565 

1565 

1565 

1566 

1568 

1568 

1768 

1772 

1776 

1777 

1778 

1779 

1780 

1784 

1788 

1796 

1804 

1808 

1812 

1816 

1820 



HEX 

0034 

0038 

003C 

0040 

061C 

061C 

061C 

061D 

061D 

061D 

061E 

0620 

0620 

06E8 

06EC 

06F0 

06F1 

06F2 

06F3 

06F4 

06F8 

06FC 

0704 

070C 

0710 

0714 

0718 

071C 



FIELD 

TCMDDN 

TCMVLU 

TCMTDT 

TCMINP 

TCMGD2 

TCMGD1 

TCMGRD 

TCMSF2 

TCMSF1 

TCMSFG 

TCMAUD 

TCMDCU 

TCMDC1 

TCMBSN 

TCMBSM 

TCMFIR 

TCMABN 

TCMMTT 

TCMSPA 

TCMABV 

TCMABR 

TCMTOS 

TCMSTA 

TCMTCT 

TCMAUX 

TCMCXD 

TCMAST 

TCMLST 



(EQU) 
(EQU) 

(EQU) 
(EQU) 



Alphabetical list of fields in CHATCM 



FIELD 

TCMABN 

TCMABR 

TCMABS 

TCMABV 

TCMACR 

TCMAST 

TCMATT 

TCMAUD 

TCMAUX 

TCMBACK 

TCMBPW 

TCMBSM 

TCMBSN 

TCMCF1 

TCMCNO 

TCMCOF 

TCMCOV 

TCMCV1 

TCMCXD 

TCMDCU 

TCMDC1 

TCMDDN 

TCMDMR 

TCMDMR1 

TCMEXP 

TCMEXP1 

TCMEXP 2 

TCMEXP3 

TCMEXP 4 



DEC 

1777 

1784 

0038 

1780 

Q038 

1816 

0045 

1566 

1808 

0038 

0038 

1772 

1768 

0001 

0024 

0001 

0000 

0000 

1812 

1568 

1568 

0052 

0038 

0038 

0039 

0039 

0039 

0039 

0039 



HEX 

06F1 

06F8 

0026 

06F4 

0026 

0718 

002D 

061E 

0710 

0026 

0026 

06EC 

06E8 

0001 

0018 

0001 

0000 

0000 

0714 

0620 

0620 

0034 

0026 

0026 

0027 

0027 

0027 

0027 

0027 



(EQU) 
(EQU) 



(EQU) 
(EQU) 



(EQU) 



(EQU) 



(EQU) 
(EQU) 

(EQU) 

(EQU) 
(EQU) 
(EQU) 



FIELD 

TCMFIR 

TCMGD1 

TCMGD2 

TCMGRD 

TCMINP 

TCMLD1 

TCMLFP 

TCMLNG 

TCMLOD 

TCMLOK 

TCMLP1 

TCMLST 

TCMLVL 

Vtcmlvi 

TCMLV2 

TCMMTT 

TCMMT1 

TCMMT2 

TCMOK1 

TCMOPT 

TCMOP1 

TCMOP2 

TCMPA 

TCMPB 

TCMPC 

TCMPD 

TCMPE 

TCMPF 

TCMPNT 



DEC 
1776 

1564 
1564 
1564 
0064 
0046 
0044 
0048 
0046 
0042 
0044 
1820 
0003 
0003 
0003 
1778 
0045 
0045 
0042 
0002 
0002 
0002 
0004 
0004 
0004 
0004 
0004 
0004 
0040 



HEX 

06F0 

061C 

061C 

061C 

0040 

002E 

002C 

0030 

002E 

002A 

002C 

071C 

0003 

0003 

0003 

06 F2 

002D 

00 2D 

002A 

0002 

0002 

0002 

0004 

0004 

0004 

0004 

0004 

0004 

0028 



(EQU) 
(EQU) 



(EQU) 



(EQU) 



(EQU) 

(EQU) 

(EQU) 
(EQU) 

(EQU) 

(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 



FIELD 

TCMPN1 

TCMPRV 

TCMPRO 

TCMPR1 

TCMPR2 

TCMPR3 

TCMPT 

TCMPWD 

TCMRN1 

TCMRUN 

TCMSFG 

TCMSF1 

TCMSF2 

TCMSIN 

TCMSOT 

TCMSPA 

TCMSTA 

TCMTCT 

TCMTDT 

TCMTID 

TCMTMT 

TCMTM1 

TCMTM2 

TCMTOS 

TCMUID 

TCMUN1 

TCMUN3 

TCMVLU 



DEC 

0040 

0004 

0004 

0005 

0006 

0007 

0006 

0016 

0043 

0043 

1565 

1565 

1565 

0032 

0034 

1779 

1796 

1804 

0060 

0036 

0047 

0047 

0047 

1788 

0008 

0038 

0041 

0056 



HEX 

0028 

0004 

0004 

0005 

0006 

0007 

0006 

0010 

002B 

002B 

061D 

061D 

061D 

0020 

0022 

06F3 

0704 

070C 

003C 

0024 

002F 

002F 

002F 

06FC 

0008 

0026 

0029 

0038 



(EQU) 

(EQU) 
(EQU) 
(EQU) 

(EQU) 
(EQU) 

(EQU) 



(EQU) 
(EQU) 



(EQU) 
(EQU) 
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Assembler listing of CHATCM 



c 



( 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 


COMMENT 






9E 00000 


CHATCM 


DSECT 




TASK COMMON 


9E 


00000 




TCMCOV 


DS 


XLl 


CONVERSATIONAL FLAG - 
BINARY 






9E 00000 


TCMCV1 


EQU 


TCMCOV 


TASK IS CONVERSATIONAL FLAG 






00000001 


TCMCV1M 


EQU 


X'Ol 1 


TASK IS CONVERSATIONAL MASK 


9E 


00001 




TCMCOF 


DS 


XL1 


CONFIRMATION FLAG - BINARY 






9E 00001 


TCMCF1 


EQU 


TCMCOF 


CONFIRMATION=YES FLAG 






00000001 


TCMCF1M 


EQU 


X'Ol 1 


CONFIRMATION=YES MASK 


9E 


00002 




TCMOPT 

* 


DS 


XL1 


MESSAGE OPTION FLAG - 
BINARY 






9E 00002 


TCMOP1 


EQU 


TCMOPT * 


TEXT OPTION FLAG 






00000000 


TCMOP1M 


EQU 


X'OO 1 


TEXT OPTION MASK 






9E 00002 


TCMOP2 


EQU 


TCMOPT 


CODE OPTION FLAG 






00000001 


TCMOP2M 


EQU 


X f 01 f 


CODE OPTION MASK 


9E 


00003 




TCMLVL 


DS 


XLl 


NON-CONVERSATIONAL LEVEL 
FLAG- BINARY 






9E 00003 


TCMLV1 


EQU 


TCMLVL 


NON BULKIO FLAG 






00000000 


TCMLV1M 


EQU 


X'00 - 


NON BULKIO MASK 






9E 00003 


TCMLV2 


EQU 


TCMLVL 


BULKIO FLAG 






00000008 


TCMLV2M 


EQU 


X^ 1 


BULKIO MASK 


9E 


00004 




TCMPRV 


DS 


XL4 


TASK COMMAND PRIVILEGE 
CLASS- BITS 






9E 00004 


TCMPRO 


EQU 


TCMPRV 


FIRST CLASS BYTE 






9E 00004 


TCMPA 


EQU 


TCMPRO 


CLASS A 






00000080 


TCMPAM 


EQU 


X f 80 f 








9E 00004 


TCMPB 


EQU 


TCMPRO 


CLASS B 






00000040 


TCMPBM 


EQU 


X^O 1 








9E 00004 


TCMPC 


EQU 


TCMPRO 


CLASS C 






00000020 


TCMPCM 


EQU 


X^O 1 








9E 00004 


TCMPD 


EQU 


TCMPRO 


CLASS D 






00000010 


TCMPDM 


EQU 


X^O 1 








9E 00004 


TCMPE 


EQU 


TCMPRO 


CLASS E 






00000008 


TCMPEM 


EQU 


X'OS 1 








9E 00004 


TCMPF 


EQU 


TCMPRO 


CLASS F 






00000004 


TCMPFM 


EQU 


X f 04 f 








9E 00005 


TCMPR1 


EQU 


TCMPRV+1 


SECOND CLASS BYTE 






9E 00006 


TCMPR2 


EQU 


TCMPRV* 2 


THIRD CLASS BYTE 






9E 00006 


TCMPT 


EQU 


TCMPR2 


CLASS T 






00000010 


TCMPTM 


EQU 


X'lO 1 


CLASS T MASK 






9E 00007 


TCMPR3 


EQU 


TCMPRV* 3 


FOURTH CLASS BYTE 


9E 


00008 




TCMUID 


DS 


CL8 


USER IDENTIFICATION - 
EBCDIC 


9E 


00010 




TCMPWD 


DS 


CL8 


PASSWORD - EBCDIC 


9E 


00018 




TCMCNO 


DS 


CL8 


CHARGE NUMBER - EBCDIC 


9E 


00020 




TCMSIN 


DS 


H 


SYSIN BINARY 


9E 


00022 




TCMSOT 


DS 


H 


SYSOUT BINARY 


9E 


00024 




TCMTID 


DS 


H 


TASK IDENTIFICATION - 
BINARY 


9E 


00026 




TCMUN1 


DS 


XL1 








9E 00026 


TCMBPW 


EQU 


TCMUN1 


PRINT SYSOUT FLAG 






00000080 


TCMBPWM 


EQU 


X^O' 


PRINT SYSOUT MASK 






9E 00026 


TCMACR 


EQU 


TCMUN1 


ACCOUNTING SUBROUTINE HAS 
BEEN M02362 






00000002 


TCMACRM 

* 


EQU 


X f 02 f 


ENTERED WHEN ON 

M02362 






9£ 00026 


TCMBACK 

* 


EQU 


TCMUN1 


BACK TASK 
I0S594 






00000008 


TCMBACK* 

* 


I EQU 


X^' 


BACK TASK MASK 
105594 






9E 00026 


TCMDMR 


EQU 


TCMUN1 








9E 00026 


TCMDMR1 


EQU 


TCMDMR 


ABEND IN PROGRESS FLAG 






00000010 


TCMDMR1M 


I EQU 


XUO 1 


ABEND IN PROGRESS MASK 






9E 00026 


TCMABS 

* 


EQU 


TCMUN1 


ABEND FLAG TO INITIALIZE 
USEACT 






00000001 


TCMABSM 


EQU 


X'Ol' 


ABEND MASK TO INITIALIZE 
USEACT 


9E 


00027 




TCMEXP 


DS 


XL1 


EXPRESS MODE FLAG 



9E 00027 TCMEXP1 EQU TCMEXP 
(Listing of CHATCM continued on page 424) 



EXPRESS MODE 1ST PASS FLAG 



CHATCM 423 



(Listing of CHATCM continued from page 423) 
LOCATION INSTRUCTION SOURCE INST OPER 









00000080 


TCMEXP1M 


EQU 


X^O' 








9E 00027 


TCMEXP2 


BQU 


TCMEXP 








00000040 


TCMEXP2M 


EQU 


X i 40 i 








9E 00027 


TCMEXP3 


EQU 


TCMEXP 








00000020 


TCMEXP3M 


EQU 


X f 20' 








9E 00027 


TCMEXP4 


EQU 


TCMEXP 








00000010 


TCMEXP4M 


EQU 


X'10 1 




9E 


00028 




TCMPNT 




OS 


XL1 








9E 00028 


TCMPN1 


EQU 


TCMPNT 








00000001 


TCMPN1M 


EQU 


X'Ol* 




9E 


00029 




TCMUN3 


DS 


X 








00000001 


TCMSOP 


EQU 


X^l' 




9E 


0002A 




TCMLOK 


DS 


XL1 








9E 0002A 


TCMOKi 


EQU 


TCMLOK 








00000001 


TCMOK1M 


EQU 


X'Ol* 




9E 


0002B 




TCMRUN 


DS 


XL1 








9E 0002B 


TCMRN1 


EQU 


TCMRUN 








00000001 


TCMRN1M 


EQU 


X'Ol* 




9E 


0002C 




TCMLFP 


DS 


XL1 








9E 0002C 


TCMLP1 


EQU 


TCMLFP 








00000001 


TCMLP1M 


EQU 


X^Ol^ 




9E 


0002D 




TCMATT 


DS 


XL1 








9E 0002O 


TCMMT1 


EQU 


TCMATT 








00000000 


TCMMT1M 


EQU 


X^O' 








9E 0002O 


TCMMT2 


EQU 


TCMATT 








00000001 


TCMMT2M 


EQU 


X f 01 f 




9E 


0002E 




TCMLOD 


DS 


XL1 








9E 0002E 


TCMLD1 


EQU 


TCMLOD 








00000001 


TCMLD1M 


EQU 


X^Ol^ 




9E 


0002F 




TCMTMT 


DS 


XL1 








9E 0002F 


TCMTM1 


EQU 


TCMTMT 








00000000 


TCMTM1M 


EQU 


X , 00 i 








9E 0002F 


TC^M2 


EQU 


TCMTMT 








00000001 


TCMTM2M 


EQU 


X - 01 f 




9E 


00030 




TCMLNG 


DS 


F 




9E 


00034 




TCMDDN 


DS 


F 




9E 


00038 




TCMVLU 


DS 


A 




9E 


0003C 




TCMTDT 


DS 


F 




9E 


00040 




TCMINP 


DS 


1500CL1 




9E 


0061C 




TCMGRD 


DS 


XL1 








9E 0061C 


TCMGD1 


EQU 


TCMGRD 








00000000 


TCMGD1M 


EQU 


X^O 1 








9E 0061C 


TCMGD2 


EQU 


TCMGRD 








00000001 


TCMGD2M 


EQU 


X^l' 




9E 


0061D 




TCMSFG 


DS 


XL1 








9E 0061D 


TCMSF1 


EQU 


TCMSFG 








00000001 


TCMSF1M 


EQU 


X'Ol' 








9E 0061O 


TCMSF2 


EQU 


TCMSFG 




(Listing 


Of CHATCM 


continued 


on page 425) 


424 CHATCM 















COMMENT 

EXPRESS MODE 1ST PASS MASK 

EXPRESS MODE NOT 1ST PASS 

FLAG 

EXPRESS MODE NOT 1ST PASS 

MASK 

ABEND CC » 2 IN EXPRESS 

BATCH FLAG 

ABEND CC = 2 IN EXPRESS 

BATCH MASK 

EXPRESS BATCH SYNAD FLAG 

M3895 
EXPRESS BATCH SYNAD MASK 

M3895 
NON- CONVERSATIONAL PRINT 
FLAG - BIN. 
PRINT SYSOUT FLAG 
PRINT SYSOUT MASK 
FLAGS 
16503 

SYSOUT PRINTED FLAG 
16503 

LOGON OK FLAG - BINARY 
TASK LOGGED ON FLAG 
TASK LOGGED ON MASK 
RUN FLAG 

USER PROGRAM FLAG 
USER PROGRAM MASK 
LEFT PAREN SWITCH FLAG 
IS LEFT PAREN FLAG 
IS LEFT PAREN FLAG 
ATTENTION INTERRUPT FLAG. 
SET BY THE DIRECTOR. 
SYSTEM CONTROLS ATTENTION 
INTERRUPT FLAG 
SYSTEM CONTROLS ATTENTION 
INTERRUPT MASK 
USER CONTROLS OWN ATTENTION 
INT FLAG 

USER CONTROLS OWN ATTENTION 
INT MASK 

LOAD FLAG - BINARY 
MODULE LOADED BUT NOT RUN 
FLAG 

MODULE LOADED BUT NOT RUN 
MASK 

TERMINAL COMPONENT FLAG 
TYPEWRITE FLAG 
TYPEWRITER MASK 
CARD READER FLAG 
CARD READER MASK 
MAX. CHARACTER LINE LENGTH 
- BINARY 

GENERATED DDNAME COUNTER - 
BINARY 

ADDR. OF USER TABLE ENTRY 
IN SHARED VM 
TASK DEFINITION TABLE 
POINTER - ADCON 
COMMAND INPUT AREA 
RECORD LENGTH TYPE 
RECORD LENGTH VARIABLE FLAG 
RECORD LENGTH VARIABLE MASK 
RECORD LENGTH FIXED FLAG 
RECORD LENGTH FIXED MASK 
SHUTDOWN FLAG 
SHUTDOWN IN PROGRESS FLAG 
SHUTDOWN IN PROGRESS MASK 
TASK HAS ABENDED FLAG 



^ 



C Listing of CHATCM continued from page 424) 
LOCATION INSTRUCTION SOURCE INST OPER 



COMMENT 



v. 



r 











16385 


00000002 


TCMSF2M 


EQU 


X , 02 i 


TASK HAS ABENDED MASK 
16385 


9E 0061E 


TCMAUD 


DS 


AL2 


OFFSET IN CHAAUL OF THIS 
TASK 


9E 00620 




DS 


OF 


ALLIGNMENT FOR USER TABLE 
DCB 


9E 00620 


TCMDC1 


DS 


368CL1 


RESERVE SPACE FOR USER 
TABLE DCB 


9E 00620 




IORG1 


TCMDC1 


USER TABLE DCB 




TCMDCU 


DCB 


DSORG=VI, 


DDNAME=SYSUSE f LRECL=256 f RKP=8 f KEYLEN= 


9E 00620 


TCMDCU 


DS 


0D 


DOUBLE WORD ALIGNMENT 


9E 00620 




DC 


AL1C113) 


DSORG BYTE 


BYTE 1 


9E 00621 




DC 


FLl'O* 


9E 00622 




DC 


FL2 f - 


MACRF NOT SPECIFIED BYTES 
2-3 


9E 00624 




DC 


A(0) 


EXLIST 
BYTES 4-7 


9E 00628 




DC 


CL8 f SYSUSE f DDNAME 








\<0) 


BYTES 8-15 


9E 00630 




DC 


SYNAD NOT SPECIFIED BYTES 










16-19 


9E 00634 




DC 


A(0) 


SYNAD NOT SPECIFIED BYTES 
20-23 


9E 00638 




DC 


A(0) 


EODAD NOT SPECIFIED BYTES 
24-27 


9E 0063C 




DC 


A(0) 


EODAD NOT SPECIFIED BYTES 
28-31 


9E 00640 




DC 


AL2C0) 


BUFL BYTES 
32-33 


9E 00642 




DC 


AL1(0) 


DEVD BYTE 
34 


9E 00643 




DC 


FLl^O 1 


BUFNO NOT SPECIFIED BYTE 
35 


9E 00644 




DC 


p.Qt 


BUFCB NOT SPECIFIED BYTES 
36-39 


9E 00648 




DC 


FL1 § - 


BFTEK=S OR NOT SPEC BYTE 
40 


9E 00649 




DC 


FLl , f 


NCP NOT SPECIFIED BYTE 
41 


9E 0064A 




DC 


AL1C0) 


RECFM BYTE 
42 


9E 0064B 




DC 


AL1C4) 


OPTCD CPKP=0 f PAD=0> BYTE 43 


9E 0064C 




DC 


AC256) 


LRECL BYTES 
44-47 


9E 00650 




DC 


FL2 , f 


BLKSIZE NOT SPEC. BYTES 
48-49 


9E 00652 




DC 


ALK8) 


KEYLEN BYTE 
50 


9E 00653 




DC 


FLl f f 


DEVICE DEP. PARAM 2 NOT 
SPEC. BYTE 51 


9E 00654 




DC 


FLl'O 1 


EROPT NOT SPECIFIED BYTE 
52 


9E 00655 




DC 


FLl'O' 


PAD NOT SPECIFIED BYTE 
53 


9E 00656 




DC 


AL2C8) 


RKP BYTES 
54-55 


9E 00658 




DC 


3F - f 


BYTES 56-67 


9E 00664 




DC 


C^X*** 


DCB I. D. BYTES 
68-71 


9E 00668 




DC 


3F f f 


BYTES 72-83 


9E 00674 




DC 


X f FFFFFFFF f IMSK 










BYTES 84 


9E 00678 




DC 


4D , i 




9E 00698 




DC 


X'O 9 


RETRY NOT SPECIFIED 


9E 00699 




DC 


X'O 9 


NO POCKET SPECIFIED 
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LOCATION INSTRUCTION 


SOURCE 


INST 


OPER 


9E 0069A 


♦ 


DC 


X'00 f 


9E 0069B 


DC 


X^* 


9E 0069C 




DC 


F'O^ 


9E 006A0 




DC 


7D f 0' 


9E 006D8 




DC 


F t i 


9E 006DC 


* 


DC 


CI^'O' 


9E 006DD 


DC 


3X , 00 i 


9E 006E0 




DC 


F f f 


9E 006E4 


♦ 


DC 


x f oo f 


9E 006E5 


DC 


3X § 00 f 


9E 006E8 


TCMBSN 


ps 


CL4 


9E 006EC 


TCMBSM 


DS 


CL4 


9E 006FO 


TCMFIR 


DS 


CL1 


9E 006F1 


TCMABN 


DS 


CL1 


00000001 


TCMSAR 


EQU 


X f 01 - 


9E 006F2 


TCMMTT 


DS 


CL1 


00000001 


TCMMTTM 


EQU 


X'Ol^ 


9E 006F3 


TCMSPA 


DS 


XL1 


9E 006F4 


TCMABV 


DS 


CL4 


9E 006F8 


TCMABR 


DS 


CL4 


9E 006FC 


TCMTOS 


DS 


2F 


9E 00704 


TCMSTA 


DS 


CL8 


9E 0070C 


TCMTCT 


DS 


F 


9E 00710 


TCMAUX 
TCMCXD 


DS 


F 


9E 00714 


0S 


F 


9E 00718 


TCMAST 


DS 


A 


9E 0071C 


TCMLST 


DS 


F 



COMMENT 

INHMSG NOT SPECIFIED 

BYTE 122 
NO COMBINE 



FORMTYP NOT SPECIFIED 
BYTE 188 



RJE NOT SPECIFIED 
BYTE 196 

NON CONVERSATIONAL TASKS 

BATCH SEQUENCE NUMBER 

BSN ASSGND CMD/MACRO ISSUED 

15525 
FORTRAN INTERRUPT RECOVERY 

SPECIAL PURPOSE ABEND 
MTT APPLICATION TASK FLAG 

N386** 
MTT APPLICATION TASK MASK 

N386** 
RESERVED 

N386 
VCON OF SPECIAL PURPOSE 
RCON-ABEND ROUTINE 
SIGN-ON TIME — MICROSECONDS 
SINCE 3/1/00 

RJE STATION IDENTIFICATION 
TCT POINTER FOR TASK 
CRT AM) 

AMT OF AUX STORAGE ASSIGNED 
TO TASK 
LENGTH OF CURRENT PRV TABLE 

N480 
ADDR OF AVAILABLE SLOT 
TABLE N480 
LENGTH OF AVAILABLE SLOT 
TABLE N480 
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Terminal Control Table (CHATCT) 

Two types of TCT exist in TSS: system TCTs contain an entry for each task 
attached to the system, and are used by RTAM to locate a task which is ready to use 
TSS/360; application TCTs contain data describing the activity of each terminal 
attached to an MTT task, and are used by RTAM to regulate the processing of all 
attached tasks. CHATCT occupies one full page of storage. 

CHATCT Storage map 



DEC 


B 

16 

24 

32 

40 
48 



4080 
4088 



HEX 



V 



| TCTLCK | TCTSTS | 
1 1 1 


TCTMLN 


1 

1 


TCTVMA 




81 

1 


TCTTIO 




| TCTRLN 

1 


| TCTFL1 

1 


|TCTFL2 

1 


10| 

1 






TCTCOL 






18| 

1 


TCTTDE 




|TCTDTY | 
1 1 


TCTWFD 




20 | TCTPDA 

1 


1 
1 


TCTSDA 


1 

1 


TCTBUF 





28ITCTCNT |TCTUSE |TCTFL4 | UNNAMED | 

i i i i !l 

301 
i 



TCTTSI 



FF0J 



FF8 



ORG TCTCOL 



16 10 1 



RESERVED 



TCTFPV 




1 

1 


TCTBPV 




TCTABC | TCTLOC 


| TCTATS 

1 


1 

1 


UNNAMED 




j 


TCTWTC 


|TCTCWT 
1 


1 
1 


TCTRDC 


| TCTCRD 
1 



ORG TCTWFD 



29 


ID 








1 TCTWSV 

i 


TCTWWK 1 TCTWRS | 
1 I 


Fields 


in CHATCT 


— by displacement 
















DEC 


HEX FIELD 


DEC 


HEX FIELD 


DEC 


HEX 


FIELD 






0000 


0000 TCTLCK 


0020 


0014 TCTRDC 


0040 


0028 


TCTCNT 






0001 


0001 TCTSTS 


0023 


0017 TCTCRD 


0041 


0029 


TCTTTY 


(EQU) 




0002 


0002 TCTMLN 


0024 


0018 TCTTDE 


0041 


0029 


TCTUSE 






0004 


0004 TCTVMA 


0028 


001C TCTDTY 


0042 


00 2A 


TCTCK 


CEQU) 




0008 


0008 TCTTIO 


0029 


001D TCTWSV 


0042 


002A 


TCTFL4 






0012 


000C TCTRLN 


0029 


001D TCTWFD 


0044 


00 2C 


TCTTSI 






0014 


000E TCTFL1 


0030 


001E TCTWWK 


4080 


0FF0 


TCTFPV 






0015 


00 OF TCTFL2 


0031 


001F TCTWRS 


4084 


0FF4 


TCTBPV 






0016 


0010 TCTWTC 


0032 


0020 TCTPDA 


4088 


0FF8 


TCTABC 






0016 


0010 TCTCOL 


0034 


0022 TCTSDA 


4090 


0FFA 


TCTLOC 






0019 


0013 TCTCWT 


0036 


0024 TCTBUF 


4091 


0FFB 


TCTATS 
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Alphabetical list of fields in CHATCT 





FIELD 


DEC HEX 


FIELD 


DEC HEX 


FIELD DEC HEX 




TCTABC 


4088 0FF8 


TCTFL2 


0015 000F 


TCTTDB 0024 0018 




TCTATS 


4091 OFFB 


TCTFL4 


0042 002A 


TCTTIO 0008 0008 




TCTBPV 


4084 0FF4 


TCTFPV 


4080 OFFO 


TCTTSI 0044 002C 




TCTBUF 


0036 0024 


TCTLCK 


0000 0000 


TCTTTY 0041 0029 (EQU) 




TCTCK 


0042 002A 


(EQU) TCTLOC 


4090 OFFA 


TCTUSE 0041 0029 




TCTCNT 


0040 0028 


TCTMLN 


0002 0002 


TCTVMA 0004 0004 




TCTCOL 


0016 0010 


TCTPDA 


0032 0020 


TCTWFD 0029 001D 




TCTCRD 


0023 0017 


TCTRDC 


0020 0014 


TCTWRS 0031 001F 




TCTCWT 


0019 0013 


TCTRLN 


0012 OOOC 


TCTWSV 0029 001D 




TCTDTY 


0028 001C 


TCTSDA 


0034 0022 


TCTWTC 0016 0010 




TCTFL1 


0014 000E 


TCTSTS 


0001 0001 


TCTWWK 0030 001E 


Assembler 


listi 


.nor of 


CHATCT 












LOCATION 


INSTRUCTION SOURCE 


INST OPER 


COMMENT 








9F 00000 


CHATCT 


DSECT 






9F 


00000 




TCTLCK 


DS 


X 


LOCK BYTE 




9F 


00001 




TCTSTS 

# 


DS 


X 


STATUS BYTE -(SET BY TCS 
ROUT) 








00000080 


TCTCMP 


EQU 


X^O' 


PREPARE CCW INDICATOR BIT 








00000040 


TCTRDR 


EQU 


X , 40 t 


READ REQUIRED BIT 








00000020 


TCTBFO 


EQU 


X i 20 i 


BUFFER OVERFLOW 








00000010 


TCTPCI 


EQU 


X'lO* 


PCI BIT 








00000008 


TCTDAT 


EQU 


X*QS 9 


TWO PAGE DATA AREA 








00000004 


TCTSPP 

* 


EQU 


X f 04 f 


SUPERVISOR PAGE FOR WRITE 

DATA 








00000002 


TCTCNP 


EQU 


X f 02 # 


COMPLETE IO BIT 








00000001 


TCTHIO 


EQU 


X^l* 


HALT I/O FLAG 




9F 


00002 




TCTMLN 


DS 


H 


MESSAGE LENGTH IN AND OUT 




9F 


00004 




TCTVMA 


DS 


F 


VM ADDRESS OF BUFFER 




9F 


00008 




TCTTIO 

* 


DS 


F 


REAL CORE ADDRESS -FIRST 
TIOCB 




9F 


0000C 




TCTRLN 


DS 


H 


RELATIVE LINE NUMBER 




9F 


0000E 




TCTFL1 

* 


DS 


X 


FLAG BYTE 1 -(SET BY MACRO 
SVC) 








00000080 


TCTFRD 


EQU 


X'80 f 


READ OPERATION 








00000040 


TCTFWT 


EQU 


X^O 1 


WRITE OPERATION 








00000020 


TCTFWR 


EQU 


X 9 2Q 9 


WRITE/RESPONSE OPERATION 








00000010 


TCTFCL 


EQU 


X 9 1Q 9 


CLEAR OPERATION 








00000008 


TCTFFR 


EQU 


X 9 QB 9 


FREE OPERATION 




9F 


0000F 




TCTFL2 

* 


DS 


X 


FLAG BYTE 2 -(SET BY MACRO 
SVC) 








00000080 


TCTFIR 


EQU 


X 9 BQ 9 


INTERRUPT REQUIRED ON TASK 








00000040 


TCTFTI 


EQU 


X 9 *0 9 


TRANSLATE ON IN MESSAGES 








00000020 


TCTFTO 


EQU 


X f 20' 


TRANSLATE ON OUT MESSAGES 








00000010 


TCTFBK 


EQU 


X'10* 


BREAK TO BE ISSUED 




9F 


00010 


9F 00010 


TCTCOL 


DS 

|ORG| 


D 

TCTCOL 


CONTROL CHARACTERS 




9F 


00010 




TCTWTC 


DS 


3X 


WRITE CONTROL 




9F 


00013 




TCTCWT 


DS 


X 


COMPONENT WRITE CONTROL 




9F 


00014 




TCTRDC 


DS 


3X 


READ CONTROL 




9F 


00017 




TCTCRD 


DS 


X 


COMPONENT READ CONTROL 




9F 


00018 




TCTTDE 


DS 


F 


REAL CORE ADDRESS OF TDE 
ENTRY 




9F 


0001C 




TCTDTY 


DS 


X 


DEVICE TYPE 








00000000 


TCTDTO 


EQU 


X'OG' 


SLOT AVAILABLE MASK 








00000001 


TCTDT1 


EQU 


X*01 # 


1050 PTTC/8 








00000002 


TCTDT2 


EQU 


X , 02 t 


2741 CORRESPONDENCE 








00000003 


TCTDT3 


EQU 


X f 03 f 


2741 PTTC/8 








00000004 


TCTDT4 


EQU 


X f 04 f 


TTY35 ASCII 








00000005 


TCTDT5 


EQU 


X f 05' 


1052-7 




9F 


0001D 


9F 0001D 


TCTWFD 


DS 
|ORG| 


3X 

TCTWFD 


WORK FIELD 




9F 


0001D 




TCTWSV 


DS 


X 


SAVE BYTE 




9F 


0001E 




TCTWWK 


DS 


X 


WORK BYTE 








00000080 


TCTWW1 


EQU 


X^O' 


MESSAGE IN 




( Listing 


of CHATCT 


continued 


on page 429) 
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(Listing of CHATCT continued from page 428) 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 


COMMENT 






00000040 


TCTWW2 


EQU 


X^O' 


MESSAGE OUT 






00000020 


TCTWW3 


EQU 


X f 20 f 


ATTENTION 






00000010 


TCTWW4 


EQU 


X^O" 


INITIAL CONNECTION 






00000008 


TCTWW5 


EQU 


X^ 1 


UNRECOVERABLE ERROR 






00000004 


TCTWW6 


EQU 


X , 04* 


NEG POLLING RESPONSE 






00000002 


TCTWW7 


EQU 


X f 02 f 


BUFFER OVERFLOW FLAG 






00000001 


TCTWW8 


EQU 


X - 01 f 


REISSUE I/O FOR VSS 






00000028 


TCTWW9 


EQU 


x^s' 


SOLID IO FAILURE WITH INT 
REQ 


9F 


0001F 




TCTWRS 


DS 


X 


RESET BYTE 


9F 


00020 




TCTPDA 


DS 


H 


PHYSICAL DEVICE ADDRESS 


9F 


00022 




TCTSDA 


DS 


H 


SYMBOLIC DEVICE ADDRESS 


9F 


00024 




TCTBUF 


DS 


F 


REAL BUFFER ADDRESS 


9F 


00028 




TCTCNT 


DS 


X 


RETRY COUNTER 






00000004 


TCTMAX 


EQU 


X , 04 i 


MAX COUNT 






00000000 


TCTZER 


EQU 


X f 00 - 


ZERO COUNT 


9F 


00029 




TCTUSE 


DS 


X 


CONTROL BYTE 






00000080 


TCTTSS 


EQU 


X f 80* 


TCT IS FOR TSS USE 






9F 00029 


TCTTTY 


EQU 


TCTUSE 


LINE FEED SUPPRESS FLAG 






00000040 


TCTTTYM 


EQU 


X^O' 


LINE FEED SUPPRESS MASK 






00000020 


TCTHLD 

* 

* 


EQU 


X f 20 f 


TERMINAL HELD; TASK BEING 

N39 3 
ABENDED <1=HELD) f SET BY 
ABEND N393 






00000010 


TCTDED 

* 


EQU 


X'10* 


RETRY ON INTERVENTION 

REQUIRED 

FOR DEDICATED LINES 






00000008 


TCTPWRT 

* 


EQU 


X^* 


PREVIOUS OPERATION WRITE 
FOR 1050 N383 


9F 


0002A 




TCTFL4 


DS 


X 


FOURTH FLAG BYTE 
N445.2 






9F 0002A 


TCTCK 


EQU 


TCTFL4 


CKALOC ISSUED FOR TERMINAL 
N445.2 






00000080 


TCTCKM 


EQU 


X § 80 - 


CKALOC ISSUED MASK 
N445.2 


9F 


0002B 




* 


DS 


X 


RESERVED 
N445.2 


9F 


0002C 




TCTTSI 


DS 


F 


TSI POINTER 






00000030 


TCTLGH 


EQU 


♦-TCTLCK 


LENGTH OF ENTRY 






9F 00FF0 




(ORG) 


TCTLCK+4080 






00000FEF 


TCTMLG 


EQU 


♦ -TCTLCK- 


»1 LENGTH OF TABLE 


9F 


OOFF0 




TCTFPV 


DS 


F 


TCT FORWARD POINTER 


9F 


00FF4 




TCTBPV 


DS 


F 


TCT BACKWARD POINTER 


9F 


00FF8 




TCTABC 


DS 


H 


UNUSED 


9F 


00FFA 




TCTLOC 


DS 


X 


LOCK BYTE 


9F 


00FFB 




TCTATS 


DS 


X 


ACTIVE SLOT 






00000055 


TCTMAT 


EQU 


(TCTMLG+1) /TCTLGH NUMBER OF ENTRIES 


9F 


OOFFC 






DS 


F 


UNUSED 
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Terminal Device Table (CHATDE) 

CHATDE is a resident table which contains one entry for each terminal using RTAM. 
Each entry contains STARTUP/SYSGEN information for one symbolic Terminal Device* 
Each CHATDE entry occupies 24 bytes of storage. 

CHATDE Storage map 



DEC 


8 

16 



HEX 



| TDEFTD 


TDELTD 1 


8| TDESDA |TDESTA 
1 1 


| TDELCD 
1 i 


TDEDEV I 


1 TDEL0CK 1 TDESIOCT J TDESTA2 
1 f 1 


| UNNAMED 
! 


TDECNT | 



ORG TDEDEV 



12 


C 








| TDEDEA 


(TDEDEB (TDEDEC [TDEDED 
t 1 i 


Fields in 


CHATDE — by displacement 










DEC HEX FIELD 
0000 0000 TDEFTD 


DEC 
0012 


HEX 

OOOC 


FIELD 
TDEDEA 


DEC HEX FIELD 
0016 0010 TDELOCK 




0004 0004 TDELTD 


0012 


oooc 


TDEDEV 


0017 0011 TDESIOCT 




0008 0008 TDESDA 


0013 


0O0D 


TDEDEB 


|0018 0012 TDESTA2 




0010 000A TDESTA 


0014 


000E TDEDEC 


0020 0014 TDECNT 




0011 000B TDELCD 


0015 


000F 


TDEDED 




Alphabetical list of 


fields in 


CHATDE 










FIELD 
TDECNT 


DEC HEX 
0020 0014 


FIELD 
TDEDEV 


DEC HEX 
0012 OOOC 


FIELD DEC HEX 
TDESDA 0008 0008 




TDEDEA 


0012 OOOC 


TDEFTD 


0000 0000 


TDESIOCT 0017 0011 




TDEDEB 


0013 000D 


TDELCD 


0011 000B 


TDESTA 0010 000A 




TDEDEC 


0014 000E 


TDELOCK 


0016 0010 


JTDESTA2 0018 0012 




TDEDED 


0015 000F 


TDELTD 


0004 0004 




Assembler 


listinq of 


CHATDE 












LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 


COMMENT 






A0 00000 


CHATDE 


DSECT 






A0 00000 




TDEFTD 


DS 


F 


FIRST TERMINAL DEVICE 
POINTER 




A0 00004 




TDELTD 


DS 


F 


LAST TERMINAL DEVICE 
POINTER 




A0 00008 




TDESDA 


DS 


H 


SYMBOLIC DEVICE ADDRESS 




A0 0000A 




TDESTA 


DS 


X 


TERMINAL STATUS BYTE 






00000080 


TDEST1 


EQU 


X f 80 f 


INITIAL INTERRUPT 






00000040 


TDEST2 


EQU 


X , 40 t 


TERMINAL TYPE 






00000020 


TDEST3 


EQU 


X , 20 i 


INITIAL READ OPERATION 






00000010 


TDEST4 


EQU 


X«10 f 


LINE CODE AND DESTENATION 






00000008 


TDEST5 


EQU 


X f 08 f 


HIO FOR TIMER ISSUED 
M3660 






00000004 


TDEST6 


EQU 


X , 04 i 


EXIT TO QUEUE SCANNER 






00000002 


TDEST7 

* 
* 

* 


EQU 


X f 02 f 


TERMINAL HELD BY OPERATOR 

N393 
C1=HELD) SET OR RESET BY 
HOLD N393 

AND DROP VIA SETTDE MACRO 
N393 






00000001 


TDEST8 


EQU 


X^Ol^ 


PATHFINDING MASK 




A0 0000B 




TDELCD 


DS 


X 


LINE CODE 






00000001 


TDELC1 


EQU 


X^l 1 


1050 PTTC/8 (FOLDED) 






00000002 


TDELC2 


EQU 


X , 02 f 


2741 CORRESPONDENCE 






00000003 


TDELC3 


EQU 


X # 03* 


2741 PTTC/8 (FOLDED) 






00000004 


TDELC4 


EQU 


X i 04 i 


TTY35 ASCII (FOLDED) 




(Listing 


of CHATDE 


continued 


on page 431) 
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CListing of CHATDE continued from page 430) 



c 



( 



c 



LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 


COMMENT 






00000005 


TDELC5 


EQU 


X'OS' 


1052-7 


AO 


OOOOC 


AO OOOOC 


TDEDEV 


DS 
I0RG| 


F 

TDEDEV 


DEVICE CODE 


AO 


O0O0C 




TDEDEA 


DS 


X 


MODEL CODE 






00000001 


TDEMCA 


BQU 


X^Ol" 


1050 TERMINAL 






00000002 


TDEMCB 


EQU 


X f 02 f 


2741 TERMINAL 






00000003 


TDEMCC 


EQU 


X'OS' 


TTY35 TERMINAL 






00000004 


TDEMCD 


EQU 


X f 04 f 


1052 MOD- 7 TERMINAL 


AO 


O0O0D 




TDEDEB 


DS' 


X 


DEVICE CLASS 






00000001 


TDEDCA 


EQU 


X f 01 f 


DIAL LINE 






00000002 


TDEDCB 


EQU 


X , 02« 


DEDICATED LINE 






00000004 


TDEDCD 


EQU 


X , 04 i 


AUTOMATIC CALL FEATURE 






00000008 


TDEBUR 


EQU 


X'08 f 


DEVICE CLASS UNIT RECORD 






00000020 


TDEBDA 


EQU 


X^O' 


DEVICE CLASS DIRECT ACCESS 






00000080 


TDEBMT 


BQU 


x'eo 1 


DEVICE CLASS MAGNETIC TAPE 


AO 


OOOOE 




TDEDEC 


DS 


X 


UNIT TYPE 






00000010 


TDEUT1 


EQU 


X f 10 f 


IBM TERMINAL CONTROL TYPE 1 






00000020 


TDEUT2 


EQU 


X^O 1 


IBM TERMINAL CONTROL TYPE 2 






00000030 


TDEUT3 


EQU 


x^o 1 


TELEGRAPH CONTROL TYPE 1 






00000040 


TDEUT4 


EQU 


X f 40 f 


TELEGRAPH CONTROL TYPE 2 






00000080 


TDEUT5 


EQU 


X^O' 


WORID TRADE TERMINAL 
CONTROL 






00000001 


TDEUTA 


BQU 


X'Ol' 


270 2 TRANSMISSION CONTROL 






00000002 


TDEUTB 


EQU 


X«02 i 


2701 ON MULTIPLEXOR CHANNEL 






00000003 


TDEUTC 


EQU 


X'03 1 


MULTIPLEXOR CHANNEL MASK 






00000004 


TDEUTD 


EQU 


X f 04 f 


SELECTOR CHANNEL 






00000005 


TDEUTE 


BQU 


x«05 f 


2701 ON SELECTOR CHANNEL 






00000006 


TDEUTF 


EQU 


x 9 oe 9 


2703 TRANSMISSION CONTROL 






00000001 


TDECRD 


EQU 


X^l 1 


2540 CARD READER 






00000002 


TDECPN 


EQU 


X f 02' 


2540 CARD PUNCH 






00000008 


TDECPT 


EQU 


x'oe - 


1403 PRINTER 






00000010 


TDEPPT 


EQU 


x^o* 


2671 PPT READER 






00000001 


TDEDA11 


EQU 


X'Ol 1 


2311 D/A 






00000002 


TDEDA01 


EQU 


X , 02 i 


2301 D/A 






00000003 


TDEDA21 


EQU 


X'03* 


2321 D/A 






00000008 


TDEDA14 


EQU 


x^s' 


2314 D/A 






00000001 


TDETAPE 


EQU 


X'Ol 1 


2400 SERIES 


AO 


0000F 




TDEDED 


DS 


X 


OPTIONAL FEATURES 






00000010 


TDEOFA 


EQU 


X'lO* 


IBM LINE ADAPTER TYPE 1 






00000020 


TDEOFB 


EQU 


X f 20' 


IBM LINE ADAPTER TYPE 2 






00000030 


TDEOFC 


EQU 


X'JQ* 


DATA SET LINE ADAPTER 






00000040 


TDEOFD 


EQU 


X^O' 


AUTOMATIC CALL ADAPTER 






00000050 


TDEOFE 


BQU 


X f 50 f 


TELEGRAPH LINE ADAPTER 






00000000 


TDEOF1 


EQU 


X^O 1 


SAD ZERO 






00000001 


TDEOF2 


BQU 


X^l 1 


SAD ONE 






00000002 


TDEOF3 


EQU 


X , 02 i 


SAD TWO 






00000003 


TDEOF4 


EQU 


X^ 1 


SAD THREE 






00000040 


TDEPFR 


EQU 


X^O' 


PUNCH FEED READ 






00000080 


TDEOCI 


EQU 


X^O 1 


CARD IMAGE 






00000080 


TDEDUC 


EQU 


X f 80 f 


UNIVERSAL CHARACTER SET 






00000080 


TDESCN 


EQU 


X^O' 


SCAN 






00000040 


TDETRV 


EQU 


X f 40 f 


TRACK OVERFLOW 






O00000B0 


TDESTO 


EQO 


X^O 1 


SCAN AND TRACK OVERFLOW 






000000E0 


TDETPW 


EQU 


x'eo 1 


7 -TRACK WITH DATA 
CONVERSION 






000000A0 


TDETPN 


EQU 


X'AO 1 


7-TRACK WITHOUT DATA 
CONVERSION 






000000C0 


TDETR9 


EQU 


X^O' 


9-TRACK TAPE 






00000080 


TDETP9 


BQU 


x^o 1 


9-TRACK TAPE 


AO 


00010 




TDELOCK 

* 


DS 


X 


INDIVIDUAL TERMINAL LOCK 
M3660 


AO 


00011 




TDESIOCT DS 


X 


ENABLE/ PREPARE COUNT 








♦ 






M3302 






00000003 


TDESIOCM EQU 


X n 03* 


MAX ENABLE/PREPARE 








* 






M3302 


Iao 


00012 




TDESTA2 


DS 


X 


TDE FLAG BYTE TWO 






AO 00012 


TDEATM 


EQU 


TDESTA2 


ATTENTION TIMER FLAG 


I 




00000080 


TDEATMM 


EQU 


X'80' 


INATTENTION TIMER RUNNING 


(Listing 


Of CHATDE 


continued 


on page 432) 
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(Listing of CHATDE continued from Page 431) 



LOCATION 


INSTRUCTION SOURCE INST 


OPER 


COMMENT 




A0 00012 TDEFRT EQU 


TDESTA2 


FREEQ FLAG 




00000040 TDEFRTM EQU 


X»40' 


1-FREEQ DURING ATTN. TIMEOUT 




* 




M4335 


AO 00013 


OS 


X 


RESERVED 


A0 00014 


TDECNT DS 


F 


ERROR COUNTS 




BITS USE INDEX 


VALUE 






0-5 INITIAL ERR INDEX 









6-7 LOST DATA 


2 






8-9 DATA CHECK 


4 






10-11 INTERVENTION REQD 


6 






12-13 TIME OUT 


8 






14-15 OVERRUN 


A 






16-17 BUS-OUT CHECK 


C 






18-19 UNIT EX. DATA OUT 


E 






20-21 UNUSED 


10 






00000010 TDELGH EQU 


♦-TDESDA 


LENGTH OF TDE ENTRY 



4 32 CHATDE 



Task Data Definition Table (CHATDT) 



L 



The Task Data Definition Table CTDT) describes the characteristics and current 
status of all the data sets associated with a task. 

The TDT, residing in a protected area of a task*s virtual storage, is located by a 
pointer at a fixed address in segment 0, page 0. The TDT consists of a 16 byte head- 
er and a variable number of job file control block (JFCB) entries. 

Sixteen bytes of virtual storage are allocated to the TDT header while each JFCB 
occupies 24 bytes of virtual storage, both aligned on doubleword boundaries. In 
addition, a 32 byte appendage to the volume field of the JFCB is required for more 
tnan three volume serials. This appendage is also aligned on doubleword boundaries. 

CHATDT Storage map 



DEC 




HEX 





8 8 
16 10 
2<l 18 



56 



96 
101* 
112 
120 
128 
136 
144 
152 
160 
168 
176 
184 
192 
200 
208 
216 



38 



60 
68 
70 
78 
80 
88 
90 
98 
A0 
A8 
B0 
B8 
CO 
C8 
DO 
D8 



| TDTJ10 




I 

» 






TDTF10 | 


| TDTPL1 




1 

1 






TDTTT1 | 


| TDTDDN I 






TDTDS1 










I 
i 


TDTDS2 
















ITDTDSV | 
i 1 


| TDTDSR | 


| TDTDSM | 


| TDTDEV 










TDTUAF J 


I TDTSP0 | TDTS 

i I 


PI 


(TDTSP2 


i 

1 


TDTSP3 | 


| TDTARL 






TDTVNO 


| TDTVSQ | 


| TDTCDT 


1 


TDT EDT 




| TDTOPN | 


ITDTVPY ITOTREF I 
\ \ I 


TDTFSQ 


|TDTCFL 


JTDTAQL (TDTSHC [TDTLAB | 
111! 


| TDTDEB 






TDTDSP 


| TDTPAR | TDTDCI | 
1 I I 


| TDTPVS 










TDTLLK | 


| TDTTLK 










TDTCNC | 


| TDTCC1 






TDTBLK 


| TDTSDA | 
1 1 


| TDTDSO | 


TDTMAC 




TDTBFL 


(TDTDVD |TDTBFN | 
1 1 1 


JTDTBTK |TDTNCP |TDTRFM |TDTOCD | 
1 1 1 \ \ 






TDTLRL | 


| TDTBSZ |TDTOPl JTDTOP2 |TDTERO 
1 111 


JTDTPAD | TDTRKP | 
t t I 


| TDTIMK 






UNNAMED 


| TDTRES | 
1 1 



I CHATDT continued on page 43d) 



CHATDT H33 



HEX 



DEC 
224 

232 



248 
256 
264 



280 

ORG TDTDEV 



CCHATDT continued from page 4331 



E0 


TDTVF1 


1 

1 




TDTID1 




£8 


TDTID2 | 


F8 




TDTAPN 


i 




TDTAPP | 


100 


TDTAV1 


I 

1 




TDTAI1 




108 


| TDTAI2 | 


118 




TDTAP1 


i 
1 




TDTAP2 | 



120 

ORG TDTOAF 



78ITDTMDL ITDTDVT |TDTUNT | TDTFEA 
I I I 1 



124 7C 

ORG TDTARL 



TDTDSC 



136 



881 



L 



ORG TDTDSP 



TDTDUP 



164 



A4 



| TDTDP1 | TDTDS 



ORG TDTVF1+1 



225 



El 



ORG TDTID1 



(TDTLFN | 
I I 



226 



E2 



TDTSMA 



TDTSDI 



I. 



Fields in CHATDT — by displacement 

DEC HEX FIELD 

0000 0000 TDTJ10 

0004 0004 TDTF10 

0008 0008 TDTPL1 

0012 000C TDTTT1 

0016 0010 TDTDDN 

0024 0018 TDTDS1 

0059 003B TDTDS2 

0103 0067 TDTDSV 

0104 0068 TDTDSR 
0112 0070 TDTDSM 
0120 0078 TDTMDL 

0120 0078 TDTDEV 

0121 0079 TDTDVT 

0122 007A TDTUNT 
(Continued on page 435) 



DEC 


HEX 


FIELD 


DEC 


HEX 


FIELD 




0123 


007B 


TDTFEA 


0152 


0098 


TDTVPY 




0124 


007C 


TDTDSC 


0153 


0099 


TDTREF 




0124 


007C 


TDTUAF 


0154 


009A 


TDTFSQ 




0128 


0080 


TDTSP0 


0156 


009C 


TDTCFL 




0129 


0081 


TDTSP1 


0157 


009D 


TDTARO 


(EQO) 


0132 


0084 


TDTSP2 


0157 


009D 


TDTARW 


(EQU) 


0133 


0085 


TDTSP3 


0157 


009D 


TDTAU 


(EQU) 


0136 


0088 


TDTDUP 


0157 


009D 


TDTDAC 


(EQU) 


0136 


0038 


TDTARL 


0157 


009D 


TDTDAL 


(EQU) 


0140 


008C 


TDTVNO 


0157 


009D 


TDTNDF 


(EQU) 


0142 


008E 


TDTVSQ 


0157 


009D 


TDTTDS 


(EQU) 


0144 


0090 


TDTCDT 


0157 


009D 


TDTPDS 


(EQU) 


0147 


0093 


TDTEDT 


0157 


009D 


TDTAQL 




0150 


0096 


TDTOPN 


0158 


009E 


TDTSHC 





434 CHATDT 



(Continued from page 434) 



L 



C 



( ■ 



DEC HEX 


FIELD 




DEC 


HEX 


FIELD 




DEC 


HEX 


FIELD 




0159 009F 


TDTRPS2 


(EQU) 


0192 


OOCO 


TDTDCB 




0224 


00E0 


TDTVF1 




0159 009F 


TDTRPS1 


CEQU) 


0194 


00C2 


TDTMAC 




0224 


00E0 


TDTVOL 




0159 009F 


TDTRPS 


(EQU) 


0196 


00C4 


TDTBFL 




0225 


00E1 


TDTLFN 




0159 009F 


TDTAUL 


(EQU) 


0198 


00C6 


TDTDVD 




0225 


00E1 


TDTV9 


(EQU) 


0159 009F 


TDTAL 


(EQU) 


0199 


0OC7 


TDTBFN 




0225 


00E1 


TDTV8 


(EQU) 


0159 009F 


TDTSU 


(EQU) 


0200 


00C8 


TDTBTK 




0226 


00E2 


TDTSMA 




0159 009F 


TDTSL 


(EQU) 


0201 


00C9 


TDTNCP 




0226 


00E2 


TDTID1 




0159 009F 


TDTNL 


(EQU) 


0202 


OOCA 


TDTRFM 




0228 


00E4 


TDTSDI 




0159 009F 


TDTIAB 




0203 


OOCB 


TDTOCD 




0232 


00E8 


TDTID2 




0160 00A0 


TDTDEB 




0204 


OOCC 


TDTLRL 




0248 


00F8 


TDTAPN 




0164 00A4 


TDTDP1 




0208 


00D0 


TDTBSZ ' 




0252 


OOFC 


TDTAPP 




0164 00A4 


TDTDSP 




0210 


00D2 


TDTOP1 




0256 


0100 


TDTA7 


(EQU) 


0165 00A5 


TDTDS 




0211 


O0D3 


TDTOP2 




0256 


0100 


TDTA6 


(EQU) 


0165 00A5 


TDTRCT 


(EQU) 


0212 


00D4 


TDTERO 




0256 


0100 


TDTA5 


(EQU) 


0166 00A6 


TDTSDE 


(EQU) 


0213 


00D5 


TDTBOF 


(EQV) 


0256 


0100 


TDTA4 


(EQU) 


0166 00A6 


TDTVRO 


(EQU) 


0213 


00D5 


TDTPAD 




0256 


0100 


TDTA3 


(EQU) 


0166 00A6 


TDTPAR 




0214 


00D6 


TDTRKP 




0256 


0100 


TDTA2 


(EQU) 


0167 00A7 


TDTDCS 


(EQU) 


0216 


00D8 


TDTVTA 


(EQU) 


0256 


0100 


TDTA1 


(EQU) 


0167 00A7 


TDTNDC 


(EQU) 


0216 


00D8 


TDTIMK 




0256 


0100 


TDTAO 


(EQU) 


0167 00A7 


TDTDCI 




0222 


OODE TDTRES 




0256 


0100 


TDTAV1 




0168 00A8 


TDTPVS 




0224 


O0E0 


TDTV7 


(EQU) 


0257 


0101 


TDTA9 


(EQU) 


0172 OOAC 


TDTLLK 




0224 


00E0 


TDTV6 


(EQU) 


0257 


0101 


TDTA8 


(EQU) 


0176 OOBO 


TDTTLK 




0224 


00E0 


TDTV5 


(EQU) 


0258 


0102 


TDTAI1 




0180 00B4 


TDTCNC 




0224 


00E0 


TDTV4 


(EQU) 


0260 


0104 


TDTAD1 


(EQU) 


0184 00B8 


TDTCC1 




0224 


00E0 


TDTV3 


(EQU) 


0264 


0108 


TDTAI2 




0188 OOBC 


: TDTBLK 




0224 


00E0 


TDTV2 


(EQU) 


0280 


0118 


TDTAP1 




0190 OOBE 


; TDTSDA 




0224 


00E0 


TDTV1 


(EQU) 


0284 


one 


TDTAP2 




0192 OOCO 


TDTDSO 




0224 


00E0 


TDTVO 


(EQU) 












Alphabetical list of 


fields in 


CHATDT 




















FIELD 


DEC 


HEX 




FIELD 


DEC 


HEX 




FIELD 


DEC 


HEX 




TDTAD1 


0260 


0104 


(EQU) 


TDTDCB 


0192 


OOCO 




TDTNL 


0159 


009F 


(EQU) 


TDTAI1 


0258 


0102 




TDTDCI 


0167 


O0A7 




TDTOCD 


0203 


OOCB 




TDTAI2 


0264 


0108 




TDTDCS 


0167 


O0A7 


(EQU) 


TDTOPN 


0150 


0096 




TDTAL 


0159 


009F 


(EQU) 


TDTDDN 


0016 


0010 




TDTOP1 


0210 


00D2 




TDTAPN 


0248 


00F8 




TDTDEB 


0160 


00A0 




TDTOP2 


0211 


00D3 




TDTAPP 


0252 


OOFC 




TDTDEV 


0120 


0078 




TDTPAD 


0213 


00D5 




TDTAP1 


0280 


0118 




TDTDP1 


0164 


00A4 




TDTPAR 


0166 


00A6 




TDTAP2 


0284 


one 




TDTDS 


0165 


O0A5 




TDTPDS 


0157 


009D 


(EQU) 


TDTAQL 


0157 


009D 




TDTDSC 


0124 


007C 




TDTPL1 


0008 


0008 




TDTARL 


0136 


0088 




TDTDSM 


0112 


0070 




TDTPVS 


0168 


00A8 




TDTARO 


0157 


009D 


(EQU) 


TDTDSO 


0192 


OOCO 




TDTRCT 


0165 


00A5 


(EQU) 


TDTARW 


0157 


009D 


(EQU) 


TDTDSP 


0164 


00A4 




TDTREF 


0153 


0099 




TDTAU 


0157 


009D 


(EQU) 


TDTDSR 


0104 


0068 




TDTRES 


0222 


OODE 




TDTAUL 


0159 


009F 


(EQU) 


TDTDSV 


0103 


0067 




TDTRFM 


0202 


OOCA 




TDTAV1 


0256 


0100 




TDTDS1 


0024 


0018 




TDTRKP 


0214 


O0D6 




TDTAO 


0256 


0100 


(EQU) 


TDTDS2 


0059 


003B 




TDTRPS 


0159 


009F 


(EQU) 


TDTA1 


0256 


0100 


(EQU) 


TDTDUP 


0136 


0088 




TDTRPS 1 


0159 


009F 


(EQU) 


TDTA2 


0256 


0100 


(EQU) 


TDTDVD 


0198 


00C6 




TDTRPS 2 


0159 


009F 


(EQU) 


TDTA3 


0256 


0100 


(EQU) 


TDTDVT 


0121 


0079 




TDTSDA 


0190 


OOBE 




TDTA4 


0256 


0100 


(EQU) 


TDTEDT 


0147 


0093 




TDTSDE 


0166 


00A6 


(EQU) 


TDTA5 


0256 


0100 


(EQU) 


TDTERO 


0212 


00D4 




TDTSDI 


0228 


00E4 




TDTA6 


0256 


0100 


(EQU) 


TDTFEA 


0123 


007B 




TDTSHC 


0158 


009E 




TDTA7 


0256 


0100 


(EQU) 


TDTFSQ 


0154 


009A 




TDTSL 


0159 


009F 


(EQU) 


TDTA8 


0257 


0101 


(EQU) 


TDTF10 


0004 


0004 




TDTSMA 


0226 


00E2 




TDTA9 


0257 


0101 


(EQU) 


TDTID1 


0226 


00E2 




TDTSPO 


0128 


0080 




TDTBFL 


0196 


00C4 




TDTID2 


0232 


00E8 




TDTSP1 


0129 


0081 




TDTBFN 


0199 


00C7 




TDTIMK 


0216 


00D8 




TDTSP2 


0132 


0084 




TDTBLK 


0188 


OOBC 




TDTJ10 


0000 


0000 




TDTSP3 


0133 


0085 




TDTBOF 


0213 


00D5 


(EQU) 


TDTLAB 


0159 


009F 




TDTSU 


0159 


009F 


(EQU) 


TDTBSZ 


0208 


00D0 




TDTLFN 


0225 


00 El 




TDTTDS 


0157 


009D 


(EQU) 


TDTBTK 


0200 


00C8 




TDTLLK 


0172 


OOAC 




TDTTLK 


0176 


OOBO 




TDTCC1 


0164 


00B8 




TDTLRL 


0204 


OOCC 




TDTTT1 


0012 


000C 




TDTCDT 


0144 


0090 




TDTMAC 


0194 


00C2 




TDTUAF 


0124 


007C 




TDTCFL 


0156 


00 9C 




TDTMDL 


0120 


0078 




TDTUNT 


0122 


007A 




TDTCNC 


0180 


O0B4 




TDTNCP 


0201 


00C9 




TDTVF1 


0224 


00E0 




TDTDAC 


0157 


009D 


(EQU) 


TDTNDC 


0167 


00A7 


(EQU) 


TDTVNO 


0140 


008C 




TDTDAL 


0157 


009D 


(EQU) 


TDTNDF 


0157 


009D 


(EQU) 


TDTVOL 


0224 


00E0 




(Continued on 


page 


436) 












































CHATDT 435 



(Continued from page 435) 





FIELD 


DEC 


HEX 


FIELD DEC HEX 


FIELD DEC HEX 




TDTVPY 


0152 


0098 


TDTV1 0224 00E0 


(EQU) TOTV6 0224 00E0 (EQU) 




TDTVRO 


0166 


00A6 


(EQU) TDTV2 0224 O0EO 


(EQU) TDTV7 0224 00E0 (EQU) 




TDTVSQ 


0142 


008E 


TDTV3 0224 00 E0 


(EQU) TDTV8 0225 00E1 (EQU) 




TDTVTA 


0216 


00D8 


(EQU) TDTV4 0224 00E0 


CEQU) TDTV9 0225 00E1 (EQU) 




TDTVO 


0224 


00E0 


(EQU) TDTV5 0224 00E0 


(EQU) 


Assembler 


listing of 


CHATDT 










LOCATION 


INSTRUCTION SOURCE 


INST OPER 


COMMENT 






A2 00000 


CHATDT 


DSECT 


TASK DATA DEFINITION TABLE 










* TO ADDRESS HEADER .. 


,. SET USING TO CHATDT 










* TO ADDRESS A JFCB .. 


,. SET USING TO TDTDDN 




A2 00000 






♦ 


DS OD 


ALIGN TO DOUBLEWORD 
BOUNDARY 




A2 00000 






TDTJ10 

* 


DS F 


POINTER TO LAST ENTERED 
JFCB (BINARY) 




A2 0000*1 






TDTF10 

+ 


DS F 


POIOTER TO NEXT FREE MEMORY 
AREA (BINARY) 




A2 00008 






TDTPL1 

* 


DS F 


POINTER TO LAST ENTERED 
JFCB IN PROG. LIBRARY 
LIST (BINARY) 




A2 0000C 






TDTTT1 


DS F 


POINTER TO LAST ENTERED 
JFCB IN TEMP. TAB (BINARY) 




A2 00010 






TDTDDN 


DS CL8 


DDNAME (EBCDIC) 




A2 00018 






TDTDS1 


DS CL35 


DSNAME IN DD OR CATALOG 




A2 0003B 






TDTDS2 

* 


DS CL44 


DSNAME IN DSCB OR HEADER 

LABEL 

(USERID. DSNAME) (EBCDIC) 




A2 00067 






TDTDSV 

* 
» 

* 


DS XL1 

01= 


VAM OR SAM INDICATOR 
=SAM 04=VAMI 07=RX IOREQ 
02=TAM 05=VAMS 
06=PARTITIONED 




A2 00068 






TDTDSR 


DS CL8 


ABSOLUTE GENERATION NUMBER 


_ 








* 




(EBCDIC) 




A2 00070 






TDTDSM 

* 


DS CL8 


MEMBER NAME, PARTITIONED DS 
(EBCDIC) 




A2 00078 






TDTDEV 


DS F 


DEVICE CODE 






A2 00078 




10RG1 TDTDEV 


REDEFINE DEVICE FIELD 










* 




16453 




A2 00078 






TDTODL 


DS X 


DEVICE MODEL 
16453 






00000000 


TDTMD1 


EQU 


DEVICE OTHER TAHN A 










* 




TERMINAL 16453 




A2 00079 






TDTDVT 


DS X 


TYPE OF DEVICE 
16453 






00000080 


TDTDTP 


EQU X^O - 


MAGNETIC TAPE 










♦ 




16453 






00000020 


TDT^DA 


BQU X^O^ 


DIRECT ACCESS 












16453 




A2 0007A 






TDTUNT 


DS X 


UNIT TYPE 
16453 




A2 0007B 






TDTFEA 

# 


DS X 


OPTIONAL FEATURES 
16453 






00000020 


TDT07 


BQU X f 20 f 


7 TRACK COMPATIBILITY 










♦ 




16453 




A2 0007C 






TDTUAF 

* 
* 


DS F 


UNIT AFFINITY FLAG, POINTER 
TO DDNAME(BINARY) # IF 
NO UNIT AFFINITY 






A2 0007C 




10RG| TDTUAF 






A2 0007C 






TDTDSC 

* 


DS F 


POINTER TO FORMAT E DSCB 
BITS 0-3 =« DSCB NUMBER 
BITS 4-15 =» REL VOL. NO. 
BITS 16-31 ■ REL PG. NO. 




A2 00080 






TDTSPO 

* 

* 


DS XL1 


SPACE ALLOCATION TYPE-HEX 

CODES 

00=*PAGE 02=TRACK 

01=CYLINDER 03=RECORD 




A2 00081 






TDTSP1 


DS XL3 


PRIMARY SPACE ALLOCATION 




(Listing 


Of CHATDT 


continued 


on page 437) 




*36 CHATDT 















(Listing of CHATDT continued from page 436) 



<. 



c 



( 



LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 


A2 


0008** 




TDTSP2 


DS 


XL1 


A2 


00085 




TDTSP3 


DS 


XL3 


A2 


00088 




TDTARL 


DS 


F 






A2 00088 




|ORG| 


TDTARL 


A2 


00088 




TDTDUP 

* 

* 


DS 


F 

IF DATA SET 
ALL ZEROES. 


A2 


0008C 




TDTVNO 


DS 


H 


A2 


0008E 




TDTVSQ 


DS 


H 


A2 


00090 




TDTCDT 


DS 


XL3 


A2 


00093 




* 
TDTEDT 


DS 


XL3 


A2 


00096 




TDTOPN 


DS 


H 


A2 


00098 




TDTVPY 


DS 


XL1 


A2 


00099 




TDTREF 


DS 


^CLl 


A2 


0009A 




TDTFSQ 


DS 


A2 


0009C 




TDTCFL 


DS 


XL1 


A2 


0009D 




TDTAQL 


DS 


XL1 






A2 0009D 


TDTPDS 


EQU 


TDTAQL 






00000000 


TDTPDSM 


EQU 


X'OO' 






A2 0009D 


TDTTDS 


EQU 


TDTAQL 






00000080 


TDTTDSM 


EQU 


X f 80 f 






A2 0009D 


TDTNDF 


EQU 


TDTAQL 






00000000 


TDTNDFM 


EQU 


X^OO' 






A2 0009D 


TDTDAL 


EQU 


TDTAQL 






00000004 


TDTDALM 


EQU 


X , 04 i 






A2 0009D 


TDTDAC 


EQU 


TDTAQL 






00000008 


TDTDACM 


EQU 


x'os^ 






A2 0009D 


TDTAU 


EQU 


TDTAQL 






00000000 


TDTAUM 


EQU 


X'00 - 






A2 0009D 


TDTARW 


EQU 


TDTAQL 






00000001 


TDTARWM 


EQU 


X , 01 i 






A2 0009D 


TDTARO 


EQU 


TDTAQL 






00000002 


TDTAROM 


EQU 


X i 02 t 


A2 


0009E 




TDTSHC 


DS 


XL1 


A2 


0009F 




TDTLAB 


DS 


XL1 






A2 0009F 


TDTNL 


EQU 


TDTLAB 






00000001 


TDTNLM 


EQU 


X f 01' 






A2 0009F 


TDTSL 


EQU 


TDTLAB 






00000002 


TDTSLM 


EQU 


X , 02 i 






A2 0009F 


TDTSU 


EQU 


TDTLAB 






00000004 


TDTSUM 


EQU 


X , 04 i 






A2 0009F 


TOTAL 


EQU 


TDTLAB 






00000012 


TDTALM 


-EQU 


X i 12 i 






A2 0009F 


TDTAUL 


EQU 


TDTLAB 






00000014 


TDTAULM 




EQU 


X , 14 f 






A2 0009F 


TDTRPS 


EQU 


TDTLAB 






00000080 


TDTRPSM 


EQU 


X^O 1 






A2 0009F 


TDTRPS 1 


EQU 


TDTLAB 






00000040 


TDTRPSD 


EQU 


X^O 1 






A2 0009F 


TDTRPS 2 




EQU 


TDTLAB 






00000020 


TDTRPSV 


EQU 


X^O^ 


(Listing 


Of CHATDT 


continued 


on page 438) 



COMMENT 

SPACE RELEASE FLAG 01= NO 

RELEASE 

SECONDARY SPACE ALLOCATION 

AVERAGE RECORD LENGTH 

POINTER TO JFCB OF OTHER 
COPY OF DUPLEXED DATA SET. 
IS NOT DUPLEXED, TDTDUP = 

COUNT OF NUMBER OF VOLUMES 

SPECIFIED 

VOLUME SEQUENCE NUMBER 

DS CREATION DATE CYDD) 

Y=YEAR (0-99) # DD=DAY (1-366) 

DISCONTINUOUS BINARY 

DS EXPIRATION DATE CYDD) 

DISCONTINUOUS BINARY 

NUMBER OF DCBS OPEN FOR 

THIS DS 

PRIVILEGE FLAG 1=PRIVILEGED 

ACCESS 

REFERENCE FLAG 1=DS OPENED 

FILE SEQUENCE NUMBER (TAPE 

ONLY) BINARY 

CATALOG FLAG l=CATALOGED DS 

ACCESS QUALIFIER 

00=UNLIMITED 

01=READ /WRITE 

02= READ ONLY 

PERMANENT DATA SET FLAG 

PERMANENT DATA SET MASK 

TEMPORARY DATA SET FLAG 

TEMPORARY DATA SET MASK 

NO DELETION FLAG 

NO DELETION MASK 

DELETE AT LOGOFF FLAG 

DELETE AT LOGOFF MASK - 

DELETE AT CLOSE FLAG 

DELETE AT CLOSE MASK 

ACCESS-UNLIMITED FLAG 

ACCESS-UNLIMITED MASK 

ACCESS-READ/WRITE FLAG 

ACCESS-READ/WRITE MASK 

ACCESS- READ ONLY FLAG 

ACCESS-READ ONLY MASK 

SHARING FLAG (CATALOGED DS) 

HEX-00=PRIVATE f 01=SHARED 

LABEL TYPE 

NO LABELS (TAPE ONLY) FLAG 

NO LABELS (TAPE ONLY) MASK 

STANDARD LABELS FLAG 

STANDARD LABELS MASK 

STANDARD S USER LABELS FLAG 

STANDARD t USER LABELS MASK 

ASCII STANDARD LABEL FLAG 

ASCII STANDARD LABEL MASK 

ASCII STANDARD i USER LABEL 

FLAG 

ASCII STANDARD S USER LABEL 

MASK 

RPS INPUT DATA SET FLAG 

RPS INPUT DATA SET MASK 

RPS IDS CHANGE DSCB FLAG 

RPS IDS CHANGE DSCB MASK 

RPS IDS VOL TABLE IN JFCB 

FLAG 

RPS IDS VOL TABLE IN JFCB 

MASK 



CHATDT 437 



C Li sting of CHATDT continued from page 437) 



ux 


: AT ION 
000AO 


INSTRUCTION SOURCE 
TDTDEB 


INST 


OPER 


A2 


DS 


F 


A2 


000A4 






TDTDSP 


DS 


H 






A2 


000A4 




|ORG| 


TDTDSP 


A2 


000A4 






TDTDP1 


DS 


XL1 






00000000 


TDTDP1N 


EQU 


X'OO' 






00000001 


TDTDP1L 


EQU 


X'Ol 1 






00000002 


TDTDP1M 


EQU 


X , 02 i 


A2 


000A5 






TDTDS 


DS 


XL1 






A2 


000A5 


TDTRCT 


EQU 


TDTDS 






00000001 


TDTRCTM 


EQU 


X'Ol* 


A2 


000A6 






TDTPAR 


DS 


XL1 






A2 


000A6 


TDTVRO 


EQU 


TDTPAR 






00000080 


TDTVROM 


EQU 


X'SO* 






A2 


000A6 


TDTSDE 


EQU 


TDTPAR 






00000001 


TDTSDEM 

* 


EQU 


X , 01 t 


A2 


O0OA7 






TDTDCI 


DS 


XL1 






A2 


000A7 


TDTNDC 


EQU 


TDTDCI 






00000000 


TDTNDCM 


EQU 


X'OO' 






A2 


O0OA7 


TDTDCS 


EQU 


TDTDCI 






00000001 


TDTDCSM 


EQU 


X f 01 f 


A2 


000A8 






TDTPVS 


DS 


F 


A2 


000AC 






TDTLLK 


DS 


F 


A2 


000B0 






TDTTLK 


DS 


F 


A2 


000B4 






TDTCNC 


DS 


F 


A2 


00058 






TDTCC1 

♦ 


DS 


F 


A2 


000BC 






TDTBLK 


DS 


H 


A2 


OOOBE 






TDTSDA 


DS 


H 


A2 


OOOCO 






TDTDCB 


DS 


0XL32 


A2 


000C0 






TDTDSO 


DS 


XL2 


A2 


000C2 






TDTMAC 


DS 


XL2 


A2 


000C4 






TDTBFL 


DS 


XL2 


A2 


0O0C6 






TDTDVD 


DS 


xu 


A2 


000C7 






TDTBFN 


DS 


XL1 


A2 


000C8 






TDTBTK 


DS 


XL1 


A2 


000C9 






TDTNCP 


DS 


XL1 


A2 


000CA 






TDTRFM 


DS 


XL1 






O00000C4 


TDTRFMD 


EQU 


C 9 D 9 






000000C6 


TDTRFMF 


EQU 


C'F* 






000000E5 


TDTRFMV 


EQU 


C f V 






0OO000E4 


TDTRFMU 


EQU 


c . . 


A2 


000CB 






TDTOCD 


DS 


XL1 






00000020 


TDTOCDA 


EQU 


X^G' 


A2 


ooocc 






TDTLRL 


DS 


F 


A2 


000DO 






TDTBSZ 


DS 


XL2 


A2 


000D2 






TDTOP1 


DS 


XL1 


A2 


000D3 






TDTOP2 


DS 


XL1 


A2 


000D4 






TDTERO 


DS 


XL1 


A2 


000D5 






TDTPAD 


DS 


XL1 






A2 


000D5 


TDTBOF 


EQU 


TDTPAD 


A2 


000D6 






TDTRKP 


DS 


XL2 


A2 


OO0D8 






TDTIMK 


DS 


F 






A2 


000D8 


TDTVTA 




EQU 


TDTIMK 


A2 


000DC 






^ 


DS 


XL2 


A2 


000DE 






TDTRES 


DS 


H 


A2 


000E0 






TDTVOL 


DS 


0CL32 


A2 


000E0 






TDTVF1 


DS 


XL2 






A2 


000E0 


TDTVO 


EQU 


TDTVF1 






00000080 


TDTVOM 


EQU 


X 9 89 9 






A2 


000E0 


TDTV1 


EQU 


TDTVF1 


C Listing 


of 


CHATDT 


continued 


on page 439) 



COMMENT 

RESTABLE-VAM-OR DEB-SAM- 
POINTER 
DISPOSITION 

DISPOSITION FLAG 1 
DISPOSITION » NEW 
DISPOSITION » OLD 
DISPOSITION = MODIFY 
DISPOSITION FLAG 2 
RECATALOG DATA SET FLAG 
RECATALOG DATA SET MASK 
TAPE PARITY INDICATOR 
VAM READ-ONLY ACCESS 
READ-ONLY ACCESS MASK 
SDST ENTRY UPDATED/CREATED 
FLG 16536 

SDST ENTRY UPDATED/CREATED 
MSK 16536 

DUPLEX COPY INDICATOR 
DS IS NOT DUPLEXED OR, 
DS IS THE PRIMARY COPY 
DATA SET IS DUPLEXED, 
AND IS THE SECONDARY COPY 
PREVIOUS JFCB ADDRESS 
LIBRARY LINK 

TEMPORARY TABULATION LINK 
(BINARY) 

CONCATENATION LINK, FORWARD 
CONCATENATION LINK, 
BACKWARD 

COUNT OF MODULES LOADED 
FROM LIBRARY 
SYMBOLIC DEVICE ADDRESS 
DATA CONTROL BLOCK 
DSORG 
MACRF 
BUFL 
DEVD 
BUFNO 
BFTEK 
NCP 
RECFM 

RECORD FORMAT=VARlABLE 
(ASCII) 

RECORD FORMAT = FIXED 
RECORD FORMAT = VARIABLE 
RECORD FORMAT = UNDEFINED 
OPTCD 

ASCII TAPE REQUEST 
LRECL 
BLKSIZE 

KEYLEN f PRTSP, STACK, DEN, CODE 
MODE,TRTCH 
EROPT 
PAD 

BUFFER OFFSET 
RKP 

IMSK DEFAULT=FFFFFFFF 
(PUBLIC/PRIVATE) VOLUME 
TABLE POINTER 
RESERVED 
15759 
RESERVED 

VOLUME FLAG 
VOLUME MOUNTED FLAG 
VOLUME MOUNTED MASK 
PRIVATE - PUBLIC FLAG 



S 



438 CHATDT 



(Listing of CHATDT continued fro© page 438) 



L 



LOCATION INSTRUCTION 
00000040 
A2 000E0 
00000020 
A2 000E0 
00000010 
A2 000E0 
00000008 
A2 000E0 
00000001* 
A2 OOOEO 



00000002 
A2 OOOEO 
00000001 
A2 000E1 
00000080 

A2 000E1 

00000040 



A2 000E1 



l 



A2 000E1 
A2 000E2 

A2 000E2 

A2 000E4 
A2 000E8 
A2 000F8 

A2 000FC 



A2 000E2 



A2 00100 



C 



A2 00100 
00000080 
A2 00100 
00000040 
A2 00100 
00000020 
A2 00100 
00000010 
A2 00100 
00000008 
A2 00100 
00000004 
A2 00100 

00000002 
A2 00100 
00000001 
A2 00101 
00000080 
A2 00101 

00000040 



A2 00102 

A2 00104 
A2 00108 
i Listing of CHATDT 



SOURCE 

TDTV1M 

TDTV2 

TDTV2M 

TDTV3 

TDTV3M 

TDTV4 

TDTV4M 

TDTV5 

TDTV5M 

TDTV6 

TDTV6M 

TDTV7 

TDTV7M 

TDTV8 

TDTV8M 

TDTV9 

TDTV9M 

TDTLFN 
TDTID1 

TDTSMA 

# 

TDTSDI 
TDTID2 
TDTAPN 

* 

TDTAPP 



TDTAV1 

TDTAO 

TDTAOM 

TDTA1 

TDTA1M 

TDTA2 

TDTA2M 

TDTA3 

TDTA3M 

TDTA4 

TDTA4M 

TDTA5 

TDTA5M 

TDTA6 

TDTA6M 

TDTA7 

TDTA7M 

TDTA8 

TDTA8M 

TDTA9 

♦ 

TDTA9M 

TDTAI1 

TDTAD1 

TDTAI2 

continued 



INST 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 
EQU 
EQU 
EQU 
EQU 



OPER 

X f 40' 

TDTVF1 

X^O' 

TDTVF1 

X , 10 t 

TDTVF1 

x^s 1 

TDTVF1 

X , 04 i 

TDTVF1 

X , 02 i 

TDTVF1 

X f 01 f 

TDTVF1+1 

X'SO' 



EQU TDTVF1+1 

EQU X f 40' 

| ORG I TDTVF1+1 

DS AL1 



DS 



XL6 



J ORG | TDTID1 
DS XL2 

DS F 

DS 4F 

DS F 

DS F 

DSECT 
VOL FLAG 
DS XL2 



EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 

EQU 
EQU 
EQU 
EQU 
EQU 
EQU 

EQU 



TDTAV1 

X , 80 i 

TDTAV1 

X t 40 i 

TDTAV1 

X^O' 

TDTAV1 

X f 10 f 

TDTAV1 

X f 08 f 

TDTAV1 

X - 04* 

TDTAV1 

X f 02 f 

TDTAV1 

X f 01 f 

TDTAV1+1 

X , 80 f 

TDTAV1+1 

X^O' 



DS XL6 
EQU TDTAI1+2 
DS 4F 
on page 440) 



COMMENT 

PUBLIC MASK 

ORIGINAL DS VOLUME FLAG 

ORIGINAL DS VOLUME MASK 

POST PROCESS DS FLAG 

POST PROCESS DS MASK 

NOT USED 

NOT USED 

VOLUME CHAIN FIELD 

INDICATOR 

VOLUME CHAIN FIELD MASK 

NULL/VALID INDICATOR 

VALID MASK 

DSNAME NOT FOUND IN VTOC 

DSNAME NOT FOUND IN VTOC 

MASK 

1=UNSUCCESSFUL OPERATION 

DUE TO SYSTEM FAILURE 

NOTE-WHEN BOTH FLAGS ARE 

ON # NEW NAME SPECIFIED 

FOR A RENAME OPERATION IS 

NOT UNIQUE. 

15759 

TAPE LOGICAL FILE SEQ 

NUMBER 15759 

VOLUME SERIAL- IF NOT 

MOUNTED 

SYMBOLIC DEVICE ADDRESS IF 

MOUNTED 

SDAT POINTER 

2ND AND 3RD VOLUMES 

CHAIN FLAG-SAME AS TDTV6 

AND V7 

CHAIN ADDRESS-CHAIN OF - 

ADDITIONAL VOLUME ID'S 

APPENDAGE TO 

VOLUME FLAG 
VOLUME MOUNTED FLAG 
VOLUME MOUNTED MASK 
PRIVATE/PUBLIC FLAG 
PUBLIC MASK 
ORIGINAL DS VOL FLAG 
ORIGINAL DS VOL MASK 
DS VOLUME FLAG 
DS VOLUME MASK 
NOT USED 

NOT USED 

VOLUME CHAIN FIELD 

INDICATOR 

VOLUME CHAIN FIELD MASK 

NULL/VALID INDICATOR 

VALID MASK 

1=DSNAME NOT FOUND IN VTOC 

1=UNSUCCESSFUL OPERATION 

DUE TO SYSTEM FAILURE 

NOTE: WHEN BOTH FLAGS ARE 

ON, NEW NAME SPECIFIED 

FOR A RENAME OPERATION IS 

NOT UNIQUE. 

VOLUME SERIAL NUMBER 

SDAT POINTER 

2ND AND 3RD VOLUMES 



CHATDT 439 



(Listing of CHATDT continued from page <*39) 



LOCATION INSTRUCTION SOURCE 
A2 00118 TDTAP1 

A2 0011C TDTAP2 



INST 

OS 

DS 



OPER 

P 

F 



COMMENT 
CHAIN FLAG 
CHAIN ADDRESS 



THE DEVICE CODE,TDTDEV, IS DEFINED AS FOLLOWS 

BYTE BYTE 1 BYTE 2 

BYTE 3 

MODEL DEVICE UNIT 

OPT FEATURES 

X'Ol^TERMINAL X^O - X*Q0 9 

X'OO" 

X f 00 , =OTHER X f 80 f =TAPB X*01 f «2a00 

X^O'^TRACK 

NO DATA CONV 

X^O^TTRACK 

WITH DATA CONV 

X , 00 , =9TRACK 

X^O'^DIR. ACCESS 

X c 01 c «2311 

X , 0** , =2302 X , 00 i 

X'08^231** 

X V 08 V =UNIT RECORD 

X'Ol^CARD READER X 9 0Q 9 

X f 02 f =CARD PUNCH 

X'OS^PRINTER 

X f 10 f =PAPER TAPE 



4<*0 CHATDT 



Task Dictionary Table (CHATDY, CHATDH, CHAMAP. and CHAPGH) 



e 



The Task Dictionary Table CTDY) contains information required by the dynamic load- 
er to load and unload the linked program modules in a particular task. 

TDY consists of a Table Header (CHATDH), hash tables for system (CHASHT) and user 
CCHAUHT) , a Memory Map Table (CHAMAP) 9 and one Program Module Dictionary (PMD) for 
each module loaded during the task, and PMD group header (CHAPGH) , 

TDY resides in virtual storage aligned on word boundaries, and is initialized by 
STARTUP and maintained by the Dynamic Loader. 

TDH f used by the Dynamic loader to ioacte various tables, occupies 28 bytes of 
virtual storage, aligned on word boundaries. 

MAP entries are contained in a linked ii*st and terminated by a MAP entry with a 
null link. A single linked available space list is superimposed upon the MAP table. 
A control link heads the table which is terminated by a "physical table bottom" flag 
word of all zeroes. Links to locations within MAP are word-oriented, relative to MAP 
origin. A MAP entry occupies 8 bytes of virtual storage. 

CHATDY contains nested DSECTs, each of which is shown below in a separate storage map. 



CHATDY Storage map 



DEC 


8 

16 
24 
32 

<40 
48 
56 



HEX 

01 

I 

81 

I 

101 

! 

181 

I 

20 | 

I 
28) 

I 
30| 

i 
381 

1 



TDYLNP | TDYBCH | 


TDYPCH | TDYNCS | TDYFGS | 

i 1 1 


TDYJFC | TDYLDC | 


TDYLPA | TDYLPL | 


TDYLTA | TDYLTL | 


TDYLIA | TDYLIL | 


TDYSWI | TDYMSN | 


UNNAMED | 



Fields in CHATDY — by displacement 



DEC HEX FIELD DEC HEX FIELD 

0000 0000 TDYLNP 0016 0010 TDYJFC 

000 <♦ 0004 TDYBCH 0020 0014 TDYLDC 

0008 0008 TDYPCH 0024 0018 TDYLPA 

0012 000C TDYNCS 0028 001C TDYLPL 

0014 O00E TDYLDL (EQU) 0032 0020 TDYLTA 

0014 000E TDYFGS 0036 0024 TDYLTL 



DEC HEX FIELD 
0040 0028 TDYLIA 
0044 002C TDYLIL 
004 8 0030 TDYSWT 
0052 0034 TDYMSN 



Alphabetical list of fields in CHATDY 



FIELD 

TDYBCH 

TDYFGS 

TDYJFC 

TDYLDC 

TDYLDL 

TDYLIA 



DEC HEX 
0004 0004 
0014 000E 
0016 0010 
0020 0014 



FIELD 

TDYLIL 

TDYLNP 

TDYLPA 

TDYLPL 



0014 000E (EQU) TDYLTA 



DEC HEX 
0044 002C 
0000 0000 
0024 0018 
0028 001C 
0032 0020 



FIELD 

TDYMSN 

TDYNCS 

TDYPCH 

TDYSWI 



DEC HEX 
0052 0034 
0012 000C 
0008 0008 
0048 0030 



0040 0028 



TDYLTL 0036 0024 



Assembler listing of CHATDY 



LOCATION INSTRUCTION SOURCE INST QPER COMMENT 

A3 00000 CHATDY DSECT TDY ENTRY STRUCTURE 
*********************************************************************** 

* PMD PREFACE DSECT 
*********************************************************************** 

* PMD PREFACE BEGINS HERE 
A3 00000 TDYLNP DS F LINK TO NEXT PMD PREFACE 
A3 00004 TDYBCH DS F BABY CHAIN HEAD 

A3 00008 TDYPCH DS F PAPA CHAIN HEAD 

A3 0000C TDYNCS DS H MUT COUNT (NO. EXPLICIT 

* CALLS ON THIS MODULE) 
A3 0000E TDYFGS DS H PMD FLAGS 

(Listing of CHATDY continued on page 442) 
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(Listing of CHATDY continued from page 441) 



LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 




A3 0000E 


TDYLDL 

* 


EQU 


TDYFGS 




00000080 


TDYLDLM 

* 


EQU 


X^O' 




00000001 


TDYFGP 


EQU 


X*01 f 




00000002 


TDYFGC 


EQU 


X f 02 - 


A3 00010 




TDYJFC 


DS 


F 


A3 0001H 




TDYLDC 


DS 


F 






♦ USER INFORMATION FOR MOi 


A3 00018 




TDYLPA 

* 

TDYLPL 


DS 


F 


A3 0001C 




DS 


F 


A3 00020 




TDYLTA 
TDYLTL 


DS 


F 


A3 00024 




DS 


F 


A3 00028 




TDYLIA 

* 


DS 


F 


A3 0002C 




TDYLIL 


DS 


F 


A3 00030 




TDYSWI 


DS 


F 


A3 0003** 




TDYMSN 


DS 


F 


A3 00038 






DS 


F 




0000003C 


TDYPSZ 


EQU 


♦-CHATDY 


********************************************* 

* 
********************************************* 




A4 00000 


TDYPMD 


DSECT 




A4 00000 




TDYPML 


DS 


F 


A4 00004 




TDYDIA 


DS 


C 


A4 00005 




TDYPCS 


DS 


XL1 




00000001 


TDYVHX 

♦ 


EQU 


X , 01 i 




00000002 


* 
TDYFMP 


EQU 


X , 02 t 




00000004 


TDYFMD 


EQU 


X , 04 i 




00000010 


TDYUNL 


EQU 


X'lO* 




00000020 


TDYLEM 


EQU 


X^O' 




00000040 


TDYISD 


EQU 


X , 40 i 




00000080 


TDYMMI 

* 

* 


EQU 


x^o* 


A4 00006 




* 
TDYPMH 


DS 


H 


A4 00008 




TDYIDF 


DS 


F 


A4 O0O0C 




TDYMID 


DS 


CL8 


A4 00014 




TDYNRF 


DS 


H 


A4 00016 




TDYNMD 


DS 


H 






♦DEF FOR STANDARD ENTRY 


A4 00018 




TDYSDF 


DS 


OF 


A4 00018 




TDYSNM 


DS 


CL8 


A4 00020 




TDYSEP 


DS 


F 


A4 00024 




TDYSRD 


DS 


F 


A4 00028 




TDYSCL 


DS 


F 


A4 0002C 






DS 


F 


A4 00030 




TDYSSL 


DS 


F 




00000034 


TDYPBH 

* 


EQU 


♦ -TDYPMD 






♦ 
♦REF(S) 


AND MODIFIER(S) 






♦BEGIN HERE 




********************************************* 
********************************************* 




A5 00000 


TDYCSD 


DSECT 




A5 00000 




TDYCLN 


DS 


F 


A5 00004 




TDYCTL 


DS 


F 


A5 00008 




TDYCFP 
continued 


DS 


F 


(Listing 


Of CHATDY 


on page 443) 



COMMENT 

HIGH ORDER BYTE OF FLAG 
FIELD 

LOADED BY DYNAMIC 
LOADER — MASK 
PUBLIC IF 1 

DELETION CANDIDATE IF 1 
POINTER TO JFCB FOR LIBRARY 
DCB ADDRESS FOR LIBRARY 
DULE IS STORED HERE 
PMD RETRIEVAL ADDRESS (WILL 
BE 0) 

PMD LENGTH IN BYTES 
TEXT RETRIEVAL 
ADDRESS (RELATIVE TO LP A) 
TEXT LENGTH IN BYTES 
ISD RETRIEVAL 
ADDRESS (RELATIVE TO LPA) 
ISD LENGTH IN BYTES 
SYSUB SWITCH-1 IF SYSLIB 
MODULE SEQUENCE NUMBER 
RESERVED 
SIZE OF PMD PREFACE 

************************** 

PMD BODY DSECT 
************************** 

PMD ITSELF BEGINS HERE 

PMD LENGTH IN BYTES 

DIAGNOSTIC CODE 

PCS COMMUNICATION INDICATOR 

ON IF VERSION ID IS HEX 

CREATION DATE 

OFF IF ALPHAMERIC 

FORTRAN MAIN PROGRAM MODULE 

FORTRAN MODULE 

CALL PCS BEFORE UNLOAD 

MODULE PRODUCED BY LINK ED, 

MODULE HAS ISD 

MODULE MODIFICATION 

INDICATOR 

RESERVED FOR INTERNAL IBM 

USE 

PMD HEADING LENGTH IN BYTES 

ID FOR DECK PUNCHOUT 

VERSION ID 

NUMBER REFS FOR SEP 

NUMBER MODS FOR SEP 
POINT (SEP) BEGINS HERE 

SEP DEF 

MODULE NAME 

SEP DEF VALUE (SEP) 

SEP R-VALUE DISPLACEMENT 

SEP CSD LINK 

RESERVED 

SEP SEARCH LINK 

SIZE OF PMD HEADING 

EXCLUSIVE OF REFS AND 

MODIFIERS 
FOR STANDARD ENTRY POINT 

************************** 

CSD DSECT 
************************** 

CSD ENTRY STRUCTURE 
CSD LENGTH IN BYTES 
CONTROL SECTION TEXT LENGTH 
PG NO, IN MODULE TEXT OF CS 
1ST PAGE 
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I Listing of CHATDY continued from page 4*42) 



LOCATION INSTRUCTION 
A5 0000C 



A5 00014 
A5 00018 



A5 00018 
00000080 



A5 0001A 

A5 0001C 
A5 0001E 
A5 00020 
A5 00022 
A5 00024 



A5 00024 
00000080 
00000040 

00000020 
00000010 

00000002 

00000001 



A5 0002S 

00000002 

00000004 
00000008 
00000010 
00000020 
00000040 
00000080 

oooooooc 

0000004C 

ooooooco 

00008000 



A5 00026 



00000028 



A5 00028 
A5 00028 
A5 00030 
A5 00034 
A5 00038 
A5 0003C 
AS 00040 



SOURCE INST 
DS 

DS 
DS 

EQU 

EQU 



TDYCID 

* 

TDYCLK 
TDYCQR 

* 

TDYCCR 
TDYCCRM 

* 
TDYCUS 

TDYCRD 

TDYCAD 

TDYCCD 

TDYCRF 

TDYCAT 

♦ 

* 

TDYCAT1 

TDYPNM 

TDYCPR 

TDYAPR 
TDYCON 

TDYPCR 

TDYQFLG 

* 
* 

* 
* 

TDYCAT 2 

# 

TDYFXL 

TDYRDO 

TDYPUB 

TDYPRO 

TDYCOM 

TDYPVG 

TDYSYS 

TDYPBRO 

TDYPROV 

TDYPVSY 

TDYPUN 

TDYCVM 

TDYCSZ 

*DEF FOR 

TDYCDF 

TDYCNM 

TDYCBV 

TDYCRV 

TDYCDC 

TDYCBS 



DS 

DS 
DS 
DS 
DS 
DS 



EQU 
EQU 
EQU 

EQU 
EQU 

EQU 

EQU 



EQU 

EQU 

EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 



EQU 
EQU 
DS 

EQU 

CSECT 

DS 

DS 

DS 

DS 

DS 

DS 

DS 



OPER COMMENT 

CL8 CREATION DATE ELAPSED 

MICROSECONDS SINCE 

MAR. 1, 1900 

ADDRESS THIS PMD PREFACE 

COUNT OF CXDREFS AND QREFS 
N443.2 

BIT 0=NO CXDREF 

PRESENT N44 3.2 

1=CXDREF PRESENT N443. 2 

BIT 1 RESERVED 
N443.2 

BIT 2-15 NO. OF QREFS. 
N443.2 

USER COUNT (NO. KEFS INTO 

THIS CS) 

NO. RELOCATABLE DEFS 

NO. ABSOLUTE DEFS 

NO. COMPLEX DEFS 

NO. REFS IN REF TABLE 

ATTRIBUTES OF CONTROL 

SECTION 

FLAGS 

FLAGS SET BY DYNAMIC LOADER 

PUBLIC NAME FLAG 

CSD HAS BEEN ALLOCATED 

STORAGE 

•PCSA 1 CALLED FOR THIS CSD 

PUBLIC STORAGE ASSIGNED BY 

CONNECT 

PCS FLAG-COMMON CSECT 

REJECTED M2588 

TDYCQR VALIDITY FLAG 
N443.2 

0=IGNORE TDYCQR FIELD 

N443.2 

1=TDYCQR IS VALID 

N443.2 

CSECT ATTRIBUTES 

ATTRIBUTES SET BY LANGUAGE 

PROCESSOR 

•FIXED- LENGTH' IS BIT OFF, 

V/L = ON 

•READ-ONLY 1 IS BIT ON 

•PUBLIC* IS BIT ON 

•PSECT 1 IS BIT ON 

•COMMON 1 IS BIT ON 

•PRIVILEGED 1 IS BIT ON 

•SYSTEM 1 IS BIT ON 
TDYPUB+TDYRDO PUBLIC r READ ONLY MASK 
TDYPBRO+TDYPVG PRIV/PUB, READ ONLY 

MASK 
TDYPVG+TDYSYS PRIVILEGED, SYSTEM MASK 
X^OOO 1 PUBLIC NAME IS BIT ON 
H NO. PAGES OF TEXT IN 

VIRTUAL MEMORY 
♦-TDYCSD SIZE OF CSD HEADING 
NAME BEGINS HERE 
OF CSECT NAME DEF 

CL8 CS NAME 

F CS BASE 

F CS R-VAL DISPLACEMENT 

F CSD LINK 

F RESERVED 

F SEARCH LINK 



F 
H 

TDYCQR 

X^O 1 



H 

H 
H 
H 
H 
XL2 



TDYCAT 

X^O 1 

X^O 1 

X^O 1 
X'lO 1 

X 1 02 1 

X^l" 



TDYCAT ♦! 

X , 02 1 

X 1 04 1 

x'os 1 

X'lO 1 
X^O 1 
X^O 1 
X^O 1 



I********************************************************************** 
(Listing of CHATDY continued on page 44 4 > 



CHATDY 443 



(Listing of CHATDY continued from page 443) 



LOCATION INSTRUCTION SOURCE INST OPER COMMENT 

DEF DSECT 









* 






********************************************* 




A6 


00000 


TDYDEF 


DSECT 




A6 00000 






TDYDNM 


DS 


CL8 


A6 00008 






TDYDVL 


DS 


F 


A6 0000C 






TDYDRD 


DS 


F 


A6 00010 






TDYDCS 


DS 


F 


A6 00014 








DS 


F 


A6 00018 






TDYDSL 


DS 


F 




0000001C 


TDYDSZ 


EQO 


♦ -TDYDEF 


********************************************* 
********************************************* 




A7 


00000 


TDYREF 


DSECT 




A7 00000 






TDYRNM 


DS 


CL8 


A7 00008 






TDYRVL 


DS 


F 


A7 0000c 






TDYRRV 


DS 


F 


A7 00010 






TDYRCS 


DS 


F 


A7 00014 








DS 


F 




00000018 


TDYRSZ 

* 


EQU 


* -TDYREF 




A7 


00000 


* 


10RG1 


TDYRNM 


A7 00000 






TDYQNM 

* 


DS 


CL8 


A7 00008 






TDYQVL 

* 


DS 


A 


A7 O0O0C 






TDYQLN 

* 


DS 


OF 


A7 0000C 






TDYQAL 

# 


DS 


X 




00000000 


TDYQALBM 

* 


EQO 


X^O' 




00000001 


TDYQAL HM 

* 


EQU 


X , 01 i 




00000002 


TDYQALFM 


BQU 


x , 02 f 




00000003 


TDYQALDM 

* 


EQU 


X*03 # 


A7 0000D 






TDYQLG 

* 


DS 


XL3 


A7 00010 






TDYQLF 

• 


DS 


A 


A7 00014 






TDYQLS 

* 


DS 


A 




A7 


00000 


* 


10RG] 


TDYRNM 


A7 00000 






* 


DS 


2F 


A7 00008 






TDYCXD 

* 

* 

• 


DS 


F 


A7 0000C 






* 

* 

* 


DS 


2F 


A7 00014 






TDYCRL 


DS 


A 


(Listing 


of 


CHATDY 


continued 


on page 445) 



DEF ENTRY STRUCTURE 

DEF NAME 

DEF VALUE 

R- VALUE DISPLACEMENT 

CSD ADDRESS 

RESERVED 

DEF SEARCH LINK 

SIZE OF DEF 

************************** 

REF DSECT 
************************** 

REF ENTRY STRUCTURE 

REF NAME 

VALUE OF REF 

R-VALUE OF REF 

DEFINING CSD ADDRESS 

RESERVED 

SIZE OF REF 

N443.2 

QREF STRUCTURE 

N443.2 
QREF NAME, DEFINED BY PL/I 
OR N443.2 
A *DXD 9 ASSEMBLER 
N443.2 
INSTRUCTION 
N443.2 
QREF VALUE - A DISPLACEMENT 

N443.2 
SET BY DYNAMIC LOADER 
N443.2 
QREF ALIGNMENT AND LENGTH 

N443.2 
ALIGNMENT FOR QREF 

N443.2 
BYTE ALIGNMENT 
N443.2 

HALFWORD ALIGNMENT 
N443.2 

FULLWORD ALIGNMENT 
N443.2 

DOUBLEWORD ALIGNMENT 
N443.2 
LENGTH OF QREF- DEFINED AREA 

N443.2 
A (QREF WITH DIFFERENT NAME) 

N443.2 
A (QREF WITH SAME NAME) 

N443.2 
N443.2 
CXDREF STRUCTURE 

N443.2 
RESERVED 

N443.2 
CUMULATIVE EXTERNAL DUMMY 

N443.2 
SECTION BYTE LENGTH, SET 
N443.2 

BY LOADER AFTER PROCESS- 
N443.2 
ING QREFS 
N443.2 
RESERVED 

N443.2 
A (NEXT CXDREF) 



*>v 



444 CHATDY 



c 



(Listing of CHATDY continued from page 444) 
LOCATION INSTRUCTION SOURCE INST OPER 



COMMENT 
N443.2 



*********************************************************************** 

* TDYRLD RLD POINTER DSECT * 

***************** ************************************************ ****** 

A8 00000 TDYRLD DSECT MODIFIER POINTER 

A8 00000 TOYNMP DS H NUMBER OF MODIFIERS FOR 

* PAGE 

A8 00002 TDYLFM DS H LOCATION OF FIRST MODIFIER 

* FOR THIS PAGE 
*********************************************************************** 

* TDYMDF RLD MODIFIER ♦ 

*********************************************************************** 

MODIFIER 

ORDINAL NUMBER OF REFERENCE 
USED IN MODIFICATION 
FIRST 2 BITS- LENGTH OF 
ADCON TO BE MODIFIED 
DISPLACEMENT OF ADCON TO BE 
MODIFIED 

OPERATION PERFORMED IN 
MODIFICATION 
*********************************************************************** 

* TDYVMP VIRTUAL MEMORY PAGE TABLE DSECT * 

*********************************************************************** 

AA 00000 TDYVMPT DSECT 
AA 00000 TDYVMP DS H VIRTUAL MEMORY PAGE TABLE 

* ENTRY 





A9 


00000 


TDYMDF 


DSECT 




A9 00000 






TDYMRN 


DS 


H 




A9 


00000 


TDYMEL 


EQU 


TDYMRN 


A9 00002 






TDYBYT 


DS 


H 




A9 


00002 


TDYMFT 

* 


EQU 


TDYBYT 



TDYPMD Storage map 



r 



(■ 



DEC 


8 

16 

24 

32 

40 

48 



HEX 

1 
8( 

i 
10| 

I 
18 | 

i 

20| 

« 
28 | 

I 
301 



TDYPML 


| TDYDIA 

1 


(TDYPCS I 
i 1 


TDYPMH | 


TDYIDF 


i 

1 






TDYMID 




TDYMID (CONT) 


1 

1 


TDYNRF 


1 

1 


TDYNMD | 


TDYSNM | 


TDYSEP 


1 






TDYSRD 




TDYSCL 


i 
1 






UNNAMED 





TDYSSL 



I. 



Fields in TDYPMD — by displacement 



DEC HEX 
0000 0000 

0004 0004 

0005 0005 

0006 0006 
0008 0008 



FIELD 

TDYPML 

TDYDIA 

TDYPCS 

TDYPMH 

TDYIDF 



DEC HEX 
0012 000C 
0020 0014 
0022 0016 
0024 0018 
0024 0018 



FIELD 

TDYMID 

TDYNRF 

TDYNMD 

TDYSNM 

TDYSDF 



Alphabetical list of fields in TDYPMD 



FIELD 

TDYDIA 

TDYIDF 

TDYMID 

TDYNMD 

TDYNRF 



DEC HEX 
0004 0004 
0008 0008 
0012 000C 
0022 0016 
0020 0014 



FIELD 

TDYPCS 

TDYPMH 

TDYPML 

TDYSCL 

TDYSDF 



DEC HEX 

0005 0005 

0006 0006 
0000 0000 
0040 0028 
0024 0018 



DEC HEX FIELD 
0032 0020 TDYSEP 
0036 0024 TDYSRD 
004 0028 TDYSCL 
0048 0030 TDYSSL 



FIELD 

TDYSEP 

TDYSNM 

TDYSRD 

TDYSSL 



DEC HEX 
0032 0020 
0024 0018 
0036 0024 
0048 0030 



CHATDY 445 



TDYCSD Storage map 



DEC 


8 

16 

24 
32 
40 
48 
56 
64 



HEX 
01 
i 

I 
10| 

I 
18 | 

I 
20| 

1 
28 | 

I 
30| 

I 
38| 

I 
40| 





TDYCLN 




1 

1 




TDYCTL 






TDYCFP 




1 

1 




TDYCID 




TDYCID (CONT) 


1 

1 




TDYCLK 




TDYCQR 


1 

1 


TDYCUS 


1 

1 


TDYCRD 


1 

1 


TDYCAD | 


TDYCCD 


1 

1 


TDYCRF 


1 

1 


TDYCAT 


1 

1 


TDYCVM | 


TDYCNM | 




TDYCBV 




1 

1 




TDYCRV 






TDYCDC 




1 

1 




UNNAMED 





TDYCBS 



Fields in TDYCSD — by displacement 



DEC 


HEX 


FIELD 


DEC 


HEX 


FIELD 




DEC 


HEX 


FIELD 


0000 


0000 


TDYCLN 


0028 


001C 


TDYCRD 




0040 


0028 


TDYCNM 


0004 


0004 


TDYCTL 


0030 


001E 


TDYCAD 




0040 


0028 


TDYCDF 


0008 


0008 


TDYCFP 


0032 


0020 


TDYCCD 




0048 


0030 


TDYCBV 


0012 


OOOC 


TDYCID 


0034 


0022 


TDYCRF 




0052 


0034 


TDYCRV 


0020 


0014 


TDYCLK 


0036 


0024 


TDYCAT 1 


(EQU) 


0056 


0038 


TDYCDC 


0024 


0018 


TDYCCR 


CEQU) 0036 


0024 


TDYCAT 




0064 


0040 


TDYCBS 


0024 


0018 


TDYCQR 


0037 


0025 


TDYCAT 2 


(EQU) 








0026 


001A 


TDYCUS 


0038 


0026 


TDYCVM 











Alphabetical list of fields in TDYCSD 



FIELD 


DEC 


HEX 




FIELD 


DEC 


HEX 


FIELD 


DEC 


HEX 


TDYCAD 


0030 


001E 




TDYCDC 


0056 


0038 


TDYCRD 


0028 


001C 


TDYCAT 


0036 


0024 




TDYCDF 


0040 


0028 


TDYCRF 


0034 


0022 


TDYCAT1 


0036 


0024 


(EQU) 


TDYCFP 


0008 


0008 


TDYCRV 


0052 


0034 


TDYCAT2 


0037 


0025 


(EQU> 


TDYCID 


0012 


OOOC 


TDYCTL 


0004 


0004 


TDYCBS 


0064 


0040 




TDYCLK 


0020 


0014 


TDYCUS 


0026 


001A 


TDYCBV 


0048 


0030 




TDYCLN 


0000 


0000 


TDYCVM 


0038 


0026 


TDYCCD 


0032 


0020 




TDYCNM 


0040 


0028 








TDYCCR 


0024 


0018 


(EQU> 


TDYCQR 


0024 


0018 









TDYDEF Storage map 



DEC 


8 

16 

24 



HEX 



0| 

1 




— * 


TDYDNM 




8| 

1 


TDYDVL 






TDYDRD | 


10 | 

1 


TDYDCS 






UNNAMED | 


18| 

» 


TDYDSL 









Fields in TDYDEF — by displacement 
DEC HEX FIELD 



0000 0000 TDYDNM 
0008 0008 TDYDVL 



DEC HEX FIELD 
0012 OOOC TDYDRD 
0016 0010 TDYDCS 



Alphabetical list of fields in TDYDEF 

FIELD DEC HEX FIELD 



TDYDCS 

TDYDNM 



DEC HEX 

0016 0010 

0000 0000 



TDYDRD 
TDYDSL 



DEC HEX 
0012 OOOC 
0024 0018 



DEC HEX FIELD 
0024 0018 TDYDSL 



FIELD 

TDYDVL 



DEC HEX 
0008 0008 



446 CHATDY 



TDYREF Storage map 



s 

^ 



HEX 



DEC 



8 
16 



ORG TDYRNM 



0| 

1 




TDYRNM 




8| 

1 


TDXRVL 


1 

1 


TDYRRV | 


10| 
1 


TDYRCS 


1 
1 


UNNAMED | 



8 8| 

I 
16 10| 

I 

ORG TDYRNM 





8 

16 



8| 

I. 
101 



TDYQNM 


TDYQVL 


JTDYQAL | 
1 \ 


TDYQLG 


TDYQLF 


1 
\ 


TDYQLS 


L 










UNNAMED 


TDYCXD 


1 

! 


UNNAMED 



UNNAMED CCONT) 



TDYCRL 



Fields in TDYREF — by displacement 



( 





DEC HEX 
0000 0000 


FIELD 

TDYQNM 


DEC HEX 
0012 OOOC 


FIELD 
! TDYQAL 




0000 0000 


TDYRNM 


0012 OOOC 


: TDYQLN 




0008 OOOfi 


TDYCXD 


0012 OOOC 


: TDYRRV 




0008 0008 


TDYQVL 


0013 000E 


> TDYQLG 




0008 0008 


TDYRVL 


0016 0010 


TDYQLF 


Alphabetical list of 


fields in TDYREF 






FIELD 
TDYCRL 


DEC 
0020 


HEX 
0014 


FIELD 
TDYQLN 


DEC HEX 
0012 OOOC 




TDYCXD 


0008 


0008 


TDYQLS 


0020 0014 




TDYQAL 


0012 


oooc 


TDYQNM 


0000 0000 




TDYQLF 


0016 


0010 


TDYQVL 


0008 0008 




TDYQLG 


0013 


000D 


TDYRCS 


0016 0010 


TDYRLD 


Storaqe map 










DEC 


HEX 













1 TDYNMP 

I 


i 

1 


TDYLFM 


1 
I 


Fields 


in TDYRLD — by displacement 







DEC HEX FIELD 
0016 0010 TDYRCS 
0020 0014 TDYCRL 
0020 0014 TDYQLS 



FIELD DEC HEX 

TDYRNM 0000 0000 

TDYRRV 0012 OOOC 

TDYRVL 0008 0008 



DEC HEX FIELD 
0000 0000 TDYNMP 



DEC HEX FIELD 
0002 0002 TDYLFM 



Alphabetical list of fields in TDYRLD 
FIELD 



TDYLFM 



DEC HEX 
0002 0002 



FIELD 
TDYNMP 



DEC HEX 
0000 0000 



( 



CHATDY 446.1 



TDYMDF Storage map 



DEC 





HEX 
01 



TDYMRN 



L 



± 



TDYBYT 



Fields in TDYMDF — by displacement 



DEC HEX FIELD 
0000 0000 TDYMEL 



DEC HEX FIELD 
(EQU) 0000 0000 TDYMRN 



Alphabetical list of fields in TDYMDF 
FIELD 



TDYBYT 



DEC HEX 
0002 0002 



DEC HEX FIELD 
0002 0002 TDYMFT 
0002 0002 TDYBYT 



FIELD DEC HEX FIELD 
TDYMEL 0000 0000 (EQU> TDYMFT 

TDYMRN 



(EQU) 



DEC HEX 

0002 0002 (EQU) 

0000 0000 



TDYVMP Storage map 



DEC 



HEX 
01 

1 


TDYVMP | 


Fields 


in TDYVMP 


— by displacement 




DEC 


HEX FIELD 



0000 0000 TDYVMP 



Alphabetical list of fields in TDYVMP 



FIELD 

TDYVMP 



DEC HEX 
0000 0000 



CHATDY W6.2 



CHATDH Storage map 



L 



HEX 



0| 

1 


TDHPMG 


TDHLHT | 


8| 

1 


TDHPSH 


TDHPUH | 


10| 

1 


TDHPMP 


TDHLMP | 


18| 

1 


TDHCME 


TDHIVMP | 



DEC 


8 

16 

24 



Fields in CHATDH — by displacement 

DEC HEX FIELD 
0000 0000 TDHPMG 

ooo a oooa tdhlht 

0008 0008 TDHPSH 
Alphabetical list of fields in CHATDH 



DEC HEX FIELD 
0012 000C TDHPUH 
0016 0010 TDHPMP 
0020 0014 TDHLMP 



FIELD 
TDHCME 
TDHIVMP 
TDHLHT 



DEC HEX 
0024 0018 
0028 001C 
0004 0004 



FIELD 
TDHLMP 
TDHPMG 
TDHPMP 



DEC HEX 
0020 0014 
0O00 0000 
0016 0010 



DEC HEX FIELD 
0024 0018 TDHCME 
0028 001C TDHIVMP 



FIELD DEC HEX 
TDHPSH 0008 0008 
TDHPUH 0012 000C 



Assembler listing of CHATDH 



LOCATION INSTRUCTION SOURCE 
Al 00000 CHATDH 
Al 00000 TDHPMG 

Al 00004 TDHLHT 

Al 00008 TDHPSH 

# 



V. 



Al 0000C 
Al 00010 
Al 00014 
Al 00018 
Al 0001C 



00000020 
000001FD 
000001FD 



TDHPUH 
TDHPMP 
TDHLMP 
TDHCME 
TDHIVMP 

TDHSIZ 
TDHHTL 
TDHHDV 



INST OPER COMMENT 

DSECT TDY HEADING STRUCTURE 

DS F LINK TO PMD GROUP CVM ADD.) 

DS F HASH DIVISOR 

DS F ADDR. OF PRIVILEGED SYSTEM 

HASH TABLE. ADD HASH 
TABLE LENGTH (TDHHTL) TO GET ADDR. OF 
NONPRIVILEGED 

SYSTEM HASH TABLE. 
ADDRESS OF USER HASH TABLE 
ADDRESS OF MAP ORIGIN 
MAXIMUM LENGTH OF MAP 
COUNT OF VALID MAP ENTRIES 
VM ADDR OF NEXT TO LAST PMD 
GRP IN TDY 
♦-CHATDH SIZE OF HEADER 
509 HASH TABLE LENGTH 
509 VALUE OF HASH DIVISOR 



DS 
DS 
DS 
DS 
DS 

EQU 

EQU 
EQU 



F 
F 
F 
F 
F 



CHAMAP Storage map 



DEC 




HEX 

of 



MAPBCS 



MAPCSD 



Fields in CHAMAP — by displacement 

DEC HEX FIELD 
0000 0000 MAPBCS 



DEC HEX FIELD 
0004 0004 MAPCSD 



DEC HEX FIELD 



( 



CHAMAP 447 



Alphabetical list of fields in CHAMAP 



FIELD 
MAPBCS 



DEC HEX 
0000 0000 



FIELD 
MAPCSD 



DEC HEX 
0004 0004 



FIELD 



DEC HEX 



Assembler listing of CHAMAP 



LOCATION INSTRUCTION SOURCE INST OPER 
4D 00000 CHAMAP DSECT 



COMMENT 

MAP ENTRY STRUCTURE 

♦* 9-30-66 R, GILINSKY 



*********************************************************************** 

* MAP ENTRY DSECT 

*********************************************************************** 

4D 00000 MAPBCS DS F VM ADD ORIGIN OF CSECT 

4D 00004 MAPCSD DS F VM ADDRESS OF CSD 



CHAPGH Storage map 



DEC 




HEX 

of 
L 

81 



PGHNGH 



PGHLPM 



PGHPGH 



PGHEGR 



Fields in CHAPGH — by displacement 

DEC HEX FIELD 
0000 0000 PGHNGH 



DEC HEX FIELD 
0004 0004 PGHPGH 



Alphabetical list of fields in CHAPGH 



FIELD 
PGHEGR 



DEC HEX 
0012 000C 



FIELD 
PGHLPM 



DEC HEX 
0008 0008 



Assembler listing of CHAPGH 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 




61 


00000 


CHAPGH 


DSECT 




61 00000 






PGHNGH 


DS 


F 


61 00004 






PGHPGH 

* 


DS 


F 


61 00008 






PGHLPM 

* 


DS 


F 


61 0000C 






PGHEGR 


DS 


F 




00000010 


PGHGSZ 


EQU 


*-CHi 



DEC HEX FIELD 
0008 0008 PGHLPM 
0012 000C PGHEGR 



FIELD 

PGHNGH 

PGHPGH 



DEC HEX 
0000 0000 
0004 0004 



COMMENT 

PMD GROUP HEADER 

POINTER TO NEXT PMD GROUP 

HEADER 

POINTER TO PREVIOUS GROUP 

HEADER 

POINTER TO LAST PMD IN THIS 

GROUP 

POINTER TO END OF GROUP 



♦-CHAPGH GROUP HEADER SIZE 



44 8 CHAPGH 



c. 



Terminal Interrupt Information DSECT (CHATII) 

CHATII contains interrupt information (message text) which is passed from real 
core to virtual storage. CHATII occupies 12 bytes of storage. 

CHATII Storage map 



DEC 




HEX 
01 



TIIRLN 



TIIMLN 



TIIVMA 



8 [TIIWWK [TIIDTY | 



-L 



-L 



TIISDA 



Fields in CHATII — by displacement 



DEC HEX FIELD 
0000 0000 TIIRLN 
0002 0002 TIIMLN 



DEC HEX FIELD 
0001 000*4 TIIVMA 
0008 0008 TIIWWK 



DEC HEX FIELD 

0009 0009 TIIDTY 

0010 000A TIISDA 



Alphabetical list of fields in CHATII 



i 



FIELD 


DEC HEX 


FIELD 


DEC\ HEX 


FIELD DEC HEX 


TIIDTY 


0009 0009 


TIIRLN 


0000 0000 


TIIVMA 0004 0004 


TIIMLN 


0002 0002 


TIISDA 


0010 000A 


TIIWWK 0008 0008 


Assembler listi 


.ner of 


CHATII 










LOCATION 


INSTRUCTION 


SOURCE 


INST 


' OPER 


COMMENT 






AB 00000 


CHATII 


DSECT 


TERMINAL INTERRUPT 








* 






INFORMATION DSECT (Til) 


AB 


00000 






DS 


0D 


ALIGN ON DOUBLE WORD 


AB 


00000 




TIIRLN 

* 


DS 


H 


RELATIVE LINE NUMBER FROM 
TCT BEGINNING 


AB 


00002 




TIIMLN 


DS 


H 


MESSAGE LENGTH 


AB 


00004 




TIIVMA 


DS 


F 


VM ADDRESS OF MESSAGE 


AB 


00008 




TIIWWK 


DS 


X 


CAUSE OF INTERRUPT 






00000080 


TIIWW1 


EQU 


X^O' 


MESSAGE IN 






00000040 


TIIWW2 


EQU 


X^O 1 


MESSAGE OUT 






00000020 


TIIWW3 


EQU 


X^O 1 


ATTENTION 






00000010 


TIIWW4 


EQU 


X'10 1 


INITIAL CONNECTION 






00000008 


TIIWW5 


EQU 


x'os 1 


UNRECOVERABLE ERROR 






00000004 


TIIWW6 


EQU 


X'Of 


NEGATIVE POLLING RESPONSE 






00000002 


TIIWW7 


EQU 


X , 02 i 


BUFFER OVERFLOW FLAG 


AB 


00009 




TIIDTY 


DS 


X 


DEVICE TYPE 






00000001 


TIIDT1 


EQU 


x i0i» 


1050 PTTC/8 






00000002 


TIIDT2 


EQU 


X , 02 i 


2741 CORRESPONDENCE 






00000003 


TIIDT3 


EQU 


X f 03 f 


2741 PTTC/8 






00000004 


TIIDT4 


EQU 


X f 04 f 


TTY35 ASCII 






00000005 


TIIDT5 


EQU 


X'OS' 


1052-7 


AB 


0000A 




TIISDA 


DS 


XL2 


SYMBOLIC DEVICE ADDRESS 
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Terminal I/O Control Block (CHATIO) 

The Terminal I/O Control Block contains channel programs, and related control 
information for terminal I/O. CHATIO occupies 64 bytes of storage. 

CHATIO Storage map 



DEC 


8 

16 

24 

32 

40 

48 

56 



HEX 



1 TIOFPT | 

1 1 


TIORPT 




8| TIORSD (TIORTY (TIORCA (TIOFB 
1 111 


(UNNAMED (UNNAMED (UNNAMED | 
1 I 1 1 


10 | UNNAMED (TIOFL1 | UNNAMED | 
III 1 


TIOMCB 




18|TIOCOD | TIOCAD |TIOCFl 
1 1 1 


(UNNAMED | 
1 1 


TIOCNT ( 


20 | UNNAMED | 
1 1 


28 | UNNAMED | 
1 1 


30 | UNNAMED | 
1 1 


38| UNNAMED | 

1 » 



ORG CHATIO+46 



46 
48 
56 



2E 








1 

1 


TIODSP | 


30| 

1 






TIOCSW 






38|TIOSI 

1 


(UNNAMED | 
1 1 


TIOTDA 


1 
1 


TIOTDE 





Fields in CHATIO " by displacement 



DEC 

0000 

0004 

0008 

0010 

0011 

0012 

0017 

0017 

0017 

0017 

0017 

0017 

0017 

0020 



HEX 

0000 

0004 

0008 

000A 

000B 

000C 

0011 

0011 

0011 

0011 

0011 

0011 

0011 

0014 



FIELD 

TIOFPT 

TIORPT 

TIORSD 

TIORTY 

TIORCA 

TIOFB 

TIOTMR 

TIOUXC 

TIOHSI 

TIOSNS 

TIOHIO 

TIOSIO 

TIOFL1 

TIORTC 



(EQU) 
CEQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 

(EQU) 



DEC 

0020 

0024 

0024 

0025 

0028 

0028 

0028 

0028 

0028 

0028 

0030 

0046 

0048 

0052 



HEX 

0014 

0018 

0018 

0019 

001C 

001C 

001C 

001C 

001C 

001C 

001E 

002E 

0030 

0034 



FIELD 

TIOMCB 

TIOCOD 

TIOCCW 

TIOCAD 

TIOPCI 

TIOSKIP 

TIOSLI 

TIOCC 

TIOCD 

TIOCF1 

TIOCNT 

TIODSP 

TIOCSW 

TIOST 



DEC 

0056 

0056 

0056 

0056 

(EQU) 0056 

(EQU) 0056 

(EQU) 0056 

(EQU) 0056 

(EQU) 0056 

0058 

0060 

0060 

(EQU) 



HEX 

0038 

0038 

0038 

0038 

0038 

0038 

0038 

0038 

0038 

00 3A 

003C 

003C 



FIELD 

TIOSI 

TIOCR 

TIOIR 

TIOBO 

TIOEC 

TIODC 

TIOOR 

TIOLD 

TIOTO 

TIOTDA 

TIOTDE 

TIOERR 



(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 



(EQU) 



Alphabetical list of fields in CHATIO 



FIELD 

TIOBO 

TIOCAD 

TIOCC 

TIOCCW 

TIOCD 

TIOCF1 

TIOCNT 

TIOCOD 

TIOCR 

TIOCSW 

TIODC 

TIODSP 

TIOEC 

TIOERR 



DEC 

0056 

0025 

0028 

0024 

0028 

0028 

0030 

0024 

0056 

0048 

0056 

0046 

0056 

0060 



HEX 

0038 

0019 

001C 

0018 

001C 

001C 

001E 

0018 

0038 

0030 

0038 

00 2E 

0038 

003C 



(EQU) 
(EQU> 
(EQU) 

(EQU) 

(BQU) 

(EQU) 
(EQU) 



FIELD 

TIOFB 

TIOFL1 

TIOFPT 

TIOHIO 

TIOHSI 

TIOIR 

TIOLD 

TIOMCB 

TIOOR 

TIOPCI 

TIORCA 

TIORPT 

TIORSD 

TIORTC 



DEC 

0012 

0017 

0000 

0017 

0017 

0056 

0056 

0020 

0056 

0028 

0011 

0004 

0008 

0020 



HEX 

oooc 

0011 
0000 
0011 
0011 
0038 
0038 
0014 
0038 
001C 
000B 
0004 
0008 
0014 



(EQU) 
(EQU) 
(EQU) 
(EQU) 

(EQU) 

(EQU) 



FIELD 

TIORTY 

TIOSI 

TIOSIO 

TIOSKIP 

TIOSLI 

TIOSNS 

TIOST 

TIOTDA 

TIOTDE 

TIOTMR 

TIOTO 

TIOUXC 



DEC 

0010 

0056 

0017 

0028 

0028 

0017 

0052 

0058 

0060 

0017 

0056 

0017 



HEX 

000A 

0038 

0011 

001C 

001C 

0011 

0034 

003A 

003C 

0011 

0038 

0011 



(BQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 



(EQU) 
(EQU) 
(EQU) 



"~N 



(EQU) 
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Assembler listing of CHATIO 



LOC 


:ation 


INSTRUCTION SOURCE 
AC 00000 CHATIO 


INST 


OPER 




DSECT 




AC 


00000 






DS 


0D 


AC 


00000 




TIOFPT 


DS 


F 


AC 


00004 




TIORPT 


DS 


F 


AC 


00008 




TIORSD 


DS 


H 


AC 


0000A 




TIORTY 


DS 


XL1 


AC 


OO00B 




TIORCA 


DS 


XL1 


AC 


ooooc 




TIOFB 


DS 


XL1 






00000001 


TIODO 


EQU 


X^l 1 






00000002 


TIODI 


EQU 


X - 02* 






00000004 


TIOWA 


EQU 


X i 04 t 






00000008 


TIOWP 


EQU 


X f 08 f 






00000010 


TIORP 


EQU 


X'lO 1 






00000020 


TIORA 


EQU 


x^o* 






00000040 


TIOCL 


EQU 


X i 40 t 






00000080 


TIOTC 


EQU 


X'BQ 9 


AC 


0000D 






DS 


XL1 


AC 


OO0OE 






DS 


XL1 


AC 


0000F 






DS 


XL1 


AC 


00010 






DS 


XL1 


AC 


00011 




TIOFL1 


DS 


XL1 






AC 00011 


TIOSIO 


EQU 


TIOFL1 






00000080 


TIOSIOM 


EQU 


x'so* 






AC 00011 


TIOHIO 


EQU 


TIOFL1 






00000040 


TIOHIOM 


EQU 


X f 40 f 






AC 00011 


TIOSNS 


EQU 


TIOFL1 






00000020 


TIOSNSM 


EQU 


X^O 1 






AC 00011 


TIOHSI 


EQU 


TIOFUL 






00000010 


TIOHSIM 


EQU 


X'lO 1 






AC 00011 


TIOUXC 

♦ 


EQU 


TIOFL1 






00000008 


TIOUXCM 


EQU 


X*0B* 






AC 00011 


TIOTMR 


EQU 


TIOFL1 






00000004 


TIOTMRM 


EQU 


X - 04 f 


AC 


00012 






DS 


XL2 


AC 


00014 




TIOMCB 


DS 


F 


AC 


00018 




TIOCCW 


DS 


0D 


AC 


00018 




TIOCOD 
TIOCD1 


DS 


XL1 






00000001 


EQU 


X'Ol* 






00000002 


TIOCD2 


EQU 


X , 02 i 






00000004 


TIOCD3 


EQU 


X f 04 f 






O000OO0D 


TIOCD4 


EQU 


X'OD' 






00000006 


TIOCD5 


EQU 


X f 06' 






O0O00O0A 


TIOCD6 


EQU 


X'OA 1 






00000013 


TIOCD7 


EQU 


X*13 § 






00000017 


TIOCD8 


EQU 


XT?' 






0000001B 


TIOCD9 


EQU 


X'lB 9 






0000001F 


TIOCDA 


EQU 


X'lF 1 






00000027 


TIOCDB 


EQU 


X , 27 t 






0000002F 


TIOCDC 


EQU 


X f 2F' 






00000003 


TIOCDD 


EQU 


X^* 






00000008 


TIOCDE 


EQU 


X f 08 f 


AC 


00019 




TIOCAD 


DS 


XL3 


AC 


0001C 




TIOCF1 


DS 


XL1 






AC 0001C 


TIOCD 


EQU 


TIOCF1 






00000080 


TIOCDM 


EQU 


X^O 1 






AC 0001C 


TIOCC 


EQU 


TIOCF1 






00000040 


TIOCCM 


EQU 


X^O 1 


(Listing 


Of CHATIO 


continued 


on page 452) 



COMMENT 

TERMINAL I/O CONTROL 

BLOCK CTIOCB) 

FORWARD POINTER 

REVERSE POINTER 

RESIDUAL COUNT FROM ERROR 

CSW 

RETRY COUNT FOR ERROR 

RECOVERY PROCEDURES 

RELATIVE COMMAND ADDRESS OF 

ERROR CCW 

FUNCTION BYTE FOR CCW 1 

DATA OUT FUNCTION CODE 

DATA IN FUNCTION CODE 

WRITE ADDRESSING FUNCTION 

CODE 

WRITE POLLING FUNCTION CODE 

RESPONSE POLLING FUNCTION 

CODE 

RESPONSE ADDRESSING 

FUNCTION CODE 

CONTROL FUNCTION CODE 

TIC FUNCTION CODE 

FUNCTION BYTE FOR CCW 2 

FUNCTION BYTE FOR CCW 3 

FUNCTION BYTE FOR CCW 4 

FUNCTION BYTE FOR CCW 5 

FLAG BYTE 

START I/O 

1=START I/O HAS BEEN ISSUED 

HALT I/O 

1=HALT I/O HAS BEEN ISSUED 

SENSE 

1=SENSE HAS BEEN ISSUED 



UNIT EXCEPTION AND UNIT 

CHECK FLAG 

1=UNIT EXCEPTION AND CHECK 

OCCURED TOGETHER 

TIMER ISSUED FLAG 

1=TIMER ISSUED 

RESERVED FOR FUTURE USE 

MCB POINTER 

CCW 1 

COMMAND CODE - OPERATION TO 

BE DONE 

WRITE 

READ 

SENSE 

BREAK 

PREPARE 

INHIBIT 

SADZER 

SADONE 

SADTWO 

SADTHREE 

ENABLE 

DISABLE 

NO-OP 

TIC 

DATA ADDRESS - CORE ADDRESS 

FOR DATA 

FLAG BYTE 1 

CHAIN- DATA (CD) FLAG 

CD=1 - CHAINING OF DATA 

CHAIN-COMMAND (CO FLAG 

CC=1 AND CD=0 - CHAINNING 
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(Listing of CHATIO continued from page 451) 



LOCATION 


INSTRUCTION 


f SOURCE 


INST 


OPER 






AC 0001C 


TIOSLI 


EQU 


TIOCF1 






00000020 


TIOSLIM 

* 


EQU 


X^O' 






AC 0001C 


TIOSKIP 


EQU 


TIOCF1 






00000010 


TIOSKIPM 

♦ 


EQU 


XUO* 






AC 0001C 


TIOPCI 


EQU 


TIOCF1 






00000008 


TIOPCIM 


EQU 


X'QB 9 








• BITS 37 THROUGH 39 OF ' 


AC 


0001D 






OS 


XL1 


AC 


0001E 




TIOCNT 

9 


OS 


H 


AC 


00020 






OS 


D 


AC 


00028 






DS 


D 


AC 


00030 






OS 


D 


AC 


00038 






DS 


D 






AC 0002B 




|ORG| 


CHATIO* 4 6 


AC 


0002E 




TIODSP 


DS 


H 


AC 


00030 




TIOCSW 


DS 


D 






AC 00034 


TIOST 


EQU 


TIOCSW* 4 


AC 


00038 




TIOSI 


DS 


XL1 






AC 000 38 


TIOTO 


EQU 


TIOSI 






00000001 


TIOTOM 


EQU 


X^Ol* 






AC 00038 


TIOLD 


EQU 


TIOSI 






00000002 


TIOLDM 


EQU 


X , 02 i 






AC 00038 


TIOOR 


EQU 


TIOSI 






00000004 


TIOORM 


EQU 


X , 04 i 






AC 00038 


TIODC 


EQU 


TIOSI 






00000008 


TIODCM 


EQU 


X'OS 1 






AC 00038 


TIOEC 


EQU 


TIOSI 






00000010 


TIOECM 


EQU 


X'10 1 






AC 00038 


TIOBO 


EQU 


TIOSI 






00000020 


TIOBOM 


EQU 


X , 20 f 






AC 00038 


TIOIR 


EQU 


TIOSI 






00000040 


TIOIRM 


EQU 


X^O 1 






AC 00038 


TIOCR 


EQU 


TIOSI 






00000080 


TIOCRM 


EQU 


X'SO* 


AC 


00039 






DS 


XL1 


AC 


0003A 




TIOTDA 


DS 


H 


AC 


0003C 




TIOTDE 


DS 


F 






AC 0003C 


TIOERR 


EQU 


TIOTDE 






00000040 


TIOLGH 


EQU 


♦-TIOFPT 






AC 00014 


TIORTC 


EQU 


TI0MC3 



COMMENT 
COMMANDS 

SUPPRESS-LENGTH- INDICATION C SLI) FLA 

CONTROLS SIGNALING OF 

INCORRECT LENGTH 

NOTE: SEE SYSTEM/360 

PRINCIPALS OF 

OPERATION FOR DETAILS 

SKIP (SKIP) FLAG 

SKIP=1 - NO TRANSFER OF 

DATA TO STORAGE 

PROGRAMMED- CONTROLLED- INTERRUPT (PCI) F 
PCI=1 - CAUSE INTERRUPT 
WHEN CCW BECOMES ACTIV 
PHE CCE MUST BE ZERO 
UNUSED IN THE CCW 
COUNT OF STORAGE BYTES 
ASSOCIATED WITH CCW 
CCW 2 
CCW 3 
CCW 4 
CCW 5 

AREA TO SAVE INFO ON SENSE 
DISPLACEMENT TO LAST DATA 
IN CHARACTER 

CSW FOR ERROR CAUSING SENSE 
STATUS PORTION FROM CSW 
SENSE INFORMATION BYTE 
TIMEOUT 

l=TIMEOUT OCCURED 
LOST DATA 

1=DATA HAS BEEN LOST 
OVERRUN 

1=CHANNEL FAILED TO RESPOND 
ON TIME 
DATA CHECK 

1=DATA ERROR OTHER THAN 
BUS-OUT 

EQUIPMENT CHECK 
1= EQUIPMENT MALFUNCTION 
BUS-OUT CHECK 
1= INVALID PARITY DETECTED 
INTERVENTION REQUIRED 
l=NO EXECUTION INTERVENTION 
NEEDED AT DEVICE 
COMMAND REJECT 
1=DEVICE DETECTED 
PROGRAMMING ERROR 
UNUSED 

TEMPORARY PHYSICAL DEVICE 
hDDRESS 

TEMPORARY TDE ENTRY POINTER 
ON SENSE CONTAINS PTR TO 
ERROR TIOCB 

TEMP 
**************************** 
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L 



Terminal Access Operational Status Table (CHATOS) 

The Terminal Access (TAM) Operational Status Table (TOS) provides intercommunica- 
tion between TAM read/write and TAM posting, and also provides work and save areas 
relative to each section. 

The TOS occupies one page (4096 bytes) of virtual storage, aligned on page 
boundaries . 

The TOS page, connected to a user-opened DCB, is obtained by TAM OPEN for each DCB 
opened and remains active until the DCB is closed. 

CHATOS Storage map 



V 



DEC 




1920 



3520 



3720 
3728 
3736 
3744 
3752 



3816 
3824 
3832 
3810 
3848 



3872 
3880 



HEX 



0| 








TOSIOR 




= 


7801 








TOSCCW 




= 


DC0| 








TOSLF 




= 


E88| 




TOSEB 






TOSTN 




E90| 




TOSWL 




|TOSRl { 
i 1 


UNNAMED | 


E98| 




TOSDD 




| TOSOT 


|TOSSQC |TOSTEMl | 
1 I 1 


EA0| 




TOSEOL 




| TOSSBZ 


|TOSP50 |TOSP55 | 
1 1 1 


EA8| 




TOSRSC 


















T0SRS1 




EE8| 




TOSRS2 




EF0| 




TOSRS3 






TOSRS4 




EF8| 


TOSRSF 


1 

1 


T0SRS6 


| TOSRS7 


i 

1 


TOSRS8 | 


F00| 


TOSRS9 


1 

I 


TOSRS0 


| TOSRSA 


1 
\ 


TOSRSB | 


F08| 








TOSRSE 






F20| 


1 


RESERVED | 


F28| 








TOSPS1 




= 



( 



(CHATOS continued on page 454) 



CHATOS 453 



DEC 
3944 



4016 



4040 
4048 
4056 
4064 
4072 
4080 
4088 



HEX 
F68| 



FBOJ 



FC8| 

I 
FD0| 

I 
FD8| 



I 
FES | 

I 
FF0| 

I 
FF8| 



CCHATOS continued froa page 453) 



• TOSRCD * 


i a 

ORG OVERLAP { 


TOSPS2 


| TOSPS4 | 
1 1 


TOSPS5 | 


TOSPS6 


| TOSPS7 




TOSP60 [TOSPP3 


(TOSPP4 |TOSP45 |TO$PCW J 
1 I i 1 


TOSBFL | 


TOSEMCD |TOSTEM2 J TOSRV2 | TOSRSV | 
til 1 


TOSSLN | RESERVED | TOSFCCW | 


TOSSDT | | 



TOSRV3 



ORG TOSDD 



3736 



E98| 
L 



TOSD1 



TOSD2 



ORG TOSD1 



3736 E98ITOSDT [TOSDC |TOSAT JTOSAA [ 
I I I I I 

ORG TOSOT 



3740 



E9C 



ORG TOSRSF 



[TOSOB |TOSFA | 
I I i 



3832 EF8]TOSSFl | TOSFS2 | 
i I I 

ORG TOSRCD 



3944 
3952 
3960 
3968 
3976 
3984 



F68|T0SRC1 

1 


| TOSRC2 | TOSRC3 
1 1 


|TOSRC« |TOSRC5 
1 1 


|TOSRC6 |TOSRC7 |TOSRC8 | 
till 


F70|TOSRC9 

1 


|TOSRCA |TOSTOF 
1 1 


1 

1 


RESERVED | 


F78| 

1 




TOSRCS 




F80|TOSRSN 

1 


| TOSRSD 

1 


(TOSRDT |TOSRCH 
1 1 


|TOSRLF | TOSRWE | 
1 1 1 


F88| TOSE08 |TOSE00 
1 1 


|TOSE10 |TOSE01 
1 1 


|TOSE02 JTOSE03 |TOSE04 | 
till 


F90|TOSE05 

1 


|TOSE06 |TOSE07 
1 1 


JTOSS3C | 
1 1 




3 

1 

1 
1 




TOSTEM3 





~^ 



454 CHATOS 



Fields in CHATOS — by displacement 



DEC 


HEX 


FIELD 




DEC 


HEX FIELD 




DEC 


HEX 


FIELD 




0000 


0000 


TOSIOR 




3740 


0E9C TOSW6 


(EQU) 


3951 


0F6F 


TOSRC8 




1920 


0780 


TOSCCW 




3740 


0E9C TOSR5 


(EQU) 


3952 


0F70 


TOSRC9 




3520 


0DC0 


TOSER3 


(EQU) 


3740 


0E9C TOSW5 


(EQU) 


3953 


0F71 


TOSRCA 




3520 


ODCO 


TOSER2 


(EQU) 


3740 


0E9C TOSR4 


(EQU) 


3954 


0F72 


TOSTOF 




3520 


ODCO 


T0SER1 


(EQU) 


3740 


0E9C TOSW4 


(EQU) 


3954 


0F72 


TOSTO 


(EQU) 


3520 


ODCO 


TOSCO 


(EQU) 


3740 


0E9C TOSR3 


(EQU) 


3960 


0F78 


TOSRCS 




3520 


ODCO 


TOSPS 


(EQU) 


3740 


0E9C TOSW3 


(EQU) 


3968 


0F80 


TOSRSN 




3520 


ODCO 


TOSAR 


(EQU) 


3740 


0E9C TOSW2 


(EQU) 


3969 


OF 81 


TOSRSD 




3520 


ODCO 


TOSWP 


(EQU) 


3740 


0E9C TOSRO 


(EQU) 


3971 


0F83 


TOSRDT 




3520 


ODCO 


TOSWA 


(EQU) 


3740 


0E9C TOSRI 


(EQU) 


3972 


0F84 


TOSRCH 




3520 


ODCO 


TOSRE 


(EQU) 


3740 


0E9C TOSW1 


(EQU) 


3973 


0F85 


TOSRLF 




3520 


ODCO 


TOSWO 


(EQU) 


3740 


0E9C TOSOT 




3974 


0F86 


TOSRWE 




3520 


ODCO 


TOSDI 


(EQU) 


3741 


0E9D TOSFA 




3976 


0F88 


TOSE08 




3520 


ODCO 


TOSDO 


(EQU) 


3741 


0E9D TOSSA 


(EQU) 


3978 


0F8A 


TOSE00 




3520 


ODCO 


TOSEC 


(EQU) 


3741 


0E9D TOSSL 


(EQU) 


3979 


0F8B 


TOSE10 




3520 


ODCO 


TOSDL 


(EQU) 


3742 


0E9E TOSSQC 




3980 


0F8C 


TOSE01 




3520 


ODCO 


TOSLF 




3743 


0E9F TOSTEM1 




3981 


0F8D 


TOSE02 




3720 


0E88 


TOSEB 




3744 


OEAO TOSEOL 




3982 


0F8E 


TOSE03 




372*1 


0E8C 


TOSTN 




3748 


0EA4 TOSSBZ 




3983 


0F8F 


TOSE04 




3728 


OE90 


TOSWL 




3750 


0EA6 TOSP50 




3984 


0F90 


TOSE05 




3732 


0E94 


TOSR1 




3751 


0EA7 TOSP55 




3985 


OF 91 


TOSE06 




3736 


0E98 


TOSDT 




3752 


0EA8 TOSRSC 




3986 


0F92 


TOSE07 




3736 


0E98 


TOSDI 




3756 


OEAC TOSRS1 




3987 


OF 93 


TOSS3C 




3736 


0E98 


TOST4 


(EQU) 


3820 


OEEC TOSRS2 




3988 


0F94 


TOSTEM3 




3736 


0E98 


TOST3 


(EQU) 


3824 


OEFO TOSRS3 




4040 


0FC8 


TOSPS 2 




3736 


0E98 


TOST2 


(EQU) 


3828 


0EF4 TOSRS4 




4044 


OFCC 


TOSPS4 




3736 


0E98 


TOST1 


(EQU) 


3832 


0EF8 TOSSF1 




4046 


OFCE 


TOSPS 5 




3736 


0E98 


TOSDD 




3832 


0EF8 TOSF20 


(EQU) 


4048 


OFDO 


TOSPS6 




3737 


0E99 


TOSDC 




3832 


0EF8 TOSF21 


(EQU) 


4052 


0FD4 


TOSPS7 




3737 


0E99 


TOSC2 


(EQU) 


3832 


0EF8 TOSF19 


(EQU) 


4056 


0FD8 


TOSP60 




3737 


0E99 


TOSC1 


(EQU) 


3832 


0EF8 TOSF18 


(EQU) 


4058 


OFDA 


TOSP37 


(EQU) 


3738 


0E9A 


TOSAT 




3832 


0EF8 TOSF17 


(EQU) 


4058 


OFDA 


TOSP36 


(EQU) 


3738 


0E9A 


TOSD2 




3832 


0EF8 TOSF16 


(EQU) 


4058 


OFDA 


TOSP35 


(EQU) 


3738 


0E9A 


TOSU4 


(EQU) 


3832 


0EF8 TOSF13 


(EQU) 


4058 


OFDA 


TOSP34 


(EQU) 


3738 


0E9A 


TOSU3 


(EQU) 


3832 


0EF8 TOSF12 


(EQU) 


4058 


OFDA 


TOSP33 


(EQU) 


3738 


0E9A 


TOSU2 


(EQU) 


3832 


0EF8 TOSF11 


(EQU) 


4058 


OFDA 


TOSP32 


(EQU) 


3738 


0E9A 


TOSU1 


(EQU) 


3832 


0EF8 TOSF10 


(EQU) 


4058 


OFDA 


TOSP31 


(EQU) 


3738 


0E9A 


TOSUT 


(EQU) 


3832 


0EF8 TOSRSF 




4053 


OFDA 


TOSP30 


(EQU) 


3738 


0E9A 


TOSA5 


(EQU) 


3833 


0EF9 TOSFS2 




4058 


OFDA 


TOSPP3 




3738 


0E9A 


TOSA4 


(EQU) 


3834 


OEFA TOSRS6 




4059 


OFDB 


TOSP44 


(EQU) 


3738 


0E9A 


TOSA3 


(EQU) 


3836 


OEFC TOSRS7 




4059 


OFDB 


TOSP43 


(EQU) 


3738 


0E9A 


TOSA2 


(EQU) 


3838 


OEFE TOSRS8 




4059 


OFDB 


TOSP42 


(EQU) 


3738 


0E9A 


TOSA1 


(EQU) 


3840 


0F00 TOSRS9 




4059 


OFDB 


TOSP41 


(EQU) 


3739 


0E9B 


TOSAA 




3842 


0F02 TOSRSO 




4059 


OFDB 


TOSPP4 




371*0 


0E9C 


TOSOB 




3844 


0F04 TOSRSA 




4060 


OFDC 


TOSP45 




3740 


0E9C 


TOSOA 


IEQU) 


3846 


0F06 TOSRSB 




40 61 


OFDD 


TOSPCW 




3740 


0E9C 


TOS09 


(EQU) 


3848 


0F08 TOSRSE 




4062 


OFDE 


TOSBFL 




3740 


0E9C 


TOS08 


(EQU) 


3880 


0F28 TOSPS1 




4064 


OFEO 


TOSEMCD 




3740 


0E9C 


TOS07 


(EQU) 


3944 


0F68 TOSRC1 




4065 


0FE1 


TOSTEM2 




3740 


0E9C 


TOS06 


(EQU) 


3944 


0F68 TOSRCD 




4066 


0FE2 


TOSRV2 




3740 


0E9C 


TOSOS 


(EQU) 


3945 


0F69 TOSRC2 




4068 


0FE4 


TOSRSV 




3740 


0E9C 


TOS04 


(EQU) 


3946 


0F6A TOSRC3 




4072 


0FE8 


TOSSLN 




3740 


0E9C 


TOS03 


(EQU) 


3947 


0F6B TOSRC4 




4076 


OFEC 


TOSFCCW 




3740 


0E9C 


TOS02 


(EQU) 


3948 


0F6C TOSRC5 




4080 


OFFO 


TOSSDT 




3740 


0E9C 


TOSOl 


(EQU) 


3949 


0F6D TOSRC6 




4084 


0FF4 


TOSRV3 




3740 


0E9C 


TOSW7 


(EQU) 


3950 


0F6E TOSRC7 













CHATOS 455 



Alphabetical list of fields in CHATOS 



FIELD 


DEC 


HEX 




FIELD 


DEC 


HEX 




FIELD 


DEC 


HEX 




TOSAA 


3739 


0E9B 




TOSOl 


3740 


0E9C 


(EQO) 


TOSRSE 


3848 


0F08 




TOSAR 


3520 


0DC0 


(EQO) 


T0SO2 


3740 


0E9C 


(EQO) 


TOSRSF 


3832 


0EF8 




TOSAT 


3738 


0E9A 




TOS03 


3740 


0E9C 


(EQO) 


TOSRSN 


3968 


0F80 




TOSA1 


3738 


0E9A 


(EQU) 


TOS04 


3740 


0E9C 


(EQO) 


TOSRSV 


4068 


0FE4 




TOSA2 


3738 


0E9A 


(EQU) 


T0S05 


3740 


0E9C 


(EQO) 


TOSRSO 


3842 


0F02 




TOSA3 


3738 


0E9A 


(EQO) 


T0SO6 


3740 


0E9C 


(EQO) 


TOSRS1 


3756 


OEAC 




TOSA4 


3738 


0E9A 


(EQU) 


T0S07 


3740 


0E9C 


(EQO) 


TOSRS2 


3820 


OEEC 




TOSA5 


3738 


0E9A 


(EQO) 


T0S08 


3740 


0E9C 


(EQO) 


TOSRS3 


3824 


OEFO 




TOSBFL 


4062 


0FDE 




T0S09 


3740 


0E9C 


(EQO) 


TOSRS4 


3828 


0EF4 




TOSCCW 


1920 


0780 




TOSPCW 


4061 


OFDD 




TOSRS6 


3834 


OEFA 




TOSCO 


3520 


0DC0 


(EQO) 


TOSPP3 


4058 


OFDA 




TOSRS7 


3836 


OEFC 




TOSC1 


3737 


0E99 


(EQO) 


T0SPP4 


4059 


OFDB 




TOSRS8 


3838 


OEFE 




TOSC2 


3737 


0E99 


(EQO) 


TOSPS 


3520 


ODCO 


(EQO) 


TOSRS9 


3840 


0F0O 




TOSDC 


3737 


0E99 




TOSPS1 


3880 


0F28 




TOSRV2 


4066 


0FE2 




TOSDD 


3736 


0E98 




TOSPS 2 


4040 


0FC8 




TOSRV3 


4084 


0FF4 




TOSDI 


3520 


0DC0 


(EQO) 


TOSPS4 


4044 


OFCC 




TOSRWE 


3974 


0F86 




TOSDL 


3520 


0DC0 


(EQO) 


TOSPS 5 


4046 


OFCE 




TOSRO 


3740 


0E9C 


(EQO) 


TOSDO 


3520 


0DC0 


(EQO) 


TOSPS6 


4048 


OFDO 




TOSR1 


3732 


0E94 




TOSDT 


3736 


0E98 




TOSPS7 


4052 


0FD4 




TOSR3 


3740 


0E9C 


(EQO) 


TOSDI 


3736 


0E98 




TOSP30 


4058 


OFDA 


(EQO) 


TOSR4 


3740 


0E9C 


(EQO) 


TOSD2 


3738 


0E9A 




TOSP31 


4058 


OFDA 


(EQO) 


TOSR5 


3740 


0E9C 


(EQO) 


TOSEB 


3720 


0E88 




TOSP32 


4053 


OFDA 


(EQO) 


TOSSA 


3741 


0E9D 


(EQO) 


TOSEC 


3520 


0DC0 


(EQO) 


TOSP33 


4058 


OFDA 


(EQO) 


TOSSBZ 


3748 


0EA4 




TOSEMCD 


4064 


0FE0 




TOSP34 


4058 


OFDA 


(EQO) 


TOSSDT 


4080 


OFFO 




TOSEOL 


3744 


0EA0 




TOSP35 


4058 


OFDA 


(EQO) 


TOSSF1 


3832 


0EF8 




TOSER1 


3520 


ODCO 


(EQO) 


TOSP36 


4058 


OFDA 


(EQO) 


TOSSL 


3741 


0E9D 


1EQO) 


TOSER2 


3520 


ODCO 


(EQO) 


TOSP37 


4058 


OFDA 


(EQO) 


TOSSLN 


4072 


0FE8 




TOSJSR3 


3520 


ODCO 


(EQO) 


TOSP41 


4059 


OFDB 


(EQO) 


TOSSQC 


3742 


0E9E 




TOSE00 


3978 


OF 8 A 




TOSP42 


4059 


OFDB 


(EQO) 


TOSS3C 


3987 


0F93 




TOSE01 


3980 


0F8C 




TOSP43 


4059 


OFDB 


(EQO) 


TOSTEM1 


3743 


0E9F 




TOSE02 


3981 


0F8D 




TOSP44 


4059 


OFDB 


(EQO) 


TOSTEM2 


4065 


0FE1 




TOSE03 


3982 


0F8E 




TOSP45 


4060 


OFDC 




TOSTEM3 


3988 


0F94 




TOSE04 


3983 


0F8F 




TOSP50 


3750 


0EA6 




TOSTN 


3724 


0E8C 




TOSE05 


3984 


0F90 




TOSP55 


3751 


0EA7 




TOSTO 


3954 


0F72 


(EQO) 


TOSE06 


3985 


0F91 




TOSP60 


4056 


0FD8 




TOSTOF 


3954 


0F72 




TOSE07 


3986 


0F92 




TOSRCA 


3953 


0F71 




TOST1 


3736 


0E98 


(EQO) 


TOSE08 


3976 


0F88 




TOSRCD 


3944 


0F68 




TOST2 


3736 


0E98 


(EQO) 


TOSE10 


3979 


0F8B 




TOSRCH 


3972 


0F84 




TOST3 


3736 


0E98 


(EQO) 


TOSFA 


3741 


0E9D 




TOSRCS 


3960 


0F78 




TOST4 


3736 


0E98 


(EQO) 


TOSFCCW 


4076 


OFEC 




TOSRC1 


3944 


0F68 




TOSOT 


3738 


0E9A 


(EQO) 


TOSFS2 


3833 


0EF9 




TO SRC 2 


3945 


0F69 




TOSOl 


3738 


0E9A 


(EQO) 


TOSF10 


3832 


0EF8 


(EQO) 


TOSRC3 


3946 


0F6A 




TOS02 


3738 


0E9A 


(EQU) 


TOSF11 


3832 


0EF8 


(EQU) 


TOSRC4 


3947 


0F6B 




TOS03 


3738 


0E9A 


(EQU) 


TOSF12 


3832 


0EF8 


(EQO) 


TOSRC5 


3948 


0F6C 




TOS04 


3738 


0E9A 


(EQU) 


TOSF13 


3832 


0EF8 


(EQO) 


TOSRC6 


3949 


0F6D 




TOSWA 


3520 


ODCO 


(EQU) 


TOSF16 


3832 


0EF8 


(EQO> 
(EQO) 


TOSRC7 


3950 


0F6E 




TOSWL 


3728 


0E90 




TOSF17 


3832 


0EF8 


TOSRC8 


3951 


0F6F 




TOSWO 


3520 


ODCO 


(EQU) 


TOSF18 


3832 


0EF8 


(EQO) 


TOSRC9 


3952 


0F70 




TOSWP 


3520 


ODCO 


(EQU) 


TOSF19 


3832 


0EF8 


(EQO) 


TOSRDT 


3971 


0F83 




TOSW1 


3740 


0E9C 


(EQU) 


TOSF20 


3832 


0EF8 


(EQO) 


TOSRE 


3520 


ODCO 


(EQO) 


TOSW2 


3740 


0E9C 


(EQU) 


TOSF21 


3832 


0EF8 


(EQO) 


TO SRI 


3740 


0E9C 


(EQO) 


TOSW3 


3740 


0E9C 


(EQU) 


TOSIOR 


0000 


0000 




TOSRLF 


3973 


0F85 




TOSW4 


3740 


0E9C 


(EQU) 


TOSLF 


3520 


ODCO 




TOSRSA 


3844 


0F04 




TOSW5 


3740 


0E9C 


(EQU) 


TOSOA 


3740 


0E9C 


(EQO) 


TOSRSB 


3846 


0F06 




TOSW6 


3740 


0E9C 


(EQU) 


TOSOB 


3740 


0E9C 




TOSRSC 


3752 


0EA8 




TOSW7 


3740 


0E9C 


(EQU) 


TOSOT 


3740 


0E9C 




TOSRSD 


3969 


0F81 













456 CHATOS 



Assembler listing of CHATOS 



i 



LOCATION INSTRUCTION SOURCE 
AD 00000 CHATOS 
AD 00000 
AD 00000 
AD 00780 
AD O0DC0 



INST OPER 

DSECT 

DS 0D 



( 



AD 00DC0 
00000002 

AD 00DC0 

00000004 

AD O0DC0 

00000006 

AD 00DC0 

00000008 

AD 00DC0 

0000000A 

AD 00DC0 

OOOOOOOC 

AD 00DC0 

0000000E 

AD 00DC0 

00000010 

AD OODCO 

00000012 

AD OODCO 

00000014 

AD OODCO 

0000001C 

AD OODCO 

00000016 

AD OODCO 
00000018 
AD OODCO 

0000001A 



r 



AD 00E88 
AD 00E8C 
AD 00E90 
AD 00E94 
AD 00E95 
AD 00E98 

AD 00E98 
AD 00E98 
AD 00E9A 
(Listing 



TOSIOR 

TOSCCW 

TOSLF 

TOSDL 

TOSDLM 

TOSEC 

TOSECM 

TOSDO 

TOSDOM 

TOSDI 

TOSDIM 

TOSWO 

TOSWOM 

TOSRE 

TOSREM 

TOSWA 

TOSWAM 

TOSWP 

TOSWPM 

TOSAR 

TOSASM 

TOSPS 

TOSPSM 

TOSCO 

TOSCOM 

TOSER1 

TOSER1M 

TOSER2 

TOSER2M 

TOSER3 

* 

TOSER3M 

TOSEB 
TOSTN 
TOSWL 
TOSR1 

TOSDD 



AD 00E98 



TOSDI 
TOSD2 
of CHATOS continued 



DS 
DS 
DS 

EQU 
EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 
EQU 
EQU 

EQU 

DS 
DS 

JDS 
DS 
DS 
DS 
1 0RG I 
DS 
DS 
DS 



240D 

200D 

XL200 

TOSLF 

1L § 02' 

TOSLF 

X , 04 i 

TOSLF 

x^e 1 

TOSLF 

x'os 1 

TOSLF 
X'OA* 
TOSLF 
X^C 1 
TOSLF 
X'OE 1 
TOSLF 

TOSLF 
X , 12 i 
TOSLF 
X i 14 i 
TOSLF 
X'lC 1 
TOSLF 
X , 16 i 
TOSLF 
TOSLF 
X'lA' 

F 

F 

F 

CL1 

CL3 

F 

TOSDD 

OH 

XL2 

H 



COMMENT 

ALIGN ON DBL WORD BOUNDARY 

AREA USED TO CREATE CHAIOR 

CCW BUILD AREA 

LOGICAL FUNCTION BYTES 

LOGICAL FUNCTION CODE DIAL 

LOGICAL FUNCTION CODE DIAL 

MA 

LOGICAL FUNCTION CODE END 

CON 

LOGICAL FUNCTION CODE END 

CON 

LOGICAL FUNCTION CODE DATA 

OU 

LOGICAL FUNCTION CODE DATA 

OU 

LOGICAL FUNCTION CODE DATA 

IN 

LOGICAL FUNCTION CODE DATA 

IN 

LOGICAL FUNCTION CODE 

WRITE E 

LOGICAL FUNCTION CODE 

WRITE E 

LOGICAL FUNCTION CODE READ 

ER 

LOGICAL FUNCTION CODE READ 

ER 

LOGICAL FUNCTION CODE 

WRITE A 

LOGICAL FUNCTION CODE 

WRITE A 

LOGICAL FUNCTION CODE 

WRITE P 

LOGICAL FUNCTION CODE 

WRITE P 

LOGICAL FUNCTION CODE 

ADDRESS 

LOGICAL FUNCTION CODE 

ADDRESS 

LOGICAL FUNCTION CODE 

POLLING 

LOGICAL FUNCTION CODE 

POLLING 

LOGICAL FUNCTION CODE 

CONTROL 

LOGICAL FUNCTION CODE 

CONTROL 

LOG, FUNCT CODE WRITE ERR 

MESAG 

LOG, FUNCT CODE WRITE ERR 

MESAG 

LOG, FUNCT CODE ERROR TIC 

LOG. FUNCT CODE ERROR TIC 

LOG, FUNCT CODE NEG 

RESPONSE 

LOG, FUNCT CODE NEG 

RESPONSE 

ADDRESS OF DECB 

ADDRESS OF TRANSLATE TABLE 

REMAINING DATA OUT COUNT 

NOT USED AT PRESENT 

NOT USED AT PRESENT 

DEVICE TYPE DATA 



MODEL CODE AND DEVICE CLASS 
UNIT TYPE AND UNIT ADDRESS 



on page 458) 



CHATOS 457 



(Listing of CHATOS continued from page 457) 





LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 


COMMENT 








AD 00E98 




|ORG| 


TOSD1 






AD 


00B98 




TOSDT 


DS 


XL1 


DEVICE TYPE CODE 








AD 00E98 


TOST1 


EQU 


TOSDT 


1050 TERMINAL 








00000001 


TOS1T 


EQU 


X - 01 f 


1050 TERMINAL CODE 








AD 00E98 


TOST2 


EQU 


TOSDT 


2741 TERMINAL 








00000002 


TOS2M 


EQU 


X , 02 i 


2741 TERMINAL CODE 








AD 00E98 


TOST3 


EQU 


TOSDT 


MOD 35 TTY 








00000003 


TOS3M 


EQU 


X , 03* 


MOD 35 TTY MASK 








AD 00E98 


TOST4 


EQU 


TOSDT 


1052 TERMINAL 








00000004 


TOS4M 


EQU 


X , 04 i 


1052 TERMINAL CODE 








00000002 


TOSTS2 


EQU 


X , 02 i 


COUNT FOR SHIFTING TERM 
TYPE 




AD 


00E99 




TOSDC 


DS 


XL1 


DEVICE CLASS 








AD 00E99 


TOSC1 


EQU 


TOSDC 


DIAL LINE 








00000001 


TOSM1 


EQU 


X - 01 f 


DIAL LINE CODE 








AD 00E99 


TOSC2 


EQU 


TOSDC 


DEDICATED LINE 








00000002 


TOSM2 


EQU 


X , 02 t 


DEDICATED LINE CODE 




AO 


00 £9 A 




TOSAT 


DS 


XL1 


UNIT ADAPTOR TYPE 








AD 00E9A 


TOSA1 


EQU 


TOSAT 


IBM TERMINAL ADAPTOR/TYPE 1 








00000010 


TOSIA 
TOSA2 


EQU 


X'lO 1 


IBM TERMINAL ADAPTOR/TYPE 1 

CO 

IBM TERMINAL ADAPTOR/TYPE 2 








AD 00E9A 


EQU 


TOSAT 








00000020 


TOS2A 


EQU 


X f 20 f 


IBM TERMINAL ADAPTOR/TYPE 2 

CO 

IBM TELEGRAPH ADAPTOR TYPE 

1 

IBM TELEGRAPH ADAPTOR TYPE 

1 C 

IBM TELEGRAPH ADAPTOR TYPE 

2 

IBM TELEGRAPH ADAPTOR TYPE 

2 C 

IBM TERMINAL ADAPTOR TYPE 3 








AD 00E9A 


TOSA3 
TOS3A 


EQU 


TOSAT 








00000030 


EQU 


X f 30 f 








AD O0E9A 


TOSA4 


EQU 


TOSAT 








00000040 


TOS4A 

* 
TOSA5 


EQU 


X^O* 








AD O0E9A 


EQU 


TOSAT 








00000080 


TOS5A 
TOSUT 


EQU 


X^O* 


IBM TERMINAL ADAPTOR TYPE 3 

CO 

DEVICE CONTROL UNIT OR 








AD 00E9A 


EQU 


TOSAT 










♦ 






CHANNEL 








AD 00E9A 


TOSU1 


EQU 


TOSUT 


2702 CONTROL UNIT 








00000001 


TOS1U 


EQU 


X'Ol^ 


2702 CONTROL UNIT CODE 








AD 00E9A 


TOSU2 


EQU 


TOSUT 


2701 CONTROL UNIT 








00000002 


TOS2U 


EQU 


X , 02 i 


2701 CONTROL UNIT CODE 








AD 00E9A 


TOSU3 


EQU 


TOSUT 


MULTIPLEXOR CHANNEL 








00000003 


TOS3U 


EQU 


X f 03 f 


MULTIPLEXOR CHANNEL CODE 








AD 00E9A 


TOSU4 


EQU 


TOSUT 


SELECTOR CHANNEL 








00000004 


TOS4U 


EQU 


X , 04 f 


SELECTOR CHANNEL CODE 








OOO0O0OF 


TOSCUM 


EQU 


X^F* 


CONTROL UNIT MASK 








00000002 


TOSCS2 


EQU 


X - 02' 


COUNT FOR SHIFT UNIT ADAP 
TYPE 




AD 


00E9B 




TOSAA 


DS 


CL1 


ADAPTOR ADDRESS 




AD 


00E9C 






DS 


OH 






AD 


00E9C 


AD 00E9C 


TOSOT 


DS 
|ORG| 


XL2 

TOSOT 


OPTION TYPE 




AD 


00E9C 




TOSOB 


DS 


XL1 


OPTION BYTE 








AD 00E9C 


TOSW1 


EQU 


TOSOB 


WRITE INITIAL /DIAL 








00000008 


TOS1W 


EQU 


X^ 1 


WRITE INITIAL /DIAL MASK 








AD 00E9C 


TOSRI 


EQU 


TOSOB 


READ INITIAL/DIAL 








00000002 


TOSIR 


EQU 


X f 02* 


READ INITIAL/DIAL MASK 








AD 00E9C 


TOSR0 


EQU 


TOSOB 


READ INITIAL 








00000004 


TOS2R 


EQU 


X f 04 f 


READ INITIAL MASK 








AD 00E9C 


TOSW2 


EQU 


TOSOB 


WRITE INITIAL 








0000000A 


TOS2W 


EQU 


X*0A f 


WRITE INITIAL MASK 








AD 00E9C 


TOSW3 


EQU 


TOSOB 


WRITE CONTINUE 








OOOOOOOC 


TOS3W 


EQU 


X'OC' 


WRITE CONTINUE MASK 








AD O0E9C 


TOSR3 


EQU 


TOSOB 


READ CONTINUE 








00000006 


TOS3R 


EQU 


X f 06 f 


READ CONTINUE MASK 








AD 00E9C 


TOSW4 


EQU 


TOSOB 


WRITE INITIAL/ DIAL/REPEAT 








00000009 


TOS4W 


EQU 


X f 09 § 


WRITE INITIAL/DIAL/REPEAT 
MASK 




(Listing 


Of CHATOS 


continued 


on page 459) 
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J 



f Listing of CHATOS continued from page 458) 



l 



r 



( 



LOCATION INSTRUCTION SOURCE 


INST 


OPER 




AD 00E9C 


TOSR4 


EQU 


TOSOB 




00000003 


TOS4R 
TOSW5 


EQU 


% 9 QZ* 




AD O0E9C 


EQU 


TOSOB 




OO00O00B 


TOS5W 


EQU 


X , 0B i 




AD 00E9C 


TOSR5 


EQU 


TOSOB 




00000005 


TOS5R 


EQU 


x^s* 




AD 00E9C 


TOSW6 


EQU 


TOSOB 




0000000E 


TOS6W 


EQU 


X^E' 




AD 00E9C 


TOSW7 


EQU 


TOSOB 




O00OOOOF 


TOS7W 
TOSOl 


EQU 


X^F^ 




AD O0E9C 


EQU 


TOSOB 




00000065 


TOSIO 


EQU 


X^S' 




AD 00E9C 


TOS02 


EQU 


TOSOB 




00000066 


TOS24 


EQU 


X i 66 t 




AD 00E9C 


TOS03 


EQU 


TOSOB 




00000068 


TOS30 


EQU 


X f 68 f 




AD 00E9C 


TOS04 


EQU 


TOSOB 




0000006C 


TOS40 


EQU 


X f 6C f 




AD 00E9C 


TOS05 


EQU 


TOSOB 




00000069 


TOS50 


EQU 


^•69' 




AD 00E9C 


T0S06 


EQU 


TOSOB 




0000006A 


TOS60 


EQU 


X^A 1 




AD 00E9C 


TOS07 


EQU 


TOSOB 




0000006B 


TOS70 


EQU 


X f 6B f 




AD 00E9C 


TOS08 


EQU 


TOSOB 




00000064 


TOS80 


EQU 


X f 64 f 




AD 00E9C 


TOS09 


EQU 


TOSOB 




00000067 


TOS90 


EQU 


X , 67 f 




AD 00E9C 


TOSOA 


EQU 


TOSOB 




0000006D 


TOSAO 


EQU 


X 9 6D' 


AD 


00E9D 


TOSFA 


DS 


XL1 




AD 00E9D 


TOSSL 


EQU 


TOSFA 




00000080 


TOSLS 


EQU 


X^O' 




00000020 


TOSLC 


EQU 


X^O 1 




AD 00E9D 


TOSSA 


EQU 


TOSFA 




00000040 


TOSAS 


EQU 


X^O* 


AD 


00E9E 


TOSSQC 


DS 


XL1 


AD 


00E9F 


TOSTEM1 


DS 


CL1 


AD 


00EA0 


TOSEOL 


DS 


F 


AD 


00EA4 


TOSSBZ 


DS 


H 


AD 


00EA6 


TOSP50 


DS 


CL1 


AD 


O0EA7 


TOSP55 


DS 


CL1 


AD 


00EA8 


TOSRSC 


DS 


F 


AD 


00EAC 


TOSRS1 


DS 


16F 


AD 


00EEC 


TOSRS2 


DS 


F 


AD 


00EF0 


TOSRS3 
TOSRS4 


DS 


F 


AD 


00EF4 


DS 


F 


AD 


00EF8 


TOSRSF 


DS 


H 




AD 00EF8 




|ORG| 


TOSRSF 


AD 


00EF8 


TOSSF1 


DS 


XL1 




AD 00EF8 


TOSF10 


EQU 


TOSSF1 




00000080 


TOSM10 


EQU 


X^O 1 




0000007F 


TOSM15 


EQU 


X f 7F - 




AD 00EF8 


TOSF11 


EQU 


TOSSF1 




00000040 


TOSM11 


EQU 


X , 40 i 




AD 00EF8 


TOSF12 
TOSM12 


EQU 


TOSSF1 




00000020 


EQU 


X^O 1 




AD 00EF8 


TOSF13 


EQU 


TOSSF1 


(Listing of CHATOS 


continued 


on page 460) 



COMMENT 

READ INITIAL/DIAL/REPEAT 

READ INITIAL/DIAL/REPEAT 

MASK 

WRITE INITIAL/REPEAT 

WRITE INITIAL/REPEAT MASK 

READ INITIAL/REPEAT 

READ INITIAL/REPEAT MASK 

WRITE WITH RESPONSE 

WRITE WITH RESPONSE MASK 

WRITE WITH RESPONSE/REPEAT 

WRITE WITH RESPONSE/REPEAT 

MASK 

DISABLE 

DISABLE MASK 

ENABLE 

ENABliE MASK 

PREPARE 

PREPARE MASK 

SADZERO 

SAD ZERO MASK 

SADONE 

SADONE MASK 

SADTWO 

SADTWO MASK 

SADTHREE 

SADTHREE MASK 

AUTOWRAP 

AUTOWRAP MASK 

INHIBIT 

INHIBIT MASK 

BREAK 

BREAK MASK 

USER BUFFER FLAGS 

USER BUFFER LENGTH FLAG 

USER BUFFER LENGTH FLAG 

MASK 

CONVERSATIONAL MODE FLAG 

USER BUFFER AREA FLAG 

USER BUFFER AREA FLAG MASK 

NO. OF CHARS. IN END OF LINE 

SEQ. 

UNUSED 

EOL SEQUENCE CHARACTERS 

STANDARD INPUT BUFFER SIZE 

COPY OF IORCL 

COPY OF IORLN 

SDAT ADDRESS 

READ/WRITE REGISTER SAVE 

AREA 

TERMINAI CHANNEL PROGRAM 

GENER 

ADDRESS OF TRANSLATE AND 

TEST 

ADDRESS OF CALLING PROGRAM 

REG 

READ/WRITE FLAG AREA 

READ/WRITE FLAG BYTE 1 

POSTING ENTRY FLAG 

POSTING ENTRY MASK 

POSTING ENTRY MASK OFF 

WRITE HALT INDICATOR ENDOF 

MSG 

WRITE HALT MASK 

READ HALT INDICATOR MAX CCW 

LI 

READ HALT MASK 

BYPASS CHARACTER DETECTED 
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(Listing of CHATOS continued from page 459) 



LOCATION INSTRUCTION 

00000010 
00O000EF 
AD 00EF8 
00000001 
AD 00EF8 
O000O0BF 
AD 00EF8 
000000FE 
AD 00EF8 
00000002 
AD 00EF8 
00000004 
O0O0O0FB 
AD 00EF8 
0OOO00FD 

AD 00EF9 

AD OOEFA 

AD OOEFC 

AD OOEFE 
AD 00F00 
AD 00F02 
AD 00F04 
AD 00F06 
AD 0OFO8 
AD 00F28 
AD 00F68 



AD O0F68 
AD 00F69 
AD 00F6A 
AD 00F6B 
AD 00F6C 

AD 00F6D 
AD 00F6E 
AD 00F6F 
AD 00F70 

AD 00F71 
AD 00F72 



AD 00F68 
00000003 
00000003 
00000003 
00000003 
00000003 

00000003 
00000003 
00000003 

0000000A 

00000003 



AD 00F72 
00000080 



SOURCE 

* 

TOSM13 
TQSM14 
TOSF16 
TOSM16 
TOSF17 
TOSM17 
TOSF18 
TO SMI 8 
TOSF19 
TOSM19 
TOSF21 
TOSM21 
TOSM22 
TOSF20 
TOSM20 
TOSFS2 
TOSRS6 
TOSRS7 

TOSRS8 
TOSRS9 
TOSRS0 
TOSRSA 
TOSRSB 
TOSRSE 
TOSPS1 
TOSRCD 
♦ 

TOSRC1 
TOSC1M 
TOSRC2 
TOSC2M 
TOSRC3 
TOSC3M 
TOSRC4 
TOSC4M 
TOSRC5 
TOSC5M 

TQSRC6 
TOSC6M 
TOSRC7 
TOSC7M 
TOSRC8 
TOSC8M 
TOSRC9 

TOSC9M 
TOSRCA 

TOSCAM 

* 

TOSTOF 

TOSTO 

TOSTOM 



INST OPER 

EQU X , 10 i 

EQU X f EF f 

EQU TOSSF1 

EQU X'Ol* 

EQU TOSSF1 

EQU X'BF 1 

EQU TOSSF1 

EQU X'FE 1 

EQU TOSSF1 

EQU X , 02 i 

EQU TOSSF1 

EQU X f 04 f 

EQU X f FB f 

EQU TOSSF1 

EQU X f FD' 

DS XL1 

DS H 

DS H 

DS H 

DS H 

DS H 

DS H 

DS H 

DS 15B 

DS 16F 

DS 9D 

| ORG | TOSRCD 

DS XL1 

EQU X , 03 i 

DS XL1 

EQU X f 03 f 

DS XL1 

EQU X , 03 i 

DS XL1 

EQU X , 03 i 

DS XL1 

EQU X , 03 t 

DS XL1 

EQU X i 03» 

DS XL1 

EQU X'Q3* 

DS XL1 

EQU X 9 Q3* 

DS XL1 



EQU 
DS 

EQU 

DS 

EQU 

EQU 



AD 00F78 
AD 00F78 
AD 00F80 
AD 00F81 



DS 
DS 
DS 
DS 



X'OA 1 
XL! 

X , 03 i 

XL1 
TOSTOF 

x'so' 



OD 

XL8 

XL1 

CL2 



TOSRCS 
TOSRSN 
TOSRSD 

AD 00F83 TOSRDT DS XL1 

AD 00F84 TOSRCH DS XL1 

AD 00F85 TOSRLF DS XL1 

AD 00F86 TOSRWE DS XL2 

(Listing of CHATOS continued on page 4611 



COMMENT 

IN O 

BYPASS MASK 

BYPASS MASK 

IORCB COMPLETE FLAG 

IORCB COMPLETE MASK 

WRITE HALT FLAG 

WRITE HALT MASK OFF 

IORCB COMPLETE INDICATOR 

IORCB MASK OFF 

SUPPRESS LINEATION FLAG 

SUPRESS LINEATION MASK 

NK* LINE INDICATOR FLAG 

NEW LINE INDICATOR MASK 

MASK FOR NEW LINE FLAG OFF 

LINEATION FLAG OFF 

LINEATION FLAG OFF MASK 

READ/WRITE FLAG BYTE 2 

CONTINUATION DISPLACEMENT 

CHANNEL PROGRAM GENERATOR 

DISP 

CONTINUATION WORK AREA 

CPG DISPLACEMENT STORE AREA 

REMAINING PRINT LINE COUNT 

DIAL DIGIT COUNT 

RESERVED 

UNUSED 

POSTING REGISTER SAVE AREA 

INTERNAL ERROR RECORDING 

AREA 

EQUIPMENT CHECK COUNT 

MAX COUNT EQUIPMENT CHECK 

BUS OUT CHECK COUNT 

MAX COUNT BUS OUT 

COMMAND REJECT COUNT 

MAX COUNT COMMAND REJECT 

OVERRUN COUNT 

MAX COUNT OVERRUN 

INTERVENTION REQUIRED 

MAX COUNT INTERVENTION 

REQUIRE 

TIME OUT COUNT 

MAX COUNT TIMEOUT 

DATA CHECK COUNT 

MAX COUNT DATA CHECK 

RECEIVING CHECK 

MAX COUNT RECEIVING COUNT 

MASTER ERROR COUNT 

CONSECUTIVE 

MAX CONSECUTIVE ERROR COUNT 

ILLEGAL UNIT EXCEPTION 

COUNT 

MAX COUNT ILL UNIT 

EXCEPTION 

TAM OPEN COMMUNICATION BYTE 

2741/1050 TIME OUT TEST 

TIME OUT TEST IN PROGRESS 

MASK 



J 



RECORD 
RECORD 
RECORD 
ADDRES 
RECORD 
RECORD 
RECORD 
RECORD 
ERROR 



CSW 

SENSE BYTE 

SYMBOLIC DEVICE 

DEVICE TYPE 
CHANL OR DCU TYPE 
LOGICAL FUNCTION 
COMPLETE WITHOUT 
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(Listing of CHATOS continued from page 460) 



e 



LOCATION 
AD 00F88 

AD 00F8A 
AD 00F8B 
AD O0F8C 

AD 00F8D 
AD 00F8E 

AD 00F8F 

AD O0F90 

AD 00F91 

AD 00F92 

AD 00F93 

AD 00F94 
AD 00F94 
AD 00FC8 

AD 00FCC 
AD 00FCE 
AD 00FD0 

AD 00FD4 

AD 00FD8 

AD O0FDA 



INSTRUCTION 



00000003 

00000003 



AD 00FDA 
AD 00FDA 
00000040 

AD OOFDA 
00000020 

000000S7 
AD OOFDA 
00000010 
AD OOFDA 
00000008 
AD OOFDA 
00000004 
AD OOFDA 
00000002 
AD OOFDA 
00000001 
AD OOFDB 

AD OOFDB 
00000080 
AD OOFDB 
00000040 
AD OOFDB 
(Listing of CHATOS 



_ SOURCE 
TOSE08 

TOSE00 

TOSE10 

TOSE01 

* 

TOSE02 

TOSE03 

TOSE04 

TOSE05 

TOSE06 

• 

TOSE07 

TOSE09 

TOSS 3 C 

TOSS3M 

TOSTEM3 
TOSPS2 

♦ 

TOSPS4 
TOSPS5 
TOSPS6 

TOSPS7 

TOSP60 

TOSPP3 

* 

TOSP30 

TOSP31 

TOS31M 

TOSP32 
TOS32M 

TOS32R 
TOSP33 
TOS33M 
TOSP34 
TOS34M 
TOSP35 
TOS35M 
TOSP36 
TOS36M 
TOSP37 
TOS37M 
TOSPP4 

TOSP41 
TOS41M 
TOSP42 
TOS42M 
TOSP43 
continued 



INST 
DS 

DS 
DS 
DS 

DS 
DS 

DS 

DS 
DS 

DS 

EQU 

DS 

EQU 

DS 
DS 
DS 

DS 
DS 
DS 

DS 

DS 

DS 

EQU 

EQU 
EQU 

EQU 
EQU 

EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
DS 



OPER 
XL2 

XL1 
XL1 
XL1 

XL1 
XL1 

XL1 

XL1 

XL1 

XL1 
X , 03 i 
XL1 
X , 03 f 

OF 
XL52 

XL2 
XL2 
F 

F 

H 

XL1 

TOSPP3 
TOSPP3 

X^O' 

TOSPP3 
X'20' 

X'ST 
TOSPP3 
X f 10 f 
TOSPP3 

x'os 1 

TOSPP3 

X , 04 i 

TOSPP3 

X , 02 i 

TOSPP3 

X - 01' 

XL1 



EQU TOSPP4 
EQU X f 80 f 
BQU TOSPP4 
EQU X^O 1 
EQU TOSPP4 
on page 462) 



COMMENT 

REL. ADDRESS OF INTERRUPTED 

CSW 

ZERO RETRY COUNT BYTE 2 

ZERO RETRY COUNT BYTE 1 

INCORRECT LENGTH RETRY 

COUNT 

PROGRAM CHECK RETRY COUNT 

PROTECTION CHECK RETRY 

COUNT 

CHANNEL DATA CHECK RETRY 

COUNT 

CHANNEL CONTROL CHK RETRY 

COUNT 

INTERFACE CNTRL CHK RETRY 

COUNT 

CHAINING CHECK RETRY COUNT 

MAX INBOARD ERROR COUNT 

STATUS THREE RETRY COUNTER 
MASK 

DATA EXTENT BLOCK 

ADDRESS OF CALLING PROGRAM 

REG 

ACCUM. DATA-IN COUNT 

INCR, DATA-IN CHAR COUNT 

ADDRESS OF USER INPUT 

BUFFER 

NEXT FREE LOCATION IN USER 

INP 

ADDR PORTION OF LAST ERROR 

TIC 

INTERNAL POSTING FLAGS BYTE 

1 

UNUSED 

UNIT EXCEPTION INTERRUPT 

UNIT EXCEPTION INTERRUPT 

MASK 

MASTER EXCEPTION INTERRUPT 

MASTER EXCEPTION INTERRUPT 

FLA 

RESET MASTER EXCEPTION MASK 

INPUT MESSAGE COMPLETE 

ABORT 

ABORT MASK 

ATTENTION ON READ 

ATTENTION ON READ MASK 

ATTENTION ON WRITE 

ATTENTION ON WRITE MASK 

USER BUFFER SET 

USER BUFFER SET MASK 

INTERNAL POSTING FLAGS BYTE 

2 

STATUS 

STATUS 

STATUS 

STATUS 



FLAG 
MASK 
FLAG 
MASK 



RECOVERY IN PROGRESS 



CHATOS 461 



(Listing 


Of 


CHATOS 


continued 


from 


page 461 


LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 




00000020 


TOS43M 


EQU 


X^O* 




AD 


OOFDB 


TOSP**** 


EQU 


TOSPP4 




00000010 


TOS44M 


EQU 


X f 10 f 


AD OOFDC 






TOSP45 


DS 


XL1 


AD 00 FDD 






TOSPCW 


OS 


XL1 


AD OOFDE 






TOSBFL 


DS 


H 


AD 00FE0 






TOSEMCD 


DS 


XL1 


AD 00FE1 






TOSTEM2 


DS 


CL1 


AD 00FE2 






TOSRV2 


DS 


1H 


AD 00FE<i 






TOSRSV 


DS 


IF 


AD 00FE8 






TOSSLN 


DS 


1H 


AD OOFEC 






TOSFCCW 


DS 


IF 


AD OOFFO 






TOSSDT 


DS 


IF 


AD 00FF4 






TOSRV3 


DS 


11C 



COMMENT 

RECOVERY IN PROGRESS MASK 

STATUS THREE FLAG 

STATUS THREE MASK 

ERROR MESSAGE CODE 

PROCESSED CCW COUNT 

DCB BUFFER LENGTH SAVE 

ERROR MESSAGE CODE FOR 

OPERATOR 

ERROR SAVE AREA 

UNUSED 

SAVE AREA FOR REG 1*1 

SAVE USER BUFFER LENGTH 

V.M. ADDRESS OF FAILING CCW 

ADDRESS OF SDT ENTRY 

UNUSED 



462 CHATOS 



Text Editor Transaction Table CCHATRN) 



L 



The Text Editor Transaction Table CCHATRN) is set by the Text Editor in response 
to user commands. The table is also used by language processors to detect changes to 
the source data set, 
CHATRN resides in virtual storage, aligned on word boundaries. 



CHATRN Storage map 



DEC 




HEX 



8 


8 


16 


10 



c 



256 



504 
512 
520 
528 
536 
54a 
552 



100J 



TRNDCB 



TRNNAM 



TRNNAM CCONT) 



TRNRGL 



|TRNPRO |TRNLKL 



TRNREG 



TRNLKY 



1F8| 
i 






| TRNN2M 


200 | 

1 


TRNN2M CCONT) 


i 
t 


TRNINC 


208J 
1 


TRNINC CCONT) 


TRNDINC 


2101 

1 


TRNDINC CCONT) | RESERVED) 

» 


TRNSCAN 


218| 
1 


TRNSCAN CCONT) 


TRNADD 


220 | 
1 


TRNDDL | 


TRNNLK 


228| 

I 


TRNNXT 


TRNLIL 



Fields in CHATRN — by displacement 



DEC 

0000 

0004 

0012 

0014 

0015 

0016 

0263 



HEX 
0000 



FIELD 



TRNDCB 
0004 TRNNAM 
000C TRNRGL 
00 0E TRNPRO 
00 OF TRNLKL 
0010 TRNREG 
0107 TRNLKY 



DEC HEX FIELD 
0510 01FE TRNN2M 
0517 0205 TRNINC 
0524 020C TRNDINC 
0532 0214 TRNSCAN 
0540 021C TRNADD 
0544 0220 TRNDDL 
0548 0224 TRNNLK 



DEC 


HEX 


FIELD 




0552 


228 


TRNNXT 




0552 


0228 


TRNLST 


CEQU) 


0556 


022C 


TRNLIL 




0560 


0230 


TRNLIN 


CEQD) 


0560 


0230 


TRNKEY 


CEQU) 



Alphabetical list of fields in CHATRN 



FIELD DEC HEX FIELD DEC HEX 

TRNADD 0540 021C TRNLIN 0560 0230 

TRNDCB 0000 0000 TRNLKL 0015 000F 

TRNDDL 0544 0220 TRNLKY 0263 0107 

TRNDINC 0524 020C TRNLST 0552 0228 

TRNINC 0517 0205 TRNNAM 0004 0004 

TRNKEY 0560 0230 CEQU) TRNNLK 054 8 0224 

TRNLIL 0556 022C TRNNXT 0552 0228 



FIELD 
CEQU) TRNN2M 

TRNPRO 

TRNREG 
CEQU) TRNRGL 

TRNSCAN 



DEC HEX 
0510 01FE 
0014 000E 
0016 0010 
0012 000C 
0532 0214 



( 
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Assembler listing of CHATRN 



LOCATION INSTRUCTION SOURCE 



INST OPER 



COMMENT 



AE 00000 



AE 00000 




* 
TRNDCB 


DS 


A 


AE 00004 




TRNNAM 


DS 


CL8 


AE 0000C 






DS 


0U 


AE 0000C 




TRNRGL 


DS 


XL2 


AE 0000E 




TRNPRO 


DS 


XL1 


AE 0000F 




TRNLKL 


DS 


XL1 


AE 00010 




TRNREG 


DS 


CL247 


AE 00107 




TRNLKY 


DS 


CL247 


AE 001FE 




TRNN2M 


DS 


CL7 


AE 00205 




TRNINC 


DS 


CL7 


AE 0020C 




TRNDINC 

♦ 


DS 


CL7 


AE 00214 




TRNSCAN 


DS 


2A 


AE 00 21C 




TRNADD 


DS 


A 


AE 00220 




TRNDDL 


DS 


A 


AE 00224 




TRNNLK 


DS 


A 






* ADDITION AND 


DELET 






* LINKED 


LISTS 


OF VA 


AE 


00228 


TRNLST 


EQU 


♦ 


AE 00228 




TRNNXT 


DS 


A 


AE 0022C 




TRNLIL 


DS 


A 


AE 


00230 


TRNKEY 


EQU 


* 


AE 


00230 


TRNLIN 


EQU 


♦ 



CHATRN DSECT 

* LINE EDITOR TRANSACTION TABLE - CHATRN 

* THIS TABLE IS SET BY THE LINE EDITOR IN RESPONSE 

* TO USER COMMANDS 

* AND IS USED BY LANGUAGE PROCESSORS TO DETECT 

* CHANGES TO THE 

SOURCE DATA SET. 
ADDRESS OF DCB FOR DATA SET. 
BEING EDITED 
PROCESSOR NAME 

REGION NAME LENGTH BYTES 

TRANSACTIONS PROCESSED 

SWITCH 

LAST KEY LENGTH 

CURRENT KEY 

LAST KEY IN DATA SET 

CURRENT MAXIMUM FOR N2 

CURRENT INCREMENT 

DEFAULT INCREMENT 

N365 
LPC SCAN ROUTINE 

N365 
POINTER TO HEAD OF ADDITION 
LIST 

POINTER TO HEAD OF DELETION 
LIST 

NEXT AVAILABLE ENTRY SPACE 
LIST FORMAT&-THESE ARE 
VARIABLE 

LENGTH ENTRIES 

POINTER TO NEXT ENTRY OR 

END FLAG (ZERO) 

LENGTH OF RECORD IN BYTES 

KEY STARTS HERE 

LINE IMAGE STARTS AFTER KEY 
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Task Symbolic Device List ICHATSD) 



l 



The Task Symbolic Device list (TSD) contains information required by resident rou- 
tines to identify and control devices assigned to a task. 

An entry is posted to the task f s TSD when a device is allocated to the task by 
device management. If an entry for the device already exists, then a counter in the 
existing entry is increased by one. This process is reversed at device release time 
and when the counter reads zero the entry is removed from the TSD. 

All I/O requests are checked against the TSD; if the addressed device has no TSp 
entry for the task f the I/O request will be rejected by the Supervisor. 

The TSD maintains queue discipline whenever dequeuing procedures are activated. 
The correct TSD entry is used as a focal point around which a series of Supervisor 
processors can interlock their various operations. This interlock guarantees an ord- 
erly return of all of the task stacked I/O requests to a device, when the initial 
request in the stack for that task cannot be executed successfully. 

The TSD consists of one or more 64-byte blocks with each block chained to the sub- 
sequent block in the table. The first block is located by the task's TSI f and the 
chain address in the last block is all zeros. 



CHATSD Storage map 



c 



DEC 



8 
16 
24 
32 
40 
48 
56 



HEX 



0(TSDFL 
I 


(TSDZZZ1 | TSDDA 

I I 1 


TSDE2 | 


8) 

1 


TSDE3 ! 


TSDE4 | 


101 
1 


TSDE5 


TSDE6 | 


18 | TSDE7 | 
1 


TSDE8 | 


20| 


TSDE9 


TSDE10 | 


28 1 

1 


TSDE11 


TSDE12 I 


30| 

I 


TSDE13 


I TSDE14 | 


38[ 


TSDE15 


TSDCA | 



Fields in CHATSD — by displacement 



DEC HEX FIELD 
0000 0000 TSDAC 
0000 0000 TSDPR 
0000 0000 TSDRI 
0000 0000 TSDIU 
0000 0000 TSDFL 
0000 0000 TSDE1 

0000 0000 TSDBEG 

0001 0001 TSDZZZ1 



CEQU) 
(EQU) 
CEQU) 
(EQU) 



DEC 

0002 

0004 

0008 

0012 

0016 

0020 

0024 

0028 



HEX 

0002 

0004 

0008 

000C 

0010 

0014 

0018 

001C 



FIELD 
TSDDA 
TSDE2 
TSDE3 
TSDE4 
TSDE5 
TSDE6 
TSDE7 
TSDE8 



Alphabetical list of fields in CHATSD 



FIELD 

TSDAC 

TSDBEG 

TSDCA 

TSDDA 

TSDE1 

TSDE10 

TSDE11 

TSDE12 



DEC HEX 
0000 0000 
0000 0000 
0060 003C 
0002 0002 
0000 0000 
0036 0024 
0040 0028 
0044 002C 



FIELD 
(EQU) TSDE13 
TSDE14 
TSDE15 
TSDE2 
TSDE3 
TSDE4 
TSDE5 
TSDE6 



DEC 

0048 

0052 

0056 

0004 

0008 

0012 

0016 

0020 



HEX 

0030 

0034 

0038 

0004 

0008 

OO0C 

0010 

0014 



DEC HEX FIELD 




0032 0020 TSDE9 




0036 0024 TSDE10 




0040 0028 TSDE11 




0044 002C TSDE12 




004 8 0030 TSDE13 




0052 0034 TSDE14 




0056 0038 TSDE15 




0060 003C TSDCA 




FIELD DEC HEX 




TSDE7 0024 0018 




TSDE8 0028 001C 




TSDE9 0032 0020 




TSDFL 0000 0000 




TSDIU 0000 0000 


CEQU) 


TSDPR 0000 0000 


(EQU) 


TSDRI 0000 0000 


(EQU) 


TSDZZZ1 0001 0001 
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Assembler listing of CHATSD 



LOCATION 


INSTRUCTION 
AF 00000 


SOURCE 
CHATSD 


INST 


OPER 


COMMENT 
TASK SYMBOl 






DSECT 


UC DEVICE LIST 








* 






(TSDL) 




AF 00000 






TSDBEG 


OS 


OF 


ALIGN ON FULL WORD BOUNDARY 


AF 00000 






TSDE1 


OS 


OF 


TSDL 


ENTRY 


1 


AF 00000 






TSDFL 


DS 


CL1 


FLAGS 






AF 


00000 


TSDIU 


EQU 


TSDFL 


ENTRY IS IN USE 




00000080 


TSDIUM 


EQU 


X^O' 










AF 


00000 


TSDRI 


EQU 


TSDFL 


REJECT I/O 


REQUESTS 




00000040 


TSDRIM 


EQU 


x .H0i 










AF 


00000 


TSDPR 


EQU 


TSDFL 


10 ACTIVE FLAG 








♦ 






N405.2 






00000020 


TSDPRM 


EQU 


X^O' 


IO ACTIVE MASK 








* 






N405.2 






AF 


00000 


TSDAC 


EQU 


TSDFL 


DEVICE ALLOCATION COUNT 




0000000F 


TSDACM 


EQU 


X^OF^ 


DEVICE ALLOCATION COUNT 








* 






MASK 






AF 00001 






TSDZZZ1 


DS 


XL1 


UNUSED 




AF 00002 






TSDDA 


DS 


H 


SYSTEM SYMBOLIC DEVICE 








* 






ADDRESS 




AF 0000<l 






TSDE2 


DS 


F 


TSDL 


ENTRY 


2 


AF 00008 






TSDE3 


DS 


F 


TSDL 


ENTRY 


3 


AF 0000C 






TSDE4 


DS 


F 


TSDL 


ENTRY 


4 


AF 00010 






TSDE5 


DS 


F 


TSDL 


ENTRY 


5 


AF 00014 






TSDE6 


DS 


F 


TSDL 


ENTRY 


6 


AF 00018 






TSDE7 


DS 


F 


TSDL 


ENTRY 


7 


AF 0001C 






TSDE8 


DS 


F 


TSDL 


ENTRY 


8 


AF 00020 






TSDE9 


DS 


F 


TSDL 


ENTRY 


9 


AF 00024 






TSDE10 


DS 


F 


TSDL 


ENTRY 


10 


AF 00028 






TSDE11 


DS 


F 


TSDL 


ENTRY 


11 


AF 0002C 






TSDE12 


DS 


F 


TSDL 


ENTRY 


12 


AF 00030 






TSDE13 


DS 


F 


TSDL 


ENTRY 


13 


AF 00034 






TSDE14 


DS 


F 


TSDL 


ENTRY 


14 


AF 00038 






TSDE15 


DS 


F 


TSDL 


ENTRY 


15 


AF 0003C 






TSDCA 


DS 


F 


TSDL 


CHAIN 


ADDRESS 



J 
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Task Status Index CCHATSI) and Extended Task Status Index (CHAXTS) 



c 



The Task Status Index (TSI) contains the data required by the Resident Supervisor 
for the execution of a task. 

The chain of TSls f which is unlimited in extent, is located by a pointer in the 
System Table (CHASYS) . 

An extended Task Status Index (XTSI) is referenced by each TSI. The XTSI contains 
limited information describing the state of the task. The fixed-length area of the 
XTSI provides the save area for register contents during a task interrupt , as well as 
save areas for the PSW r interrupt code, etc. This fixed area of the XTSI also con- 
tains control data affecting both the task and the Resident Supervisor handling of 
the task. 

The TSI occupies 128 bytes of core storage, aligned on word boundaries. The fixed 
area of the XTSI occupies 340 bytes of core storage and must begin on a page boundary 
since XTSI pages are subject to paging. 



CflATSI Storage map 



( 



DEC 


8 

16 

24 

32 

40 

48 

56 

64 

72 

80 

88 

96 

104 

112 

120 



HEX 



o 




TSIFPT 




1 

i 


TSINX 


1 TSIPJMF | 

1 1 


8 




TSIXXL 




1 
1 




TSILOC 




10 


TSIUID I 


18 


TSISIN 


I 


TSISOT 


1 

\ 




TSITDP 




20 




TSIRPOST 




1 
I 




TSITSN 




28 


TSITIC |TSIIPC (TSIISC JTSIIXC |TSIIAC |TSIITC |TSIIIC 
1 t 1 1 1 1 


ITSIIVC | 

I \ 


30 


TSITIP | 


38 




TSILOCG 




I 

1 




TSIMTSCB 




40 


TSIBLK 


1 
1 


TSISWPCT 


1 




TSISPT 




48 




TSISST 




1 
I 




TSIVTP 




50 


TSISTE 


I 


TSISDA 


(TSIF1 |TSIVSS JTSIRSF 
1 1 I 


(TSIMGR | 
1 i 


58 


TSIADP 


i 
» 


TSIARF 


I 
1 


TSIAAF 


| TSICP | 


60 


TSILOCK |TSIFLG (TSIF2 | TSIF3 |TSIF4 | TSIBSN | TSICPR | 
1 1 1 1 i 1 I 


68 




TSIMGSCN 




1 

1 


TSIDCT 


ITSITSC 


I TSIQCT | 
t 1 


70 




TSIGQP 




1 

I 


TSITID 


| TSIXPR | 


78 


TSIPTS 


J TSI SIB |RESERVED| 
i 1 1 




TSIRVP 





ORG TSITIP 



48 



301 



I. 



TSIFPQ 



TSILPQ 



Fields in CHATS I — by displacement 



DEC HEX FIELD 




DEC 


HEX 


FIELD 




DEC 


HEX 


FIELD 


0000 0000 TSIFPT 




0006 


0006 


TSIPMF 




0024 


0018 


TSISIN 


0004 0004 TSINX 




0007 


0007 


TSIKI 


(EQU) 


0026 


001A 


TSISOT 


0006 0006 TSUI 


(EQU) 


0007 


0007 


TSIKT 


(EQU) 


0028 


001C 


TSITDP 


0006 0006 TSIJT 


(EQU) 


0007 


0007 


TSIXA 


(EQU) 


0032 


0020 


TSIRPOST 


0006 0006 TSIJA 


CEQU) 


0007 


0007 


TSIKX 


(EQU) 


0036 


0024 


TSITSN 


0006 0006 TSIJX 


(EQU) 


0007 


0007 


TSIIAP 


(EQU) 


0040 


0028 


TSITIC 


0006 0006 TSUS 


(EQU) 


0008 


0008 


TSIXXL 




0041 


0029 


TSIIPC 


0006 0006 TSIJP 


(EQU) 


0012 


oooc 


TSILOC 




0042 


002A 


TSIISC 


0006 0006 TSIJV 


(EQU) 


0016 


0010 


TSIUID 




0043 


002B 


TSI IXC 


(Continued on page 


468) 
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(Continued from page 467) 





DEC HEX 


FIELD 




DEC HEX 


FIELD 




DEC HEX 


FIELD 






0044 002C 


TSIIAC 




0086 0056 


TSIHLCK 


(EQU) 


0099 0063 


TSIUT 


(EQU) 




0045 0020 


> TSIITC 




0086 0056 


> TSIRSF 




0099 0063 


TSITSE 


(EQU) 




0046 002E 


TSIIIC 




0087 0057 


TSISCNF 


(EQU) 


0099 0063 


TSIET 


(EQU) 




0047 002F 


' TSIIVC 




0087 0057 


TSIMGRF 


(EQU) 


0099 0063 


TSIITI 


(EQU) 




0048 0030 


TSIFPQ 




0087 0057 


TSIMTT 


(EQU) 


0099 0063 


TSICMP 


(EQU) 




0048 0030 


TSITIP 




0087 0057 


' TSIMG 


(EQU) 


0099 0063 


TSICQ 


(EQU) 




0052 0034 


TSILPQ 




0087 0057 


TSIDS 


(EQU) 


0099 0063 


TSIF3 






0056 0038 


TSILOCG 




0087 0057 


' TSIMGR 




0100 0064 


TSIMB 


(EQO) 




0060 003C 


TSIMTSCB 




0088 0058 


TSIADP 




0100 0064 


TSIP2 


(EQU) 




0064 0040 


TSIBLK 




0090 005A 


k TSIARF 




0100 0064 


TSIUP 


(EQU) 




0066 0042 


TSISWPCT 




0092 005C 


: TSIAAF 




0100 0064 


TSISP 


(EQU) 




| 0068 0044 


TSISPT 




0094 005E 


; TSICP 




0100 0064 


TSIPP 


(EQU) 




0072 0048 


TSISST 




0096 0060 


TSILOCK 




0100 0064 


TSIOP 


(EQU) 




0076 004C 


TSIVTP 




0097 0061 


TSIPW 


(EQU) 


0100 0064 


TSIF4 






0080 0050 


TSISTE 




0097 0061 


TSIEX 


(EQU) 


0101 0065 


> TSIDPSS 


(EQU) 




0082 0052 


TSISDA 




0097 0061 


TSITS 


(EQU) 


0101 0065 


> TSIBSN 






0084 0054 


TSINTSE 


(EQU) 


0097 0061 


TSIRD 


(EQU) 


0102 0066 


« TSICPR 






0084 0054 


TSIMPRE 


(EQU) 


0097 0061 


TSIDL 


(EQU) 


0104 0068 


S TSIMGSCN 






0084 0054 


TSIAW 


(EQU) 


0097 0061 


TSIINPR 


(EQU) 


0108 006C 


! TSIDCT 






0084 0054 


TSIF1 




0097 0061 


TSIFLG 




0110 006E 


; TSITSC 






0085 0055 


TSIAST 


(EQU) 


0098 0062 


TSIEB 


(EQU) 


0111 006F 


1 TSIQCT 






0085 0055 


TSIAWM1 


(EQU) 


0098 0062 


: TSIXT 


(EQU) 


0112 0070 


I TSIGQP 






0085 0055 


TSIVU 


(EQU) 


0098 0062 


TSICV 


(EQU) 


0116 0074 


TSITID 






0085 0055 


TSIVT 


(EQU) 


0098 0062 


TSIAT 


(EQU) 


0118 0076 


> TSIXPR 






0085 0055 


TSIVS 


(EQU) 


0098 0062 


t TSIATTN 


(EQU) 


0120 0078 


\ TSIPTS 






0085 0055 


TSIVSS 




0098 0062 


TSINW 


(EQU) 


0122 0073 


i TSISIB 






0086 0056 


TSITSVC 


(EQU) 


0098 0062 


! TSIF2 




0124 007C 


: TSIRVP 






0086 0056 


TSILCF 


(EQU) 


0099 0063 


TSIRT 


(EQU) 












0086 0056 


TSIWLCK 


(EQU) 


















Alphabetical list of 


fields in 


CHATSI 


















FIELD 


DEC 


HEX 




FIELD 


DEC 


HEX 




FIELD 


DEC 


HEX 


- 




TSIAAF 


0092 


005C 




TSIITC 


0045 


002D 




TSIQCT 


0111 


006F 






TSIADP 


0088 


0058 




TSIITI 


0099 


0063 


(EQU) 


TSIRD 


0097 


0061 


(EQU) 




TSIARF 


0090 


005A 




TSIIVC 


0047 


002F 




TSIRPOST 


0032 


0020 






TSIAST 


0085 


0055 


(EQU) 


TSIIXC 


0043 


002B 




TSIRSF 


0086 


0056 






TSIAT 


0098 


0062 


(EQU) 


TSUA 


0006 


0006 


(EQU) 


TSIRT 


0099 


0063 


(EOT) 




TSIATTN 


0098 


0062 


(EQU) 


TSUI 


0006 


0006 


(EQU) 


TSIRVP 


0124 


007C 






TSIAW 


0084 


0054 


(EQU) 


TSIJP 


0006 


0006 


(EQU) 


TSISCNF 


0087 


0057 


(EQU) 




TSIAWMl 


0085 


0055 


(EQU) 


TSIJS 


0006 


0006 


(EQU) 


TSISDA 


0082 


0052 






TSIBLK 


0064 


0040 




TSIJT 


0006 


0006 


(EQU) 


TSISIB 


0122 


007A 






TSIBSN 


0101 


0065 




TSIJV 


0006 


0006 


(EQU) 


TSISIN 


0024 


0018 






TSICMP 


0099 


0063 


(EQU) 


TSIJX 


0006 


0006 


(EQU) 


TSISOT 


0026 


001A 






TSICP 


0094 


005E 




TSIKA 


0007 


0007 


(EQU) 


TSI SP 


0100 


0064 


(EQU) 




| TSICPR 


0102 


0066 




TSIKI 


0007 


0007 


(EQU) 


TSISPT 


0068 


0044 






TSICQ 


0099 


0063 


(EQU) 


TSIKT 


0007 


0007 


(EQU) 


TSISST 


0072 


0048 






TSICV 


0098 


0062 


(EQU) 


TSIKX 


0007 


0007 


(EQU) 


TSISTE 


0080 


0050 






TSIDCT 


0108 


006C 




TSILCF 


0086 


0056 


(EQU) 


TSISWPCT 


0066 


0042 






TSIDL 


0097 


0061 


(EQU) VTSILOC 


0012 


O00C 




TSITDP 


0028 


001C 






TSIDPSS 


0101 


0065 


(EQU) 


TSILOCG 


0056 


0038 




TSITIC 


0040 


0028 






TSIDS 


0087 


0057 


(EQU) 


TSILOCK 


0096 


0060 




TSITID 


0116 


0074 






TSIEB 


0098 


0062 


(EQU) 


TSILPQ 


0052 


0034 




TSITIP 


0048 


0030 






TSIET 


0099 


0063 


(EQU) 


TSIMB 


0100 


0064 


(EQU) 


TSITS 


0097 


0061 


(EQU) 




TSIEX 


0097 


0061 


(EQU) 


TSIMG 


0087 


0057 


(EQU) 


TSITSC 


0110 


006E 






TSIFLG 


0097 


0061 




TSIMGR 


0087 


0057 




TSITSE 


0099 


0063 


(EQU) 




TSIFPQ 


0048 


0030 




TSIMGRF 


0087 


0057 


(EQU) 


TSITSN 


0036 


0024 






TSIFPT 


0000 


0000 




TSIMGSCN 


0104 


0068 




TSITSVC 


0086 


0056 


(EQU) 




TSIF1 


0084 


0054 




TSIMPRE 


0084 


0054 


(EQU) 


TSIUID 


0016 


0010 






TSIF2 


0098 


0062 




TSIMTSCB 


0060 


003C 




TSIUP 


0100 


0064 


(EQU) 




TSIF3 


0099 


0063 




TSIMTT 


0087 


0057 


(EQU) 


TSIUT 


0099 


0063 


(EQU) 




TSIF4 


0100 


0064 




TSINTSE 


0084 


0054 


(EQU) 


TSIVS 


0085 


0055 


(EQU) 




TSIGQP 


0112 


0070 




TSINW 


0098 


0062 


(EQU) 


TSIVSS 


0085 


0055 






TSIHLCK 


0086 


0056 


(EQU) 


TSINX 


0004 


0004 




TSIVT 


0085 


0055 


(EQU) 




TSIIAC 


0044 


002C 




TSIOP 


0100 


0064 


(EQU) 


TSIV 


0076 


00 4C 






TSIIAP 


0007 


0007 


(EQU) 


TSIPMF 


0006 


0006 




TSIVU 


0085 


0055 


(EQU) 




TSIIIC 


0046 


002E 




TSIPP 


0100 


0064 


(EQU) 


TSIWLCK 


0086 


0056 


(EQU) 




TSIINPR 


0097 


0061 


(EQU) 


TSIPTS 


0120 


0078 




TSIXPR 


0118 


0076 






TSIIPC 


0041 


0029 




TSIPW 


0097 


0061 


(EQU) 


TSIXT 


0098 


0062 


(EQU) 




TSIISC 


0042 


002A 




TSIP2 


0100 


0064 


(EQU) 


TSIXXL 


0008 


0008 
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Assembler listing of CHATSI 



LOCATION INSTRUCTION SOURCE 


INST 


OPER 




BO 00000 


CHATSI 


DSECT 




BO 


00000 


♦ 


DS 


OF 


BO 


00000 


TSIFPT 


DS 


F 


BO 


00004 


TSINX 


DS 


H 


BO 


00006 




DS 


OH 


BO 


00006 


TSIPMF 


DS 


XL2 




BO 00006 


TSIJV 


EQU 


TSIPMF- 




00000040 


TSUVM 


EQO 


X^Q 1 




BO 00006 


TSIJP 

♦ 


EQU 


TSIPMF 




00000020 


TSIJPM 


EQU 


X f 20 f 




BO 00006 


TSIJS 


EQU 


TSIPMF 




00000010 


TSIJSM 


EQU 


X'lO 1 




BO 00006 


TSIJX 


EQU 


TSIPMF 




00000008 


TSIJXM 


EQU 


x^s' 




BO 00006 


TSIJA 


EQU 


TSIPMF 




00000004 


TSIJAM 


EQU 


X , 04 i 




BO 00006 


TSIJT 


EQU 


TSIPMF 




00000002 


TSIJTM 


EQU 


X , 02 i 




BO 00006 


TSUI 


EQU 


TSIPMF 




00000001 


TSIJIM 


EQU 


X^l 1 




BO 00007 


TSIIAP 


EQU 


TSIPMF 4-1 




00000010 


TSIIAPM 


EQU 


XUO' 




BO 00007 


TSIKX 


EQU 


TSIPMF*! 




00000008 


TSIKXM 


EQU 


X'OS' 




BO 00007 


TSIKA 


EQU 


TSIPMF* 1 




00000004 


TSIKAM 


EQU 


X*04 f 




BO 00007 


TSIKT 


EQU 


TSIPMF*! 




00000002 


TSIKTM 

♦ 


EQU 


X , 02 i 




BO 00007 


TSIKI 


EQU 


TSIPMF* 1 




00000001 


TSIKIM 


EQU 


X'Ol 1 


BO 


00008 




DS 


OF 


BO 


00008 


13IXXL 


DS 


F 


BO 


OOOOC 


TSILOC 


DS 


F 


BO 


00010 


DS 


OD 


BO 


00010 


TSIUID 


DS 


CL8 


BO 


00018 


TSISIN 


DS 


B 


BO 


0001A 


TSISOT 


DS 


H 


BO 


0001C 


TSITDP 


DS 


F 


BO 


00020 


TSIRPOST DS 


F 


BO 


00024 


TSITSN 




DS 


F 


CListing of CHATSI 


continued 


cm page 470) 



COMMENT 

TASK STATUS INDEX 

THIS DSECT IS RESTRICTED TO 

A FIXED LENGTH OF 128 BYTES 

FORWARD POINTER TO NEXT TSI 
NUMBER OF XTSI PAGES 

PENDING AND MASK FLAGS 

VSS INTERRUPT PENDING FLAG 

VSS INTERRUPT PENDING MASK 

TASK PROGRAM INTERRUPT 

PENDING FLAG 

TASK PROGRAM INTERRUPT 

PENDING MASK 

TASK SVC INTERRUPT PENDING 

FLAG 

TASK SVC INTERRUPT PENDING 

MASK 

TASK EXTERNAL INTERRUPT 

PENDING FLAG 

TASK EXTERNAL INTERRUPT 

PENDING MASK 

TASK ASYNCHRONOUS INTERRUPT 

PENDING FLAG 

TASK ASYNCHRONOUS INTERRUPT 

PENDING MASK 

TASK TIMER INTERRUPT 

PENDING FLAG 

TASK TIMER INTERRUPT 

PENDING MASK 

TASK SYNCHRONOUS I/O 

INTERRUPT PENDING FLAG 

TASK SYNCHRONOUS I/O 

INTERRUPT PENDING MASK 

ASYNC PROG INTRPT FLAG 

13472 
PROG INTRPT ENABLED 

13472 
TASK EXTERNAL INTERRUPT 
MASK FLAG 

TASK EXTERNAL INTERRUPT 
MASK MASK 

TASK ASYNCHRONOUS INTERRUPT 
MASK FLAG 

TASK ASYNCHRONOUS INTERRUPT 
MASK MASK 

TASK TIMER INTERRUPT MASK 
FLAG 

TASK TIMER INTERRUPT MASK 
MASK 

TASK SYNCHRONOUS I/O 
INTERRUPT MASK FLAG 
TASK SYNCHRONOUS I/O 
INTERRUPT MASK MASK 

EXTERNAL LOCATION OF FIRST 
XTSI PAGE 

INTERNAL LOCATION OF FIRST 
XTSI PAGE 

USER IDENTIFICATION 

SYSIN 

SYSOUT 

TASK DEVICE LIST POINTER 

POINTER TO PAGE REPOSTING 

GQE 

TIME SLICE B*D GQE POINTER 

FOR SECOND SCAN 
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(Listing of CHATSI continued from page 469) 



LOCATION 
BO 00028 
BO 00029 

BO 000 2A 

B0 0002B 

B0 0002C 

B0 0002D 

B0 0002E 

B0 0002F 

B0 00030 



INSTRUCTION SOURCE INST OPER 



B0 00030 



B0 00030 
BO 00039 
BO 00038 

BO 0003C 

BO 00040 
BO 00042 

BO 00044 

BO 00048 
BO 0004C 
BO 00050 
BO 00052 

BO 00054 



BO 00054 
00000001 



BO 00054 

00000080 

BO 00054 
00000040 



BO 00055 



BO 00055 
00000080 
BO 00055 
00000040 
BO 00055 
00000020 
BO 00055 

000000X0 

BO 00055 
00000008 

BO 00056 
00000080 
BO 00056 
00000040 



(Listing of CHATSI 



BO 00056 



TSITIC 
TSIIPC 

* 

TSIISC 
TSIIXC 

TSIIAC 

* 

TSIITC 

TSIIC 

TSIIVC 

TSITIP 

* 



DS 
DS 

OS 

DS 
DS 
DS 
DS 

DS 
DS 



XL1 



XL1 



XL1 



XL1 



XL1 



XLl 



TSIFPQ 
TSILPQ 
TSILOCG 

* 

TSIMTSCB DS 

TSIBLK DS 
TSISWPCT DS 

* 

TSISPT 

* 

TSISST 

TSIVTP 

TSISTE 

TSISDA 

♦ 

TSIF1 

TSIAW 

TSIAWM 

* 

* 

TSIMPRE 

♦ 

TSIMPREM EQU 

TSINTSE EQU 
TSINTSEM EQU 
DS 




COMMENT 

TASK INTERRUPT COUNTS 

COUNT OF TASK PROGRAM 

INTERRUPTS 

COUNT OF TASK SVC 

INTERRUPTS 

COUNT OF TASK EXTERNAL 

INTERRUPTS 

COUNT OF TASK ASYNCHRONOUS 

INTERRUPTS 

COUNT OF TASK TIMER 

INTERRUPTS 

COUNT OF TASK INPUT/OUTPUT 

INTERRUPTS 

COUNT OF VSS ACTIVE 

INTERRUPTS 

POINTERS TO TASK INTERRUPT 

QUEUE ENTRIES 



DS 

DS 
DS 
DS 
DS 

DS 
EQU 

EQU 



H 

HL2 

F 

F 
F 

H 
H 

XL1 

TSIF1 

X'Ol* 



EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 



TSIVSS 

X f 80 f 

TSIVSS 

X^O 1 

TSIVSS 

X'2G f 

TSIVSS 



TSIVSS 

* 

TSIVS 

TSIVSM 

TSIVT 

TSIVTM 

TSIVU 

TSIVUM 

TSIAWM1 

TSIAWMM 

TSIAST 

TSIASTM 

TSIRSF 

TSIHLCK 

TSIHLCKM 

TSIWLCK 

TSIWLCKM EQU 

♦ 

continued on page 471} 



FIRST INTERRUPT QUEUE ENTRY 

LAST INTERRUPT QUEUE ENTRY 

ROUTINE TO LAST ACCESS 

TSILOCK 

ADDRESS OF MTSCB FOR 

SPECIAL TASK(MT/T) 

BLOCK PAGING COUNT 

STEAL WRITES PENDING COUNT 

(MT/T) 

SPT PAGE AND DISP FOR LOCK 

WAIT LOCKS* 

SCHEDULED START TIME 

VSS ALTERNATE TSI POINTER 

CURRENT SCHED TABLE INDEX 

SYMBOLIC DEVICE ADDRESS OF 

TSP TERMINAL 

FLAG BYTE 

AWAIT FLAG 

AWAIT MASK 

AWAIT MASK ALSO USED WHEN WISH RESCHEDULER 

TO TRANSFER A TASK TO INACTIVE 

LIST (SECONDARY 

USAGE) CALLER TO RESCHED MUST TURN AWAIT 

FLAG 

OFF WHEN RETURNING 

MAX PAGE READS EXCEEDED 

FLAG 

MAX PAGE READS EXCEEDED 

MASK 

NORMAL TSE FLAG 

NORMAL TSE MASK 

VIRTUAL MEMORY SUPERVISOR 

SUPPORT FLAG 

VSS ACTIVE FLAG 

VSS ACTIVE MASK 

TSP CONNECTED FLAG 

TSP CONNECTED MASK 

SEPARATE TSP TERMINAL FLAG 

SEPARATE TSP TERMINAL MASK 

AUXILIARY WARNING MESSAGE 

FLAG 

AUXILIARY WARNING MESSAGE 

MASK 

AUX SPACE TERMINATION FLAG 

AUX SPACE TERMINATION MASK 

RESCHEDULING FLAGS 

HOLDING INTERLOCK FLAG 

HOLDING INTERLOCK MASK 

WAITING ON INTERLOCK FLAG 

WAITING ON INTERLOCK FLAG 

MASK 



EQU TSIF1 



X , 80 i 

TSIF1 
X f 40 f 
XL1 



EQU X'10' 



EQU 

EQU 

DS 

EQU 

EQU 

EQU 



TSIVSS 

XL1 

TSIRSF 
X'BO 9 
TSIRSF 
X*40 # 
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C Listing of CHATSI continued from page 470) 



LOCATION INSTRUCTION SOURCE INST OFER 



<v 



( 



r 







BO 00056 


TSILCF 


EQU 


TSIRSF 






00000020 


TSILCFM 


EQU 


X f 20* 






BO 00056 


TSITSVC 


EQU 


TSIRSF 






00000010 


TSITSVCM 


EQU 


X'lO' 


BO 


00057 




TSIMGR 


DS 


XL1 






BO 00057 


TSIDS 


EQU 


TSIMGR 






00000080 


TSIDSM 


EQU 


X f 80 f 






BO 00057 


TSIMG 


EQU 


TSIMGR 






00000020 


TSIMGM 


EQU 


X^O' 






BO 00057 


TSIMTT 


EQU 


TSIMGR 






00000010 


TSIMTTM 


EQU 


X f 10 f 






BO 00057 


TSIMGRF 


EQU 


TSIMGR 






00000008 


TSIMGRFM 


EQU 


X»08 f 






BO 00057 


TSISCNF 


EQU 


TSIMGR 






00000004 


TSISCNTO 


EQU 


X , 04 i 


BO 


00058 




TSIADP 


DS 


m H 


BO 


0005A 




TSIARF 


DS 


*H 


BO 


0005C 




TSIAAF 


DS 


H 


BO 


0005E 




TSICP 


DS 


HL2 


BO 


00060 




TSILOCK 


DS 


XL1 


BO 


00061 




TSIFLG 


DS 


XL1 






BO 00061 


TSIINPR 


BQU 


TSIFLG 






00000020 


TSIINPRM 


EQU 


X*20 9 






OO000ODF 


TSIINPRC 


EQU 


X § DF* 






BO 00061 


TSIDL 


EQU 


TSIFLG 






00000010 


TSIDLM 


EQU 


X'lO^ 






BO 00061 


TSIRD 


EQU 


TSIFLG 






00000008 


TSIRDM 


EQU 


x'os* 






BO 00061 


TSITS 


EQU 


TSIFLG 






00000004 


TSITSM 


EQU 


X , 04* 






BO 00061 


TSIEX 


EQU 


TSIFLG 






00000002 


TSIEXM 


EQU 


X f 02' 






BO 00061 


TSIPW 


EQU 


TSIFLG 






00000001 


TSIPWM 


EQU 


X'Ol' 


BO 


00062 




TSIF2 


DS 


XL1 






BO 00062 


TSINW 


EQU 


TSIF2 






00000080 


TSINWM 


EQU 


x'so 1 






0000007F 


TSINWC 


EQU 


X f 7F' 






BO 00062 


TSIATTN 




EQU 


TSIF2 






00000040 


TSIATTNM 
TSIAT 


EQU 


X^O^ 






BO 00062 


EQU 


TSIF2 






00000008 


TSIATM 


EQU 


X f 08 f 






BO 00062 


TSICV 


EQU 


TSIF2 






00000004 


TSICVM 


EQU 


X , 04» 






BO 00062 


TSIXT 


EQU 


TSIF2 






00000002 


TSIXTM 


EQU 


X i 02 i 






BO 00062 


TSIEB 


EQU 


TSIF2 






00000001 


TSIEBM 


EQU 


X'Ol 1 


BO 


00063 




TSIF3 


DS 


XL1 






BO 00063 


TSICQ 


EQU 


TSIF3 






00000080 


TSICQM 


EQU 


X^O 1 






BO 00063 


TSICMP 


EQU 


TSIF3 






00000040 


TSICMX 


EQU 


X^O' 






BO 00063 


TSIITI 


EQU 


TSIF3 






00000010 


TSIITIM 


EQU 


X'lO 1 






BO 00063 


TSIET 


EQU 


TSIF3 


CU 


Lsting 


Of CHATSI 


continued 


on pa 


ge 472) 



COMMENT 

LO CORE FTSE FLAG 

LO CORE FTSE FLAG MASK 

TSEND SVC FLAG 

TSEND SVC FLAG MASK 

MIGRATION FLAGS 

TWAIT FLAG 

TWAIT MASK 

ANY TASK IN MIGRATION 

IN MIGRATION IF ON 

SPECIAL TASK FLAG 

(MT/TJ 

SPECIAL TASK MASK 

CMT/TJ 

MIGRATION REQUESTED FLAG 

(MT/T) 

MIGRATION REQUESTED MASK 

CMT/T) 
SCAN FLAG 

CMT/T) 
SCAN MASK 

(MT/T> 

AUXILIARY DISK PAGE COUNT 
AUXILIARY REQUIREMNET FIELD 
ASSIGNED AUXILIARY COUNT 
FIELD 

PAGING REQUESTS PENDING 
COUNT 
LOCK BYTE 



IN PROCESS FLAG 

IN PROCESS FLAG COMPLEMENT 

DELAY FLAG 

DELAY MASK 

READY FLAG 

READY MASK 

TIME SLICE END FLAG 

TIME SLICE END MASK 

IN EXECUTION FLAG 

IN EXECUTION MASK 

PAGE WAIT FLAG 

PAGE WAIT MASK 

FLAG BYTE 

IN THE WALL FLAG 

IN THE WALL MASK 

IN THE WALL COMPLEMENT 

EXPRESS DISPATCH FLAG 

16950 
EXPRESS DISPATCH MASK 

16950 
INACTIVE TASK FLAG 
INACTIVE TASK MASK 
CONVERSATIONAL TASK FLAG 
CONVERSATIONAL TASK MASK 
XTSI OUT FLAG 
XTSI OUT MASK 
EXECUTE BOUND FLAG 
N487 

EXECUTE BOUND MASK 
N487 

FLAG BYTE 

COMP. QUANTUM FLAG 
COMP. QUANTUM MASK 
COMP. PRI FLAG 
COMP. PRI MASK 
RESERVED 
RESERVED 
END OF TIME SLICE FLAG 



CHATSI 471 



(Listing of CHATSI continued from page 171) 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 






00000008 


TSIETM 


EQU 


x'oa' 






BO 00063 


TSITSE 


EQU 


TSIF3 






00000004 


TSITSEM 


EQU 


X f 04 f 






BO 00063 


TSIUT 


EQU 


TSIF3 






00000002 


TSIUTM 


EQU 


X , 02 i 






BO 00063 


TSIRT 


EQU 


TSIF3 






00000001 


TSIRTM 


EQU 


X^Ol* 








• TSIF4 


IS REFERENCED 


BO 


00064 




TSIF4 


DS 


XL1 






BO 00064 


TSIOP 


EQU 


TSIF4 






00000000 


TSIOPM 
TSIPP 


EQU 


X^O 1 






BO 00064 


EQU 


TSIF4 






00000080 


TSIPPM 


EQU 


X^O^ 






BO 00064 


TSISP 


EQU 


TSIF4 






OOOOOOCO 


TSISPM 


EQU 


X'CO^ 






BO 00064 


TSIUP 


EQU 


TSIF4 






000000E0 


TSIUPM 


EQU 


X f EO f 






BO 00064 


TSIP2 


EQU 


TSIF4 






00000020 


TSIP2M 


EQU 


X^O' 






BO 00064 


TSIMB 


EQU 


TSIF4 






00000002 


TSIMBM 


EQU 


X § 02 f 


BO 


00065 




TSIBSN 


DS 


XL1 






BO 00065 


TSIDPSS 


EQU 


TSIBSN 






00000020 


TSIDPSSM 


i EQU 


X^O' 


BO 


00066 




TSICPR 


DS 


H 


BO 


00068 






DS 


OF 


BO 


00068 




TSIMGSCN 


DS 


A 


BO 


0006C 




TSIDCT 


DS 


H 


BO 


0006H 




TSITSC 


DS 


XL! 


BO 


0006F 




TSIQCT 


DS 


XL1 


BO 


00070 






DS 


OF 


BO 


00070 




TSIGQP 


DS 


F 


BO 


00074 




TSITID 


DS 


H 


BO 


00076 




TSIXPR 


DS 


H 


BO 


00078 




TSIPTS 


DS 


H 


BO 


0007A 




TSISIB 


DS 


C 


BO 


0007C 






DS 


OF 


BO 


0007C 




TSIRVP 


DS 


F 



COMMENT 

END OF TIME SLICE MASK 
REAL TIME SLICE END FLAG 
REAL TIME SLICE END MASK 
USER TIME REQUIRED FLAG 
USER TIME REQUIRED MASK 
REAL TIME INTRPT PENDING 
FLAG 16292 

REAL TIME INTRPT PENDING 
MASK 16292 
BY THE XTRCT AND SETUP MACROS 
PRIORITY FLAGS 
SYSTEM OPERATOR PRIORITY 
FLAG 

SYSTEM OPERATOR PRIORITY 
MASK 

SYSTEM PROGRAMMER PRIORITY 
FLAG 

SYSTEM PROGRAMMER PRIORITY 
MASK 

SERVICE ROUTINE PRIORITY 
FLAG 

SERVICE ROUTINE PRIORITY 
MASK 

USER PRIORITY 

FLAG 

USER PRIORITY 

MASK 

PRIVILEGED PRIORITY 
FLAG 

PRIVILEGED PRIORITY 
MASK 

INTER- TASK MESSAGE 
ACCEPTANCE FLAG 
INTER-TASK MESSAGE 
ACCEPTANCE MASK 
FLAG BYTE 

DELETE PAGE SECOND SCAN 
TAELE 

DELETE PAGE SECOND SCAN 
MASK 
DISK OPERATIONS COUNTER 

POINTER TO MIGRATION GQES 

N470 
COUNT OF TASK f S PAGES ON 
DRUM 

CONSECUTIVE TSE COUNTER 
QUANTUM COUNTER 

MASTER GQE POINTER PAGEOUT 
TASK IDENTIFICATION 
TASK EXTERNAL PRIORITY 
PAGES USED LAST TIME SLICE 
♦** PROGRAMMING SUPPORT *** 

REVERSE POINTER 



472 CHATSI 
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CHAXTS Storage map , 

DEC HEX 



8 8 

16 10 



80 



144 



50 



90 



176 


BO 


184 


B8 


192 


CO 


200 


C8 


208 


DO 


216 


D8 


224 


EO 


232 


E8 


240 


FO 


248 


F8 


256 


100 


264 


108 


272 


110 


280 * 


118 


288 


120 


296 


128 


| 304 


130 


312 


138 



1 UNNAMED |XTSUPM (UNNAMED | XTSUIC | 
I 1 1 1 1 


f UNNAMED | 


= XTSCRS 


= XTSGRS 


| XTSFRS | 
1 * I 


| XTSCTI 


| XTSUTI 




I XTSLTS 


| XTSATI 




| XTSETI 


| XTSTSI 




| XTSNPG | 
1 i 


XTSBYA | XTSPCT | XTSIC | 
1 1 1 


|XTSDMY JXTSF1 JXTSTSECTIXTSDLCT I XTSPTF | 
11111 1 


1 XTSPTL 


| XTSSTXO 




| XTSSTX1 


1 XTSSTX2 




I XTSSTX3 


1 XTSASIO 




| XTSASXO 


| XTSASI1 




| XTSASX1 


| XTSASI2 




1 XTSASX2 


| XTSASI3 




| XTSASX3 


| XTSASI4 




1 XTSASX4 


| XTSASI5 




I XTSASX5 


| XTSASI6 




| XTSASX6 


| XTSASI7 




I XTSASX7 


1 XTSSTP | XTSASP | XTSSTR 
1 1 1 


jXTSASR | 
I 1 


|XTSF2 (XTSSTQ | 
1 1 1 


UNNAMED I XTSPRQ | RESERVED | 
1 1 1 


1 XTSATS 


| XTSPOA 





(CHAXTS continued on page 474) 
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(CHAXTS continued from page 473) 



DEC HEX 






























320 140( 






XTSPOE 












XTSPIA 






i 
1 


328 148| 






XTSPIE 








XTSMAS 


1 

1 




XTSTWC 


! 
I 


336 150 J 

1 






XTSAWC 






|XTSID 


1 
1 












Fields in CHAXTS 


— bv displacement 














DEC 


HEX 


FIEIi) 




DEC 


HEX 


FIELD 




DEC 


HEX 


FIELD 




0000 


0000 


XTSUPS 




0128 


0080 


XTSGCS 


(EQU) 


0248 


00F8 


XTSASX1 




0002 


0002 


XTSUPM 




0132 


0084 


XTSGDS 


(EQU) 


0252 


OOFC 


XTSASI2 




0004 


0004 


XTSUIC 




0136 


0088 


XTSGES 


(EQU) 


0256 


0100 


XTSASX2 




0016 


0010 


XTSC0S 


(EQU) 


0140 


008C 


XTSGFS 


(EQU) 


0260 


0104 


XTSASI3 




0016 


0010 


XTSCRS 




0144 


0090 


XTSFOS 


(EQU) 


0264 


0108 


XTSASX3 




0020 


0014 


XTSC1S 


(EQU) 


0144 


0090 


XTSFRS 




0268 


010C 


XTSASI4 




0024 


0018 


XTSC2S 


(EQU) 


0152 


0098 


XTSF2S 


(EQU) 


0272 


0110 


XTSASX4 




0028 


001C 


XTSC3S 


(EQU) 


0160 


00A0 


XTSF4S 


(EQU) 


0276 


0114 


XTSASI5 




0032 


0020 


XTSC4S 


(EQU) 


0168 


00A8 


XTSF6S 


(EQU) 


0280 


0118 


XTSASX5 




0036 


0024 


XTSC5S 


(EQU) 


0176 


00B0 


XTSCTI 




0284 


one 


XTSASI6 




0040 


0028 


XTSC6S 


(EQU) 


0180 


00B4 


XTSUTI 




0288 


0120 


XTSASX6 




0044 


002C 


XTSC7S 


(EQU) 


0184 


00B8 


XTSLTS 




0292 


0124 


XTSASI7 




0048 


0030 


XTSC8S 


(EQU) 


0188 


OOBC 


XTSATI 




0296 


0128 


XTSASX7 




0052 


0034 


XTSC9S 


(EQU) 


0192 


00C0 


XTSETI 




0300 


012C 


XTSSTP 




0056 


0038 


XTSCAS 


(EQU) 


0196 


00C4 


XTSTSI 




0301 


012D 


XTSASP 




0060 


003C 


XTSCBS 


(EQU) 


0200 


00C8 


XTSNPG 




0302 


012E 


XTSSTR 




0064 


0040 


XTSCCS 


(EQU) 


0202 


OOCA 


XTSBYA 




0303 


012F 


XTSASR 




0068 


0044 


XTSCDS 


(EQU) 


0204 


OOCC 


XTSPCT 




0304 


0130 


XTSTAO 


(EQU) 


0072 


0048 


XTSCES 


(EQU) 


0206 


OOCE 


XTSIC 




0304 


0130 


XTSTA1 


(EQU) 


0076 


004C 


XTSCFS 


(EQU) 


0208 


00D0 


XTSDMY 




0304 


0130 


XTSTA2 


(EQU) 


0080 


0050 


XTSG0S 


(EQU) 


0209 


00D1 


XTSTX 


(EQU) 


0304 


0130 


XTSTA 


(EQU) 


0080 


0050 


XTSGRS 




0209 


00D1 


XTSF1 




0304 


0130 


XTSF2 




0084 


0054 


XTSG1S 


(EQU) 


0210 


00D2 


XTSTSECT 




[0305 


0131 


XTSSTQ 




0088 


0058 


XTSG2S 


(EQU) 


0211 


00D3 


XTSDLCT 




0308 


0134 


XTSPRQ 




0092 


005C 


XTSG3S 


(EQU) 


0212 


O0D4 


XTSPTF 




0312 


0138 


XTSATS 




0096 


0060 


XTSG4S 


(EQU) 


0216 


00D8 


XTSPTL 




0316 


013C 


XTSPOA 




0100 


0064 


XTSG5S 


(EQU) 


0220 


OODC 


XTSSTXO 




0320 


0140 


XTSPOE 




0104 


0068 


XTSG6S 


(EQU) 


0224 


00E0 


XTSSTX1 




0324 


0144 


XTSPIA 




0108 


00 6C 


XTSG7S 


(EQU) 


0228 


00E4 


XTSSTX2 




0328 


0148 


XTSPIE 




0112 


0070 


XTSG8S 


(EQU) 


0232 


00E8 


XTSSTX3 




0332 


014C 


XTSMAS 




0116 


0074 


XTSG9S 


(EQU) 


0236 


OOEC 


XTSASIO 




0334 


014E 


XTSTWC 




0120 


0078 


XTSGAS 


(EQU) 


0240 


00F0 


XTSASXO 




0336 


0150 


XTSAWC 




0124 


007C 


XTSGBS 


(EQU) 


0244 


00F4 


XTSASI1 




0340 


0154 


XTSID 




Alphabetical list of 


fields in 


CHAXTS 




















FIELD 


DEC 


HEX 




FIELD 1 


DEC 


HEX 




FIELD i 


DEC 


HEX 




XTSASIO 


0236 


00EC 




XTSCBS 


0060 


003C 


(EQU) 


XTSF2 


0304 


0130 




XTSASI1 


0244 


00F4 




XTSCCS 


0064 


0040 


(EQU) 


XTSF2S 


0152 


0098 


(EQU) 


XTSASI2 


0252 


00FC 




XTSCDS 


0068 


0044 


(EQU) 


XTSF4S 


0160 


OOAO 


(EQU) 


XTSASI3 


0260 


0104 




XTSCES 


0072 


0048 


(EQU) 


XTSF6S 


0168 


00A8 


(EQU) 


XTSASI4 


0268 


010C 




XTSCFS 


0076 


00 4C 


(EQU) 


XTSGAS 


0120 


0078 


(EQU) 


XTSASI5 


0276 


0114 




XTSCRS 


0016 


0010 




XTSGBS 


0124 


007C 


(EQU) 


XTSASI6 


0284 


one 




XTSCTI 


0176 


00B0 




XTSGCS 


0128 


0080 


(EQU) 


XTSASI7 


0292 


0124 




XTSCOS 


0016 


0010 


(EQU) 


XTSGDS 


0132 


0084 


(EQU) 


XTSASP 


0301 


012D 




XTSC1S 


0020 


0014 


(EQU) 


XTSGES 


0136 


0088 


(EQU) 


XTSASR 


0303 


012F 




XTSC2S 


0024 


0018 


(EQU) 


XTSGFS 


0140 


0O8C 


(EQU) 


XTSASX0 


0240 


00F0 




XTSC3S 


0028 


001C 


(EQU) 


XTSGRS 


0080 


0050 




XTSASX1 


0248 


00F8 




XTSC4S 


0032 


0020 


(EQU) 


XTSGOS 


0080 


0050 


(EQU) 


XTSASX2 


0256 


0100 




XTSC5S 


0036 


0024 


(EQU) 


XTSG1S 


0084 


0054 


(EQU) 


XTSASX3 


0264 


0108 




XTSC6S 


0040 


0028 


(EQU) 


XTSG2S 


0088 


0058 


(EQU) 


XTSASX4 


0272 


0110 




XTSC7S 


0044 


002C 


(EQU) 


XTSG3S 


0092 


005C 


(EQU) 


XTSASX5 


0280 


0118 




XTSC8S 


0048 


0030 


(EQU) 


XTSG4S 


0096 


0060 


(EQU) 


XTSASX6 


0288 


0120 




XTSC9S 


0052 


0034 


(EQU) 


XTSG5S 


0100 


0064 


(EQU) 


XTSASX7 


0296 


0128 




XTSDLCT 


0211 


00 D3 




XTSG6S 


0104 


0068 


(EQU) 


XTSATI 


0188 


OOBC 




XTSDMY 


0208 


00D0 




XTSG7S 


0108 


006C 


(EQU) 


XTSATS 


0312 


0138 




XTSETI 


0192 


OOCO 




XTSG8S 


0112 


0070 


(EQU) 


XTSAWC 


0336 


0150 




XTSFRS 


0144 


0090 




XTSG9S 


0116 


0074 


(EQU) 


XTSBYA 


0202 


OOCA 




XTSFOS 


0144 


0090 


(EQU) 


XTSIC 


0206 


OOCE 




XTSCAS 


0056 


0038 


(EQU) 


XTSF1 


0209 


00D1 




XTSID 


0340 


0154 




(Continued on 


page 


475) 
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C Continued from page 474) 



c 



c 



< 



FIELD 

XTSLTS 


DEC HEX 
0184 00B8 


FIELD 
XTSPTL 


DEC HEX 
0216 00D8 


FIELD DEC HEX 
XTSTA1 0304 0130 (EQU) 


XTSMAS 


0332 oiac 


XTSSTP 


0300 012C 


XTSTA2 0304 0130 (EQU) 


XTSNPG 


0200 00C8 


| XTSSTQ 


0305 0131 


XTSTSECT 0210 00D2 


XTSPCT 


0204 00CC 


XTSSTR 


0302 012E 


XTSTSI 0196 00C4 


XTSPIA 


0324 0144 


XTSSTX0 


0220 OODC 


XTSTWC 0334 014E 


XTSPIE 


0328 0148 


XTSSTX1 


0224 00E0 


XTSTX 0209 00D1 (EQU) 


XTSPOA 


0316 013C 


XTSSTX2 


0228 00E4 


XTSUIC 0004 0004 


XTSPOE 


0320 0140 


XTSSTX3 


0232 00E8 


XTSUPM 0002 0002 


XTSPRQ 


0308 0134 


XTSTA* 


0304 0130 (EQU) XTSUPS 0000 0000 


XTSPTF 


0212 0OD4 


XTSTA0 


0304 0130 (EQU) XTSUTI 0180 00B4 


Assembler listinq of 


CHAXTS 










LOCATION 


INSTRUCTION SOURCE 


INST 


1 OPER 


COMMENT 




BC 


00000 


CHAXTS 


DSECT 


FORMAT OF EXTENDED TSI 








♦ 






(XTSI) 


BC 00000 






XTSUPS 


DS 


OD 




BC 00000 








DS 


H 




BC 00002 






XTSUPM 


DS 


XL1 


USER PROGRAM MASK 


BC 00003 








DS 


C 




bc oooo a 






XTSUIC 


DS 


F 


INSTRUCTION COUNTER 


BC 00008 








DS 


D 


UNUSED 


BC 00010 






XTSCRS 


DS 


16F 


CONTROL REGISTER SAVE AREA 




BC 


00010 


XTSC0S 


EQU 


XTSCRS* 






BC 


00014 


XTSC1S 


EQU 


XTSCRS*4 


FLAG FOR ADD PAGES 




BC 


00018 


XTSC2S 


EQU 


XTSCRS* 8 






BC 


0001C 


XTSC3S 


EQU 


XTSCRS*12 






BC 


00020 


XTSC4S 


EQU 


XTSCRS*16 






BC 


00024 


XTSC5S 


EQU 


XTSCRS+20 






BC 


00028 


XTSC6S 


EQU 


XTSCRS* 2 4 






BC 


0002C 


XTSC7S 


EQU 


XTSCRS*28 






BC 


00030 


XTSC8S 


EQU 


XTSCRS* 3 2 






BC 


00034 


XTSC9S 


EQU 


XTSCRS+36 






BC 


00038 


XTSCAS 


EQU 


XTSCRS*40 






BC 


0003C 


XTSCBS 


EQU 


XTSCRS*44 






BC 


00040 


XTSCCS 


EQU 


XTSCRS*48 






BC 


00044 


XTSCDS 


EQU 


XTSCRS*52 






BC 


00048 


XTSCES 


EQU 


XTSCRS* 5 6 






BC 


0004C 


XTSCFS 


EQU 


XTSCRS*60 




BC 00050 






XTSGRS 


DS 


16F 


GENERAL PURPOSE REGISTER 
SAVE AREA 




BC 


00050 


XTSGOS 


EQU 


XTSGRS* 






BC 


00054 


XTSG1S 


EQU 


XTSGRS *4 






BC 


00058 


XTSG2S 


EQU 


XTSGRS* 8 






BC 


0005C 


XTSG3S 


EQU 


XTSGRS*12 






BC 


00060 


XTSG4S 


EQU 


XTSGRS* 16 






BC 


00064 


XTSG5S 


EQU 


XTSGRS*20 






BC 


00068 


XTSG6S 


EQU 


XTSGRS* 24 






BC 


0006C 


XTSG7S 


EQU 


XTSGRS+28 






BC 


00070 


XTSG8S 


EQU 


XTSGRS*32 






BC 


00074 


XTSG9S 


EQU 


XTSGRS* 36 






BC 


00078 


XTSGAS 


EQU 


XTSGRS* 40 






BC 


0007C 


XTSGBS 


EQU 


XTSGRS*44 






BC 


00080 


XTSGCS 


EQU 


XTSGRS*48 






BC 


00084 


XTSGDS 


EQU 


XTSGRS*52 






BC 


00088 


XTSGES 


EQU 


XTSGRS* 5 6 






BC 


0008C 


XTSGFS 


EQU 


XTSGRS*60 




BC 00090 








DS 


OD 




BC 00090 






XTSFRS 

* 


DS 


4D 


FLOATING POINT REGISTER 
SAVE AREA 




BC 


00090 


XTSFOS 


EQU 


XTSFRS+0 






BC 


00098 


XTSF2S 


EQU 


XTSFRS* 8 






BC 


000A0 


XTSF4S 


EQU 


XTSFRS+16 






BC 


000A8 


XTSF6S 


EQU 


XTSFRS*24 




BC 000B0 






XTSCTI 


DS 


F 


CURRENT TIMER VALUE 


BC 000B4 






XTSUTI 


DS 


F 


USER TIMER VALUE 


BC 000B8 






XTSLTS 


DS 


F 


LAST TIME-SLICE VALUE 


BC 000BC 






XTSATI 


DS 


F 


ACCUMULATED TIME 


(Listing 


Of 


CHAXTS 


continued 


on page 476) 
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(Listing of CHAXTS continued from page 475) 





LOCATION 
BC 000CO 


INSTRUCTION SOURCE 
XTSETI 


INST 


OPER 
F 


COMMENT 




DS 


ESTIMATED TIME 




BC 


000C4 






XTSTSI 


DS 


F 


POINTER TO TSI 




BC 


000C8 






XTSNPG 

* 


DS 


H 


NUMBER OF PAGES THIS 
TIME-SLICE 




BC 


OOOCA 






XTSBYA 


DS 


H 


BYTES AVAILABLE IN FIRST 
XTSI PAGE 




BC 


OOOCC 






XTSPCT 


DS 


H 


PAGE COUNT IN XTSI 




BC 


OOOCE 






XTSIC 


DS 


H 


TASK INTERRUPT CODE 




BC 


000D0 






XTSDMY 

* 


DS 


XL1 


NUMBER DUMMY PAGE TABLE 
ENTRIES EXISTING 




BC 


000D1 






XTSF1 


DS 


XL1 


FLAGS 








BC 


000D1 


XTSTX 


EQU 


XTSF1 


XTSI HAS AUX. STORAGE FLAG 








00000080 


XTSTXM 


EQU 


X f 80 f 


XTSI HAS AUX. STORAGE MASK 




BC 


000D2 








DS 


OH 






BC 


000D2 






XTSTSECT 


DS 


XL1 


TSE COUNT 




BC 


000D3 






XTSDLCT 


DS 


XL1 


DELAY COUNT 




BC 


000D4 






XTSPTF 


DS 


F 


FIRST PTP IN CHAIN 




BC 


000D8 






XTSPTL 


DS 


F 


LAST PTP IN CHAIN 




BC 


OOODC 






XTSSTXO 

* 


DS 


F 


EXT LOC OF ST PAGE 0(1ST 
PHYSICAL ST PG) 




BC 


000E0 






XTSSTX1 


DS 


F 


EXT LOC OF ST PAGE 1 




BC 


000E4 






XTSSTX2 


DS 


F 


EXT LOC OF ST PAGE 2 




BC 


000E8 






XTSSTX3 


DS 


F 


EXT LOC OF ST PAGE 3 




BC 


OOOEC 






XTSASIO 


DS 


F 


INTERNAL LOC OF AST PAGE 




BC 


000F0 






XTSASXO 


DS 


F 


EXTERNAL LOC OF AST PAGE 




BC 


000F4 






XTSASI1 


DS 


F 


INTERNAL LOC OF AST PAGE 1 




BC 


000F8 






XTSASX1 


DS 


F 


EXTERNAL LOC OF AST PAGE 1 




BC 


OOOFC 






XTSASI2 


DS 


F 


INTERNAL LOC OF AST PAGE 2 




BC 


00100 






XTSASX2 


DS 


F 


EXTERNAL LOC OF AST PAGE 2 




BC 


00104 






XTSASI3 


DS 


F 


INTERNAL LOC OF AST PAGE 3 




BC 


00108 






XTSASX3 


DS 


F 


EXTERNAL LOC OF AST PAGE 3 




BC 


0010C 






XTSASI4 


DS 


F 


INTERNAL LOC OF AST PAGE 4 




BC 


00110 






XTSASX4 


DS 


F 


EXTERNAL LOC OF AST PAGE 4 




BC 


00114 






XTSASI5 


DS 


F 


INTERNAL LOC OF AST PAGE 5 


- 


BC 


00118 






XTSASX5 


DS 


F 


EXTERNAL LOC OF AST PAGE 5 




BC 


0011C 






XTSASI6 


DS 


F 


INTERNAL LOC OF AST PAGE 6 




BC 


00120 






XTSASX6 


DS 


F 


EXTERNAL LOC OF AST PAGE 6 




BC 


00124 






XTSASI7 


DS 


F 


INTERNAL LOC OF AST PAGE 7 




BC 


00128 






XTSASX7 


DS 


F 


EXTERNAL LOC OF AST PAGE 7 




BC 


0012C 






XTSSTP 


DS 


XL1 


ST PAGE COUNT 




BC 


0012D 






XTSASP 


DS 


XL1 


AST PAGE COUNT 




BC 


0012E 






XTSSTR 


DS 


XL1 


ST PAGE READS DONE 




BC 


0012F 






XTSASR 


DS 


XL1 


AST PAGE READS DONE 




BC 


00130 






XTSF2 


DS 


XL1 


FLAG BYTE 








BC 


00130 


XTSTA 


EQU 


XTSF2 


XTSI STATE FLAG 








00000003 


XTSTAM 


EQU 


X f 03 - 


XTSI STATE MASK 








BC 


00130 


XTSTA2 

* 


EQU 


XTSF2 


XTSI STATE 2 FLAG- ST AND 

AST OUT 








00000002 


XTSTA2H 


EQU 


X f 02 f 


XTSI STATE 2 MASK OF 1ST 












* i 






XTSI PAGE 








BC 


00130 


XTSTAl 

* 


EQU 


XTSF2 


XTSI STATE 1 FLAG- AST ONLY 
OUT 








00000001 


XTSTA1M 


EQU 


X'Ol^ 


XTSI STATE 1 MASK OF 1ST 












* 






XTSI PAGE 








BC 


00130 


XTSTAO 


EQU 


XTSF2 


XTSI STATE FLAG-ST AND 
AST IN 








00000000 


XTSTAOM 


EQU 


X f 00 f 


XTSI STATE MASK 1ST 












♦ 






XTSI PAGE 




I BC 


00131 






XTSSTQ 


DS 


XL1 


PAGE STEALING COUNT 
M4734 




BC 


00132 








DS 


H 


UNUSED 




BC 


00134 






XTSPRQ 

* 


DS 


HL2 


PAGE RELOCATION 
INTERRUPTS/Q COUNTER 




BC 


00138 








DS. 


OD 






BC 


00138 






XTSATS 


DS 


F 


ACCOUNTING NUMBER OF 
TIME-SLICES 




BC 


0013C 






XTSPOA 


DS 


F 


ACCOUNTING AUXILIARY 
PAGE -OUTS 




BC 


00140 






XTSPOE 

* 


DS 


F 


ACCOUNTING EXTERNAL 
PAGE-OUTS 




(Listing 


of 


CHAXTS 


continued 


on page 477) 
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C Listing of CHAXTS continued from page 476) 



t 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 


BC 00144 




XTSPIA 


DS 


F 


BC 00148 




XTSPIE 


DS 


F 


BC 0014C 




XTSMAS 


DS 


H 


BC 0014E 




XTSTWC 


DS 


H 


BC 00150 




XTSAWC 


DS 


F 


BC 0015** 




XTSID 


DS , 


X 




00000155 


XTSFLIN 


EQU 


• -XT 




00000180 


XTSSORG 

♦ 


EQU 


64*C 



COMMENT 

ACCOUNTING AUXILIARY 
PAGE-INS 

ACCOUNTING EXTERNAL 
PAGE- INS 

MAXIMUM AUXILIARY OCCUPIED 
TWAIT COUNT 
AWAIT COUNT 

TIME SLICE END IDENTIFIER 
N470 
S FIXED LENGTH OF XTSI 
64*C(XTSFLEN+63)/64) TO COMPUTE 
ORIGIN OF SEGMENT TABLE 



^ 



( 
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User Catalog Table (CHAUCT) 



CHAUCT references the system dataset SYSSCVT which contains the user 
catalog (USERCAT) addresses for each USERID. SYSSCVT is a VISAM dataset — 
the USERID is the key and each record is 16 bytes long (8 bytes for the 
USERID, 4 bytes for the DSCB address, a 1 byte flag, and 3 reserved bytes), 

CHAUCT Storage map 



DEC 




HEX 
Of" 

L 

8| 



UCTUID 



UCTDSCB 



(UCTSYNC | 



UCTSPR 



Fields in CHAUCT — by displacement 



DEC HEX FIELD 
0000 0000 UCTUID 



DEC HEX FIELD 
0008 0008 UCTDSCB 



DEC HEX FIELD 

0012 000C UCTSYNC 

0013 000D UCTSPR 



Alphabetical list of fields in CHAUCT 



FIELD 
UCTDSCB 



DEC HEX 
0008 0008 



FIELD 
UCTSPR 



DEC HEX 
0013 000D 



FIELD DEC HEX 
UCTSYNC 0012 000C 
UCTUID 0000 0000 



Assembler listing of CHAUCT 



LOCATION INSTRUCTION SOURCE INST OPER COMMENT 

Bl 00000 CHAUCT DSECT NSRB 423 

********************************************************************** 

* THIS DSECT IS USED TO REFERENCE THE SYSTEM DATASET ' SYSSCVT 1 WHICH * 

* CONTAINS THE USER CATALOG ADDRESSES FOR EACH USERID* THIS IS A * 

* VISAM DATASET - THE USERID IS THE KEY AND EACH RECORD IS 16 BYTES * 

* LONG CONTAINING AN 8 BYTE USERID, A 4 BYTE DSCB ADDRESS, A 1 BYTE ♦ 

* FLAG AND 3 RESERVED BYTES, * 
********************************************************************** 



Bl 


00000 




UCTUID 


DS 


CL8 


USERID 


Bl 


00008 




UCTDSCB 


DS 


A 


DSCB ADDR OF USERCAT 


Bl 


ooooc 




UCTSYNC 


DS 


XL1 


SYNC INDICATOR 






00000001 


UCTSYNCM 


EQU 


X'Ol 1 


SYNC MASK 

1 = SYNC DONE 

= SYNC NOT DONE 






00000002 


UCTRCRM 

* 
* 


EQU 


X , 02 i 


RCR RATION FLAG 
1 = EXCEEDED 
= OK 


Bl 


0000D 




UCTSPR 


DS 


XL3 


RESERVED 
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Option ft UFLOW Macro Table (CHAUFN) 



L 



CHAUFN defines entries returned by the UFLOW macro, option ft. The user- 
provided buffer, which may not cross a page boundary, receives the program name 
and unique number of each MTT task, with its count of users, the MTT adminis- 
trator's limit, and the limit imposed by the FLOW command. The list in the buffer 
is stopped by eight bytes of X^F 1 . 



CHAUFN Storage map 



DEC 




HEX 
Of 

L 



UFNRAN 



UFNAME 



UFNUSE 



UFNLMT 



UFNMAX 



Fields in CHAUFN — by displacement 



DEC HEX FIELD 
0000 0000 UFNAME 
0008 0008 UFNRAN 



DEC HEX FIELD 
0010 000A UFNUSE 
0012 000C UFNLMT 



DEC HEX FIELD 
001 ft O00E UFNMAX 



Alphabetical list of fields in CHAUFN 



FIELD 

UFNAME 

UFNLMT 



DEC HEX 
0000 0000 
0012 000C 



FIELD 

UFNMAX 

UFNRAN 



DEC HEX 
001ft 000E 
0008 0008 



FIELD 
UFNUSE 



DEC HEX 
0010 000A 



Assembler listing of CHAUFN 



LOCATION INSTRUCTION SOURCE 
B2 00000 CHAUFN 



INST OFER 



COMMENT 
NSRB 386 



( 



DSECT 
********************************************************************** 

CHAUFN COVERS THE ENTRIES RETURNED BY THE UFLOW MACRO, OPTION ft. * 

THE USER-PROVIDED BUFFER, WHICH MAY NOT CROSS A PAGE BOUNDARY, * 

RECEIVES THE PROGRAM NAME AND UNIQUE NUMBER OF EACH MTT TASK, * 

WITH ITS COUNT OF USERS, THE MTT ADMINISTRATORS LIMIT (MAX), * 

AND THE LIMIT IMPOSED BY THE FLOW COMMAND. * 

THE LIST IN THE BUFFER IS STOPPED BY 8 BYTES OF X f FF § * 
********************************************************************** 

B2 00000 UFNAME DS CL8 APPLICATION NAME 

B2 00008 UFNRAN DS H RELATIVE APPLICATION NUMBER 

B2 0000A UFNUSE DS H CURRENT NUMBER OF MTT USERS 

B2 0000C UFNLMT DS H MTT USER LIMIT 

B2 0000E UFNMAX DS H MAXIMUM NUMBER OF MTT USERS 
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aser Limit Table Entry CCHAULT) 

The User Limit Table, a VISAM member of TSS*****. SYSLIB, contains entries (CHAULT! 
for each user limits category. When a user is joined, his user limits type is used 
as a key to access the appropriate table entry. 
The 64-byte CHAULT resides in virtual storage, aligned on word boundaries. 

CHAULT Storage map 



DEC 


8 

16 

24 

32 

40 



HEX 






ULTCAT 




ULTCCP | 


8 


ULTCCT 




ULTCTC I 


10 


[ ULTMAV 




ULTTP | 


18 


ULTPP 




ULTDEV1 I 


20 


1 ULTDEV2 




ULTDEV3 | 


28 


ULTDEV4 










ULTSPR 





Fields in CHAULT — by displacement 



DEC HEX FIELD 
0000 0000 ULTCAT 
0004 0004 ULTCCP 
0008 0008 ULTCCT 
0012 000C ULTCTC 



DEC HEX FIELD 
0016 0010 ULTMAV 
0020 0014 ULTTP 
0024 0018 ULTPP 
0028 001C ULTDEV1 



DEC HEX FIELD 
0032 0020 ULTDEV2 
0036 0024 ULTDEV3 
0040 0028 ULTDEV4 
0044 002C ULTSPR 



Alphabetical list of fields in CHAULT 



FIELD 


DEC 


HEX 


FIELD 


DEC 


HEX 


FIELD 


DEC 


HEX 


ULTCAT 


0000 


0000 


ULTDEV1 


0028 


001C 


ULTMAV 


0016 


0010 


ULTCCP 


0004 


0004 


ULTDEV2 


0032 


0020 


ULTPP 


0024 


0018 


ULTCCT 


0008 


0008 


ULTDEV3 


0036 


0024 


ULTSPR 


0044 


002C 


ULTCTC 


0012 


oooc 


ULTDEV4 


0040 


0028 


ULTTP 


0020 


0014 
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Assembler listing of CHAULT 



V., 



LOCATION INSTRUCTION SOURCE 
B3 00000 CHAULT 



INST OPER 



COMMENT 



DSECT 
********************************************************************** 



B3 



* USER LIMITS TABLE * 
THIS DSECT DESCRIBES THE LAYOUT OF AN ENTRY IN THE USER 
LIMITS TABLE. EACH ENTRY IS A FIXED LENGTH OF 6H BYTS. THESE 
ENTRIES WILL EXIST IN A VISAM DATA SET. AT LOGON TIME THE APPRO- 
PRIATE LIMITS ENTRY IS MOVED INTO THE USER'S USER TABLE ENTRY, 



B3 

B3 



00000 
B3 00000 
B3 00004 
B3 00008 
0000C 
00010 
B3 00014 
B3 00018 
B3 0001C 

B3 00020 

B3 00024 

B3 00028 

B3 0002C 



00000040 



ULTCAT 

ULTCCP 

ULTCCT 

ULTCTC 

ULTMAV 

ULTTP 

ULTPP 

ULTDEV1 

* 

ULTDEV2 

ULTDEV3 

ULTDEV4 

ULTSPR 
ULTLEN 



DS 
DS 
DS 
DS 
DS 
DS 
DS 
DS 
DS 

DS 

DS 

DS 

DS 

EQU 



0D 

F 

F 

F 

F 

F 

F 

F 

F 

F 



5F 
♦-CHAULT 



LIMITS CATEGORY -KEY- 
MAX RATION OF CPU TIME 
CONNECT TIME 
MAX TASK COUNT 
MAX AUXILLARY STORAGE 
MAXIMUM TEMPORARY PAGES 
MAXIMUM PERMANENT PAGES 
DEVICE TYPE 1 DIRECT ACCESS 
DEVICE 

DEVICE TYPE 2 MAGNETIC TAPE 
DRIVES 

DEVICE TYPE 3 HIGH SPEED 
PRINTERS 
DEVICE TYPE 4 
READER- PUNCHES 
SPARE 
LENGTH OF ENTRY 



*********************************************************************** 
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User Table (CdAUSE) 

The User Table contains a list of all legal TSS/360 users with their credentials. 

The User Table, a VAM index sequential data set, contains one entry for each user 
joined to the system. The entries, tabulated in USERID sequence, are variable in 
length to a maximum of 256 bytes* Except for the system operator and the system 
manager, user entries are added by the JOIN command and removed by the QUIT command. 
The entries for the system operator and manager are created at system generation. 
The User Table resides on a system resident volume and, thus, is maintained without 
change between system SHUTDOWN and subsequent system START UP. 

The User Table occupies a maximum of 25,600 bytes of virtual storage, aligned on 
doubleword boundaries « 

CHAUSE Storage map 



DEC 


8 

16 

2*4 

32 

40 

48 

56 



HEX 


8 

10 

18 

20 

28 

30 

38 



88 


58 


96 


60 


104 


68 


112 


70 


120 


78 


128 


80 


136 


88 


144 


90 


152 


98 


160 


A0 


168 


A8 


176 


B0 


184 


B8 


192 


CO 



| USESIZ 


1 


USELID 


(USERJE 

1 


| USELK | 
1 1 


| USERID | 


| USEPAS | 


| USEPRV 


|USESTI 

1 


|U3EATH |USEACT 
I I 


| USEQIT | 
I 1 


| USECNT J USETSK | 

i I I 






USEP2 




| USECHG | 


| USEPRO | 


| USEINS I 


| USETLC I 


| USESP3 


1 






US ESP 4 




| USEP | 


J USEP01 


1 

1 






USEP02 




| USEP03 


1 

i 






USEP04 




| USEP05 


1 
i 






USEP06 




| USEBI 


1 

i 






USEBO 




| USEA01 


i 

1 






USEA02 




| USEA03 


1 

1 






USEA04 




| USEA05 


1 






USEA06 




I USEA07 


1 

I 






USEA08 




| USEA09 


1 
I 






USEA10 




| USEA11 | 


) USEULT 


1 
I 






USER01 





J 



(CHAUSE continued on page 483) 
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(CHAUSE continued from page 482) 



DEC 
200 


HEX 
C8 


208 


DO 


216 


D8 


224 


E0 


232 


E8 


240 


F0 



USER02 




USERO 3 | 


USER04 




USER05 | 


USERO 6 




USER07 | 


USER08 




USERO 9 | 


USER 10 




USER11 | 


USEUN4 | 



Fields in CHAUSE — by displacement 



r 



DEC 

0000 

0004 

0006 

0007 

0008 

0016 

0024 

0024 

0024 

0024 

0024 

0024 

0024 

0024 

0025 

0026 

0026 

0027 

0028 

0028 

0029 

0030 

0031 



HEX 

0000 

0004 

0006 

0007 

0008 

0010 

0018 

0018 

0018 

0018 

0018 

0018 

0018 

0018 

0019 

001A 

001A 

001B 

001C 

001C 

001D 

001E 

001F 



FIELD 

USESIZ 

USELID 

USERJE 

USELK 

USERID 

USEPAS 

USEPF 

USEPE 

USEPD 

USEPC 

USEPB 

USEPA 

USEPROX 

USEPRV 

USEPR1 

USEPR2 

USEPT 

USEPR3 

USEPRI 

USESTI 

USEATH 

USEACT 

USEADC 



(EQU) 
CEQU) 
(EQU) 
CEQU) 
(EQU) 
(EQU) 
CEQU) 

CEQU) 
CEQU) 
CEQU) 
CEQU) 
CEQU) 



CEgU) 



DEC 

0031 

0031 

0031 

0032 

0034 

0036 

0040 

0048 

0056 

0088 

0096 

0100 

0104 

0112 

0116 

0120 

0124 

0128 

0132 

0136 

0140 

0144 

0148 



HEX 

001F 

001F 

001F 

0020 

0022 

0024 

0028 

0030 

0038 

0058 

0060 

0064 

0068 

0070 

0074 

0078 

007C 

0080 

0084 

0088 

008C 

0090 

0094 



FIELD 

USEBA 

USEQB 

USEQIT 

USECNT 

USETSK 

USEP2 

USECHG 

USEPRO 

USEINS 

USETLC 

USESP3 

USESP4 

USEP 

USEP01 

USEP02 

USEP 03 

USEP04 

USEP 05 

USEP06 

USEBI 

USEBO 

USEA01 

USEA02 



(EQU) 
(EQU) 



Alphabetical list of fields in CHAUSE 



FIELD 

USEACT 

USEADC 

USEATH 

USEA01 

USEA02 

USEA03 

USEA04 

USEA05 

USEA06 

USEA07 

USEA08 

USEA09 

USEA10 

USEA11 

USEBA 

USEBI 

USEBO 

USECHG 

USECNT 

USEINS 

USELID 

USELK 

USEP 



DEC 

0030 

0031 

0029 

0144 

0148 

0152 

0156 

0160 

0164 

0168 

0172 

0176 

0180 

0184 

0031 

0136 

0140 

0040 

0032 

0056 

0004 

0007 

0104 



HEX 

001E 

001F CEQU) 

001D 

0090 

0094 

0098 

009C 

00A0 

O0A4 

00A8 

OOAC 

00B0 

00B4 

00B8 

001F CEQU) 

0088 

008C 

0028 

0020 

0038 

0004 

0007 

0068 



FIELD 

USEPA 

USEPAS 

USEPB 

USEPC 

USEPD 

USEPE 

USEPF 

USEPRI 

USEPRO 

USEPROX 

USEPRV 

USEPRI 

USEPR2 

USEPR3 

USEPT 

USEP01 

USEP02 

USEP03 

USEP 04 

USEP05 

USEP 06 

USEP2 

USEQB 



DEC 

0024 

0016 

0024 

0024 

0024 

0024 

0024 

0028 

0048 

0024 

0024 

0025 

0026 

0027 

0026 

0112 

0116 

0120 

0124 

0128 

0132 

0036 

0031 



HEX 

0018 
0010 
0018 
0018 
0018 
0018 
0018 
001C 
0030 
0018 
0018 
0019 
001A 
001B 
001A 
0070 
0074 
0078 
007C 
0080 
0084 
0024 
001F 



(EQU) 

(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 
(EQU) 

(EQU) 

(EQU) 
(EQU) 
(EQU) 
(EQU) 



DEC 

0152 

0156 

0160 

0164 

0168 

0172 

0176 

0180 

0184 

0192 

0196 

0200 

0204 

0208 

0212 

0216 

0220 

0224 

0228 

0232 

0236 

0240 



HEX 

0098 

009C 

OOAO 

00A4 

O0A8 

OOAC 

OOBO 

00B4 

00 B8 

OOCO 

00C4 

00C8 

OOCC 

OODO 

00 D4 

00D8 

OODC 

OOEO 

00E4 

00E8 

OOEC 

OOFO 



FIELD 

USEA03 

USEA04 

USEA05 

USEA06 

USEA07 

USEA08 

USEA09 

USEA10 

USEA11 

USEULT 

USER01 

USERO 2 

USERO 3 

USERO 4 

USER05 

USER06 

USER07 

USER 08 

USER09 

USER10 

USER11 

USEUN4 



(EQU) 



FIELD 

USEQIT 

USERID 

USERJE 

USER01 

USER02 

USERO 3 

USER04 

USERO 5 

USERO 6 

USER07 

USER08 

USERO 9 

USER10 

USER11 

USESIZ 

US ESP 3 

USESP4 

USESTI 

USETLC 

USETSK 

USKULT 

USEUN4 



HEX 

001F 

0008 

0006 

00C4 

00C8 

OOCC 

OODO 

O0D4 

00D8 

OODC 

OOEO 

O0E4 

O0E8 

OOEC 

0000 

0060 

0064 

001C 

0058 

0022 

OOCO 

OOFO 
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Assembler listing of CHAUSE 



LOCATION 


INSTRUCTION SOURCE 


INST 


OPER 


COMMENT 






B4 00000 


CHAUSE 


DSECT 




USER TABLE DATA SET 


B4 


00000 






DS 


OD 








00000001 


USEPGS 


EQU 


1 


NUMBER OF PAGES REQUIRED 
FOR TABLE ENTRY 


B4 


00000 




USESIZ 


DS 


A(USELEN) 


LENGTH OF USER ENTRY 


B4 


00004 




USELID 


DS 


H 


TID OF LOCK SETTER 


B4 


00006 




USERJE 


DS 


XL1 


SPECIAL RJE PRIVILEGES 






000000E8 


USERJEM 

* 


EQU 


C f Y f 


IF Y # USER ALLOWED TO ISSUE 

PRINT 

REQUESTS FOR ANY RJE STATIOl 






00000032 


USELKCNT 


EQU 


50 




B4 


00007 




US ELK 


DS 


XL1 


LOCK BYTE 


B4 


00008 




USERID 


DS 


CL8 


USERID - EBCDIC 


B4 


00010 




USEPAS 


DS 


CL8 


PASSWORD - EBCDIC 


B4 


00018 




USEPRV 


DS 


XL4 


PRIVILEGE 
CLASSIFICATION-BINARY 






B4 0001A 


USEPT 


EQU 


USEPRV* 2 


CLASS T 






00000010 


USEPTM 


EQU 


X'lO' 


CLASS T MASK 






B4 00018 


USEPROX 


EQU 


USEPRV 


FIRST CLASS BYTE 






B4 00018 


USEPA 


EQU 


USEPROX 


CLASS A FLAG 






00000080 


USEPAM 


EQU 


X^O* 


CLASS A MASK 






B4 00018 


USEPB 


EQU 


USEPROX 


CLASS B FLAG 






00000040 


USEPBN 


EQU 


X^O* 


CLASS B MASK 






B4 00018 


USEPC 


EQU 


USEPROX 


CLASS C FLAG 






00000020 


USEPCM 


EQU 


X<20 9 


CLASS C MASK 






B4 00018 


USEPD 


EQU 


USEPROX 


CLASS D FLAG 






00000010 


USEPDM 


EQU 


X^O 1 


CLASS D MASK 






B4 00018 


USEPE 


EQU 


USEPROX 


CLASS E FLAG 






00000008 


USEPEM 


EQU 


x'os* 


CLASS E MASK 






B4 00018 


USEPF 


EQU 


USEPROX 


CLASS F FLAG 






00000004 


USEPFM 


EQU 


X , 04 i 


CLASS F MASK 






B4 00019 


USEPR1 


EQU 


USEPRV* 1 


SECOND CLASS BYTE 






B4 0001A 


USEPR2 


EQU 


USEPRV* 2 


THIRD CLASS BYTE 






B4 0001B 


USEPR3 


EQU 


USEPRV* 3 


FOURTH CLASS BYTE 


B4 


0001C 




USESTI 


DS 


FL1 


SCHEDULE TABLE INDEX 






B4 0001C 


USEPRI 


EQU 


USESTI 


COMPATIBILITY WITHOUT TDS 


B4 


0001D 




USEATH 


DS 


CL1 


AUTHORIZATION CODE - EBCDIC 


B4 


0001E 




USEACT 


DS 


XL1 


ACTIVITY FLAG -BINARY 






00000001 


USEACTM 


EQU 


X'Ol' 


TASK ACTIVE AND 
CONVERSATIONAL 


B4 


0001F 




USEQIT 


DS 


XL1 


QUIT FLAG - BINARY 






B4 0001F 


USEQB 


EQU 


USEQIT 


USER QUIT FLAG 






00000001 


USEQBM 


EQU 


X f 01 f 


USER QUIT MASK 






B4 0001F 


USEBA 


EQU 


USEQIT 


BATCH WORK ALLOWED FLAG 






00000002 


USEBAM 


EQU 


X , 02 f 


BATCH WORK ALLOWED MASK 






B4 0001F 


USEADC 


EQU 


USEQIT 


USER ACTIVE FLAG 
N478 






00000008 


USEADCM 

* 


EQU 


x'os* 


USER ACTIVE MASK 
N478 


B4 


00020 




USECNT 

* 


DS 


H 


NUMBER OF ACTIVE TASKS FOR 
THIS USER 


B4 


00022 




USETSK 


DS 


H 


TASKID FOR CONVERSATIONAL 
TASK 


B4 


00024 




USEP2 


DS 


F 


UNUSED 


B4 


00028 




USECHG 


DS 


CL8 


CHARGE NUMBER 


B4 


00030 




USEPRO 


DS 


CL8 


PROFILE NAME 


B4 


00038 




USEINS 


DS 


CL32 


INSTALLATION 


B4 


00058 




USETLC 


DS 


2F 


TIME LAST 
CHANGED-MICROSECONDS 


B4 


00060 




USESP3 


DS 


F 


SPARE 


B4 


00064 




USESP4 


DS 


F 


SPARE 


B4 


00068 




USEP 


DS 


2F 


PRODUCT RESERVED FIELDS 


B4 


00070 




USEP01 


DS 


F 


PRODUCT 1 TEMPORARY PAGES 


B4 


00074 




USEP02 


DS 


F 


PRODUCT 2 PERMANENT PAGES 


B4 


00078 




USEP03 

* 


DS 


F 


PRODUCT 3 DIRECT ACCESS 
DRIVES 


B4 


0007C 




USEP04 

* 


DS 


F 


PRODUCT 4 MAGNETIC TAPE 
DRIVES 


(Listing 


of CHAUSE 


continued 


on page 485) 
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(Listing of CHAUSE continued from page 484) 



V. 



LOCATION INSTRUCTION 


SOURCE 


INST 


OPER 


COMMENT 






B4 


00080 


USEP05 


DS 


F 


PRODUCT 5 


HIGH SPEED 






* 






PRINTERS 






B4 


00084 


USEP06 


DS 


F 


PRODUCT 6 


READER PUNCHES 




00000018 


USEPND 


EQU 


♦-USEP01 


LENGTH OF 


PRODUCT FIELD 


B4 


00088 


USEBI 


DS 


F 


BULKIO RECORDS IN 


B4 


0008C 


USEBO 


DS 


F 


BULKIO RECORDS OUT 


B4 


00090 


USEA01 


DS 


F 


ALLOCATION 


1 1 


CPU TIME 






* 






ACCUMULATIVE 




B4 


00094 


US£A02 


DS 


F 


ALLOCATION 


i 2 


CONNECT TIME 






* 






ACCUMULATIVE 




B4 


00098 


USEA03 


DS 


F 


ALLOCATION 


1 3 


RESERVED 


B4 


0009C 


USEA04 


DS 


F 


ALLOCATION 


1 4 


RESERVED 


B4 


000A0 


USEA05 


DS 


F 


ALLOCATION 
PAGES 


1 5 


TEMPORARY 


B4 


000A4 


USEA06 


DS 


F 


ALLOCATION 
PAGES 


f 6 


PERMANENT 


B4 


000A8 


USEA07 


DS 


F 


ALLOCATION 
DRIVES 


I 7 


DIRECT ACCESS 


B4 


000AC 


USEA08 

* 


DS 


F 


ALLOCATION 
DRIVES 


1 8 


MAGNETIC TAPE 


B4 


000 BO 


USEA09 

* 


DS 


F 


ALLOCATION 
PRINTER 


I 9 


HIGH SPEED 


B4 


000B4 


USEA10 


DS 


F 


ALLOCATION 


I 10 








• 






READER- PUNCHES 


B4 


000B8 


USEA11 


DS 


2F 


RESERVED 






B4 


OOOCO 


USEULT 


DS 


F 


USER LIMITS TABLE KEY 






* 






CATAGORY 






B4 


oooca 


USER01 

* 


DS 


F 


RATION 1 
PERIOD 


CPU 


TIME/BILLING 


B4 


000C8 


USER02 


DS 


F 


RATION 2 


CONNECT 






* 






TIME/BILLING , 


PERIOD 


B4 


ooocc 


USER03 


DS 


F 


RATION 3 


TASK COUNT 


B4 


00 0D0 


USER04 


DS 


F 


RATION 4 


MAXIMUM AUXILIARY 






♦ 






STORAGE 






B4 


OO0D4 


USER05 


DS 


F 


RATION 5 


TEMPORARY PAGES 


B4 


000D8 


USER06 


DS 


F 


RATION 6 


PERMANENT PAGES 


B4 


0O0DC 


USER07 


DS 


F 


RATION 7 


DIRECT ACCESS 






* 






DRIVES 






B4 


000E0 


DSER08 


DS 


F 


RATION 8 


MAGNETIC TAPE 






# 






DRIVES 






B4 


000E4 


USER09 


DS 


F 


RATION 9 


HIGH SPEED 






♦ 






PRINTERS 






B4 


000E8 


USER10 


DS 


F 


RATION 10 


READER/PUNCHES 


B4 


000EC 


USER11 


DS 


F 


RATION 11 


RESERVED 


BU 


OOOFO 


USEUN4 


DS 


4F 


RESERVED 








00000100 


USELEN 


EQU 


♦ -CHAUSE 


LENGTH OF 


ENTRY 
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Virtual Program Status Word (CHAVPS) 

The Virtual Program Status Word (VPSW) , as used by a task operating in virtual 
storage, is analogous to the Program Status Word CPSW1 which the Supervisor operates 
upon* The VPSW describes the task status at the moment that the machine is stopped 
by an interrupt. The reason for machine stoppage is indicated by the VPSW and the 
interrupt code. The types of interrupts that a task can receive are listed, in their 
order of interrupt processing priority, as follows: 
1 • Program 

2. Service Call 

3. External 

4. Asynchronous 

5. Timer 

6. Input/Output 

The resident and task monitors operate on the VPSWs which, in turn, furnish data 
to the LVPSW SVC processor and Task Interrupt Control. 

The VPSW occupies 8 bytes of virtual storage, aligned on double word boundaries, 
in segment zero, page zero of the Interrupt Storage Area (ISA). The old-VPSWs (bytes 
2000 to 2047) are located in the non-protected portion of the page where they are 
accessible to the object program. The new VPSWs (bytes 2048 to 2095) reside in the 
protected portion of the page where they are write- protected against change by non- 
privileged routines. The current-VPSW (bytes 2104 to 2111) is also contained in the 
protected portion of the page. This is a duplicate of the latest new-VFSW saved by 
the Resident Supervisor. 

The LVPSW macro is provided to privileged programs for starting a task under con- 
trol of a particular VPSW. 



CHAVPS Storage map 



DEC 


HEX 

















| VPSPT 

1 


| VPSCP | 
i 1 


| VPSIN 

i 


1 
i 




VPSIC 


1 
I 


Fields 


in CHAVPS — by displacement 












DEC HEX 


FIELD 


DEC HEX 


FIELD 




DEC HEX FIELD 






0000 0000 VPSII 


(EQU) 0000 0000 


1 VPSPT 




0001 0001 VPSCC 


(EQU) 




0000 0000 VPSTI 


(EQU) 0000 0000 


VPSOP 




0001 0001 VPSLC 


(EQU) 




0000 oooc 


) VPSAI 


(EQU) 0001 0001 


. VPSSF 


(EQU) 


0001 0001 VPSCP 






0000 0000 VPSXI 


(EQU) 0001 0001 


VPSEU 


(EQU) 


0002 0002 VPSIN 






0000 oooc 


1 VPSPI 


(EQU) 0001 0001 


. VPSDO 


(EQU) 


0004 0004 VPSIC 






0000 0000 VPSRE 


(EQU) 0001 0001 


VPSFO 


(EQU) 








0000 oooc 


I VPS PS 


(EQU) 0001 0001 


. VPSPM 


(EQU) 






Alphabetical list of 


fields in 


CHAVPS 












FIELD 


DEC HEX 


FIELD 


DEC HEX 




FIELD DEC HEX 






VPSAI 


0000 0000 


(EQU) VPSII 


0000 0000 


(EQU) 


VPSPT 0000 0000 






VPSCC 


0001 0001 


(BQU) VPSIN 


0002 0002 




VPSRE 0000 0000 


(EQU) 




VPSCP 


0001 0001 


VPSLC 


0001 0001 


(EQU) 


VPSSF 0001 0001 


(EQU) 




VPS DO 


0001 0001 


(EQU) VPSOP 


0000 0000 




VPSTI 0000 0000 


(EQU) 




VPSEO 


0001 0001 


(EQU) VPSPI 


0000 0000 


(EQU) 


VPSXI 0000 0000 


(EQU) 




VPSFO 


0001 0001 


(EQU) VPSPM 


0001 0001 


(EQU) 








VPSIC 


0004 0004 


VPS PS 


0000 0000 


(EQU) 







J 



y 
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Assembler listing of CHAVPS 



Vs- 



LOC 


: AT ION 


INSTRUCTION 
B5 00000 


SOURCE 
CHAVPS 

VPSOP 


INST 


OPER 




DSECT 




B5 


00000 




DS 


0D 


B5 


00000 




VPSPT 


DS 


XL1 






B5 00000 


VPS PS 


EQU 


VPSPT 






00000080 


VPSPSM 


EQU 


x'eo' 






B5 00000 


VPS RE 


EQU 


VPSPT 






00000020 


VPSREM 


e£u 


X f 20 § 






B5 00000 


VPS PI 
VPSPIM 


EQU 


VPSPT 






00000010 


EOT 


X f 10« 






B5 00000 


VPSXI 


EQU 


VPSPT 






00000008 


VPSXIM 


EQU 


X'Q8 9 






B5 00000 


VPSAI 


EQU 


VPSPT 






00000004 


VPSAIM 


EQU 


X f 04 f 






B5 00000 


VPSTI 


EQU 


VPSPT 






00000002 


VPSTIM 


EQU 


X , 02« 






B5 00000 


VPSII 


EQU 


VPSPT 






00000001 


VPSIIM 


EQU 


X'Ol" 


B5 


00001 




VPSCP 


DS 


XL1 






B5 00001 


VPSLC 


EQU 


VPSCP 






ooooooco 


VPSLCM 


EQU 


X^O 1 






B5 00001 


VPSCC 


EQU 


VPSCP 






00000030 


VPSCCM 


EQU 


X^O' 






B5 00001 


VPSPM 


EQU 


VPSCP 






0000000F 


VPSPMM 


EQU 


X f 0F' 






B5 00001 


VPSFO 
VPSFOM 


EQU 


VPSCP 






00000008 


EQU 


X f 08 f 






B5 00001 


VPSDO 


EQU 


VPSCP 






00000004 


VPSDOM 


EQU 


x'oa 1 






B5 00001 


VPSEU 


EQU 


VPSCP 






00000002 


VPSEUM 


EQU 


X , 02 i 






B5 00001 


VPSSF 


EQU 


VPSCP 






00000001 


VPSSFM 


EQU 


X'Ol* 


B5 


00002 




VPSIN 


DS 


XL2 


B5 


00004 




VPSIC 


DS 


F 



COMMENT 

VIRTUAL PROGRAM STATUS WORD 

CVPSW) 

OLD-VPSW PROGRAM INTERRUPT 

PRIVILEGE STATUS AND TASK 

MASK 

PRIVILEGE STATUS 

RESERVED 

RESERVED MASK 

ASYNCHRONOUS PROG. INT. BIT 

CPI) 

ASYNCHRONOUS PROG. INT. 

MASK 

EXTERNAL INTERRUPT MASK 

ASYNCHRONOUS INTERRUPT MASK 

TIMER INTERRUPT MASK 

I/O INTERRUPT MASK 

ILC f CC r AND PROGRAM MASK 
INSTRUCTION LENGTH CODE 
CILC) 

CONDITION CODE (CO 

PROGRAM MASK 

FLOATING POINT OVERFLOW 
MASK 

DECIMAL OVERFLOW MASK 

EXPONENTIAL UNDERFLOW MASK 

SIGNIFICANCE MASK 

INTERRUPT CODE 
INSTRUCTION COUNTER 
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VAM Tape Control Record (CHAVTR) 

CHAVTR is a control record which is inserted, by VAM Tape (CZAET) # as the first 
record of each tape data set; it is used by VAM Tape and Recreate Catalog (CZAAX) to 
reconstruct a data set on direct access storage. CHAVTR occupies 315 bytes of 
storage. 

CHAVTR Storage map 



DEC 




HEX 




40 



128 



256 

272 

280 
288 
296 
304 
312 



28 



80 


50 


88 


58 


96 


60 


104 


68 



80 



100 

110 
118 
120 
128 
130 
138 



| UNNAMED | 








VTRDS1 






I 
I 


VTRDS2 




3 




s 




| VTRDSV | 

1 1 


| UNNAMED | 


| VTRBID 






1 

1 


UNNAMED | 


| VTRDEV 






1 

1 










UNNAMED 




| VTRCDT 




! 

l 


VTREDT 


1 1 
1 1 








UNNAMED 




HVTRFID | 
1 1 






UNNAMED 








\\ VTRLPB | 
1 1 


i 


VTRSCD 






(VTRXPD I 

1 1 


| 


UNNAMED 




| VTRFTP | 


|VTRRFM (UNNAMED 1 
f i 1 






VTRRCL 


|VTRKYL |VTRKLC | 
i i i 


>|VTRKLC (UNNAMED | 
I 1 1 






VTRSAL 


I VTRNDP | 


| VTRDOP | VTRNOP 

1 1 


1 
I 







V 
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Fields in CHAVTR — by displacement 



V^ 



DEC 

0000 

0008 

0043 

0087 

0087 

0087 

0087 

0096 

0101* 



HEX 

0000 

0008 

002B 

0057 

0057 

0057 

0057 

0060 

0068 



FIELD 

VTRJFC 

VTRDS1 

VTRDS2 

VTRDVP 

VTRDVS 

VTRDVI 

VTRDSV 

VTRBID 

VTRDEV 



DEC 

0128 

0131 

0256 

(EQU) 0256 

CEQU) 0272 

(EQU) 0274 

0287 

0294 

0296 



HEX 

0080 

0083 

0100 

0100 

0110 

0112 

011F 

0126 

0128 



FIELD 

VTRCDT 
VTREDT 
VTRFID 
VTRDSC 
VTRLPB 
VTRSCD 
VTRXPD 
VTRFTP 
VTRRFM 



DEC 


HEX 


FIELD 


0298 


01 2A 


VTRRCL 


0302 


012E 


VTRKYL 


0303 


01 2F 


VTRKLC 


0306 


0132 


VTRSAL 


0310 


0136 


VTRNDP 


0312 


0138 


VTRDOP 


0314 


01 3A 


VTRNOP 



Alphabetical list of fields in CHAVTR 



FIELD DEC HEX FIELD DEC HEX FIELD DEC HEX 

VTRBID 0096 0060 VTRDVP 0087 0057 (EQU) VTRNDP 0310 0136 

VTRCDT 0128 0080 VTRDVS 0087 0057 (EQU) VTRNOP 0314 013A 

VTRDEV 0104 0068 VTREDT 0131 0083 VTRRCL 0298 012A 

VTRDOP 0312 0138 VTRFID 0256 0100 VTRRFM 0296 0128 

VTRDSC 0256 0100 VTRFTP 0294 0126 VTRSAL 0306 0132 

VTRDSV 0087 0057 VTRJFC 0000 0000 VTRSCD 0274 0112 

VTRDS1 0008 0008 VTRKLC 0303 012F VTRXPD 0287 011F 

VTRDS2 0043 002B VTRKYL 0302 012E 

VTRDVI 0087 0057 CEQU) VTRLPB 0272 0110 



r ■ 
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Assembler listing of CHAVTR 



LOCATION 


INSTRUCTION 


SOURCE 


INST 


OPER 


COMMENT 




B7 


00000 


CHAVTR 


DSECT 




VAM TAPE CONTROL RECORD 
(4096 BYTES) 


B7 00000 






VTRJFC 


DS 


0CL256 


ORIGINAL JFCB DATA 


B7 00000 








DS 


CL8 


RESERVED 


B7 00008 






VTRDS1 


DS 


CL35 


DSNAME WITHOUT USERID 


B7 0002B 






VTRDS2 


DS 


CL44 


DSNAME WITH USERID 


B7 00057 






VTRDSV 


DS 


XL1 


DATA SET ORGANIZATION FLAG 




B7 


00057 


VTRDVI 


EQU 


VTRDSV 


VIS AM FLAG 




00000004 


VTRDVIM 


EQU 


X f 04 f 


VI SAM MASK 




B7 


00057 


VTRDVS 


EQU 


VTRDSV 


VSAM FLAG 




00000005 


VTRDVSM 


EQU 


X^' 


VSAM MASK 




B7 


00057 


VTRDVP 


EQU 


VTRDSV 


VPAM FLAG 




00000006 


VTRDVPM 


EQU 


X f 06 § 


VPAM MASK 


B7 00058 








DS 


CL8 


RESERVED 


B7 00060 






VTRBID 


DS 


CL4 


RECORD IDENTIFIER, X*%* 


B7 00064 








DS 


CL4 


RESERVED 


B7 00068 






VTRDEV 


DS 


F 


ORIGINAL DEVICE RESIDENCE 


B7 0006C 








DS 


CL20 


RESERVED 


B7 00080 






VTRCDT 

* 


DS 


XL3 


LAST ORIGINAL REFERENCE 

DATE (YDD) 

Y=YEAR (0-99), DD=DAY 

Cl-366) 


B7 00083 






VTREDT 

* 


DS 


XL3 


LAST ORIGINAL CHANGE DATE 

CYDD) 

Y=YEAR (0-99), DD=DAY 

(1-366) 


B7 00086 








DS 


CL122 


RESERVED 


B7 00100 






VTRDSC 


DS 


0CL59 


ORIGINAL DSCB DATA 


B7 00100 






VTRFID 


DS 


XL1 


FORMAT IDENTIFIER, X* FA* 


B7 00101 








DS 


CL15 


RESERVED 


B7 00110 






VTRLPB 


DS 


XL2 


NUMBER OF BYTES USED IN 
LAST PAGE (VS) 


B7 00112 






VTRSCD 


DS 


XL13 


SYSTEM CODE 


B7 0011F 






VTRXPD 


DS 


XL1 


PAD FACTOR (VI) 


B7 00120 








DS 


CL6 


RESERVED 


B7 00126 






VTRFTP 


DS 


XL2 


FILE TYPE 


B7 00128 






VTRRFM 


DS 


XL1 


RECORD FORMAT 


B7 00129 








DS 


XL1 


RESERVED 


B7 0012A 






VTRRCL 


DS 


XL4 


RECORD LENGTH 


B7 0012E 






VTRKYL 


DS 


XL1 


KEY LENGTH 


B7 0012F 






VTRKLC 


DS 


XL2 


KEY LOCATION . 


B7 00131 








DS 


XL1 


RESERVED 


B7 00132 






VTRSAL 


DS 


XL4 


SECONDARY ALLOCATION 


B7 00136 






VTRNDP 


DS 


XL2 


NUMBER OF DATA PAGES 


B7 00138 






VTRDOP 

* 


DS 


XL2 


NUMBER OF DIRECTORY PAGES 
(VI, VP) 


B7 0013A 






VTRNOP 


DS 


XL1 


NUMBER OF OVERFLOW PAGES 
(VI) 
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External Prompt Message Table CCHAXPR) 

CHAXPR contains the message ID and inserts for a message from be sent from 
one task to another. 

CHAXPR Storage map 



DEC 


8 

16 



HEX 

of 

L 
81 



10) XPRINL | 
I 1 



XPRMID 



XPRCNT 



| XPRFL1 | 



XPRUN1 



± 



Fields in CHAXPR — by displacement 



DEC HEX FIELD 
0000 0000 XPRMID 
0008 0008 XPRCNT 
0012 000C XPRWAC 



DEC HEX FIELD 

0012 000C XPRINV 

0012 OOOC XPRFL1 

fEQU) 0013 000D XPRUN1 



DEC HEX FIELD 
(EQU) 0016 0010 XPRINL 
0017 0011 XPRINS 



Alphabetical list of fields in CHAXPR 



FIELD DEC HEX 

XPRCNT 0008 0008 

XPRFL1 0012 OOOC 

XPRINL 0016 0010 



FIELD DEC HEX FIELD 

XPRINS 0017 0011 XPRUN1 

XPRINV 0012 OOOC CEQU> XPRWAC 

XPRMID 0000 0000 



DEC HEX 

0013 O00D 

0012 OOOC (EQU) 



Assembler listing of CHAXPR 



( 



LOCATION INSTRUCTION SOURCE INST QPER COMMENT 

B9 00000 CHAXPR DSECT EXTERNAL PROMPT MESSAGE 

♦ DSECT 

*********************************************************************** 

* CHAXPR WAS IMPLIMENTED FOR APAR 16663. ♦ 

* WHEN A MODULE OUTSIDE A PARTICULAR TASK WISHES TO CAUSE A PRMPT TO * 

* OCCUR IN THAT TASK, AN MCB MAY BE VSEND f D TO THE TASK. CHAXPR IS * 

* USED TO COVER THE MCBTXT FOR THE PURPOSE OF SPECIFYING THE MESSAGE * 

* ID AND THE INSERTS FOR THE MESSAGE TO BE ISSUED IN THE TARGET TASK. * 
*********************************************************************** 



B9 


00000 




XPRMID 


DS 


CL8 


MESSAGE ID 
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